数组的定义
dim myarray
myarray = array(1,5,123,12,98)
可扩展数组
dim myarray()
for i = 0 to 10
redim preserve myarray(i)
myarray(i)=i
next
将一个字符串分割并返回分割结果的数组
dim myarray
myarray = split(tempcnt,chr(13)&chr(10))
for i = lbound(myarray) to ubound(myarray)
response.write myarray(i) & "<br>"
next
数组排序函数
function..sort(ary)
keepchecking = true
do until keepchecking = false
keepchecking = false
for i = 0 to ubound(ary)
if i = ubound(ary) then exit for
if ary(i) > ary(i+1) then
firstvalue = ary(i)
secondvalue = ary(i+1)
ary(i) = secondvalue
ary(i+1) = firstvalue
keepchecking = true
end if
next
loop
sort = ary
end function..
数组排序函数应用例子
dim myarray
myarray = array(1,5,123,12,98)
myarray = sort(myarray)
for i = lbound(myarray) to ubound(myarray)
response.write myarray(i) & "<br>"
next
在application和session中使用数组
application.lock
application("storedarray") = myarray
application.unlock
localarray = application("storedarray")
覆盖application中的数组
application.lock
application("storedarray") = localarray
application.unlock
session使用方法与application相同
从数据库中把数据导入数组中
dim myarray
取出全部记录
myarray = rs.getrows
取出前10项记录
myarray = rs.getrows(10)
for row = 0 to ubound(myarray, 2)
for col = 0 to ubound(myarray, 1)
response.write (col, row) & "<br>"
next
next
如对本文有疑问，
点击进行留言回复！！
我要评论
网友评论