在学习ASP编程中,通过一些简单的应用,我们还可以创造出很多乐趣,以下就是一个简单的用ASP编写的,可以将几个数字随即排序的一个简单的游戏,复制到一个ASP文件中运行就可以了
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
‘随机排序
leng=UBound(tt)
randomize
for ii=0 to leng-1
b=int(rnd()*leng)
temp=tt(b)
tt(b)=tt(ii)
tt(ii)=temp
Next
For i=0 To leng
response.write tt(i)&"<br>"
next
%>