Can ASP pass an Array into a Function?

[Gram]

Hello,

Can anyone tell me if ASP can pass an Array intp a Function? If so, can
anyone point me to an example?

Thanks in advance.

Gram.

[Bob Barrows]

Gram wrote:

> Hello,
>
> Can anyone tell me if ASP can pass an Array intp a Function?

<nitpick>Presumably, you mean: "can vbscript pass an array into a
function?". ASP is not a language: it is a platform which supports several
scripting languages, including vbscript, jscript, javascript ...</nitpick>

> If so,
> can anyone point me to an example?
>

Sure.
<%option explicit
'create the function:
function UseArray(pAr)
dim i
response.write "The array contains the following elements:<BR>"
for i = 0 to ubound(pAr)
response.write pAr(i) & "<BR>"
next
UseArray = join(pAr,"; ")
end function

'create the array
dim ar, s
ar=array(1,2,3)
'pass it to the function:
s = UseArray(ar)
response.write "<BR>The function returned this string:<BR>"
response.write s
%>

--
HTH,
Bob Barrows - ASP MVP
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[Ray at]

Sure.

a = Array("a","b","c")
AA = MakeItBig(a)
Response.Write Join(AA, " - ")

Function MakeItBig(TheArray)
Dim aResult()
Redim aResult(UBound(TheArray))
For i = 0 To UBound(TheArray)
aResult(i) = UCase(TheArray(i))
Next
MakeItBig = aResult
End Function

That function will take the contents of an array and capitalize the values
and return it.

Ray at work

"Gram" <gram3000@hotmail.com> wrote in message
news:tixjb.1264$bD.4444@news.indigo.ie...

> Hello,
>
> Can anyone tell me if ASP can pass an Array intp a Function? If so, can
> anyone point me to an example?
>
> Thanks in advance.
>
> Gram.
>
>

[Bob Barrows]

Gram wrote:

> Bob,
>
> Thanks for the help and the quick reply.
> What does ASP MVP stand for?
>

[url]http://mvp.support.microsoft.com/[/url]

--
HTH,
Bob Barrows - ASP MVP
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[Gram]

Bob,

Thanks for the help and the quick reply.
What does ASP MVP stand for?

Gram.

[Peter Foti]

"Gram" <gram3000@hotmail.com> wrote in message
news:tixjb.1264$bD.4444@news.indigo.ie...

> Hello,
>
> Can anyone tell me if ASP can pass an Array intp a Function? If so, can
> anyone point me to an example?

<%
Function arrToStr( myarray )
Dim i, result

For i = LBound(myarray) To UBound(myarray)
result = result & myarray(i)
Next
arrToStr = result
End Function

x = array("A","B","C")
Response.Write( arrToStr(x) )
%>

Hope this helps. :)
Regards,
Peter Foti

[Gram]

Hello,

Thanks for all your quick responses, Got it sorted.

Gram.