位置：首页>> 网络编程>> Asp编程>> asp数组使用特法（4）

asp数组使用特法（4）

　　发布时间：2009-05-11 12:43:00　

标签：数组,asp,编程

在数组中查找元素
这有一个函数，它能返回数组中的元素索引。这个索引是数组元素的基本位置，如：0代表myArray(0)。

function findArray(arrName,srcStr)
dim I
dim pint,cnt

cnt=0

for i=0 to ubound(arrName)
if cnt=0 then
if srcStr=arrName(i) then
pint=i
cnt=1
end if
end if
next
findArray=pint+1
end function

现在我们来用一用这个函数：

Dim myArray(20)
Dim k

For k=0 to 20
MyArray(k)="Item " & k
Next

Response.write findArray(myArray,"Item 8") & "<p>"
Response.write myArray(findArray(myArray,"Item 8"))

赶紧在本机上调试一下，看看这个函数的功能。

..............................................................

向另一个页面传递数组

现在有很多种方法向另一页面传递数组，目前有三种方法：

定义一个又逗号分隔的字符串，然后再下一页中用Split函数重新建立数组。
将数组存储在一个Session变量中，然后在下一个页面中调用。
通过表单的隐含区域来传递数组，他们都是自动用逗号分开，然后再用Split函数重新建立数组。

前两种方法很好，但是都比第三中复杂。在这里我们将只介绍第三种，因为它是最简单最有效的。

1.asp：
<％
dim I
dim myArray(20)

for I=0 to 20
myArray(I)="Item " & I
next
％>
<html>
<body>
<form name="testform" method="post" action="2.asp">
<％
for I=0 to ubound(myArray)
response.write "<input type=hidden name=myArray value='" & myArray(I) & "'>"
next
％>
<p>
<input type="submit">
</form>
</body>
</html>

以上我们做的是在一个表单中用单独的隐含域存储数组中的每个元素，我们再看看下一页：

2.asp
<html>
<body>
<％
dim arrString
dim myArray
dim I

arrString=request("myArray")
myArray = split(arrString,",")

for I=0 to ubound(myArray)
response.write "Item "&I&" = " & myArray(I) & "<br>" & vbCrLf
next
％>
</body>
</html>

调试了吗？怎么样，简单吧！数组就这么传递过去了。
好了，通过以上的讲解，我想初学者一定对asp中的数组有了一定的了解，当然这里将的都只是最基本的，其实数组的功能远远不只这些，如果大家肯钻研，它能使在asp的程序运行效率大大提高。

第一页上一页 1 2 3

投稿

asp数组使用特法（4）

猜你喜欢