ASP产生不重复的随机数（模拟洗牌）
功能作用：ASP产生不重复的随机数（模拟游戏洗牌）
<%
function GetRnd(lowerNum,upperNum)
Dim unit,RndNum,Fun_X
unit = upperNum - lowerNum
Redim MyArray(unit)
For Fun_I=0 To unit
myArray(Fun_I)= lowerNum + Fun_I
Next
For Fun_I=0 To round(unit)
RndNum = getRndNumber(Fun_I,unit)
Fun_X = myArray(RndNum)
myArray(RndNum)=myArray(Fun_I)
myArray(Fun_I)=Fun_X
Next
GetRnd = myArray
end function
function getRndNumber(lowerbound,upperbound)
Randomize
getRndNumber=Int((upperbound-lowerbound+1)*Rnd+lowerbound)
end function
%>
相关文档：
一，动态网页与静态网页
1，网页
网页是符合HTML规范，能通过浏览器看到的文件。
2，静态网页
采用HTML标记语言编写的网页，后缀一般为 html 或 htm，如 index.html。
3，动态网页
采用ASP，JSP，PHP，CGI 等程序动态生成的页面，只有在接到用户访问要求后才生成页面并传输至用户浏览器。文件名后缀为 .asp ，.shtm � ......
创建一个简单的ASP页面
在服务器端编写的文件 index.asp ：
以下为引用内容：
<%@LANGUAGE="JSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"&g ......
VBSCRIPT 的数据类型
VBSCRIPT 只有一种数据类型：variant ，程序根据上下文来判断 variant 为数字类型还是字符串类型。
引号内的数字被看成字符串，如：a="12" ；
不带引号当然就是数字，如：b=13 。
实例：
以下为引用内容：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C// ......
FormatDateTime
返回表达式，此表达式已被格式化为日期或时间。
FormatDateTime(Date[, NamedFormat])
参数
Date
必选项。要被格式化的日期表达式。
NamedFormat
可选项。指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate。
设置
NamedFormat 参数可以有以下值：
常数 值 描述
vbGeneralDate ......
