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
%>
相关文档：
软件名称：风渡科技ASP网上购物系统 v0912-26
软件大小：7069k
运行环境：ASP/Access
软件类别：电子商务
软件授权：免费
开发商家: 风渡科技
官方网站：http://www.chinammc.com
演示地址：http://demo01.chinammc.com
下载地址: http://w ......
今天同学装了一个xampp.来使用FTP和Mysql. 但是他是使用ASP.net来进行网页开发的,然后又不想另外装IIS,叫我帮他弄. 上网Google一下,发现国外有人发过教程了,不过是英文的.整理了一下和自己配置完成的心得重新发出来. 首先,你要上xampp的官网上下载安装xampp,安装过程官网有详细的说明. 安装完成后,确定你的xampp能成功� ......
<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/shownews.asp" 主目录
aa=Request.Servervariables("url") '虚拟目录
bb=InstrRev(aa,"/")
cc=left(aa,bb)
Do_Url = Do_Url&Request.ServerVariables("HTTP_HOST")&cc&"index.asp"
call SaveFile("index.h ......
'**************************************************
'函数名：FSOFileRead
'作 用：使用FSO读取文件内容的函数
'参 数：filename ----文件名称
'返回值：文件内容
'************** ......
