a.asp文件内容：

<%
Dim arr(5)
Dim str,i
'给数据赋值
For i= 0 to 5
     arr(i)=i
Next
'传递数组
str=join(arr)
Response.Write "<a href=test.asp?tempstr="& str &">传送数组内容</a>"
%>

test.asp内容：

<%
dim tempstr
tempstr=split(Request("str"),",")
response.write tempstr(0) & "<br>" & tempstr(1)
%>