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
%>
相关文档：
常用的脚本语言有 Javascript 和 VBscript 。
使用哪种语言需先设定。如上节代码中的<%@ LANGUAGE="JSCRIPT" ... %>。
如果没有指定，系统就会使用 IIS 程序指定的脚本语言。
VBscript 用法
VBscript 一般放在 <head> 与 </head> 内的 <% 和 %> 之间。
代 ......
VBSCRIPT 的数据类型
VBSCRIPT 只有一种数据类型：variant ，程序根据上下文来判断 variant 为数字类型还是字符串类型。
引号内的数字被看成字符串，如：a="12" ；
不带引号当然就是数字，如：b=13 。
实例：
以下为引用内容：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C// ......
<html xmlns="http://www.w3.org/1999/xhtml" >
<HEAD>
<title>多文件上传 </title>
<script language="JavaScript">
function addFile()
{
var str = ' <br / ......
Active Server Pages 提供内建对象，这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息（如用户首选项）。本文简要说明每一个对象。
Application 对象
可以使用 Application 对象使给定应用程序的所有用户共享信息。
Request 对象
可以使用 Request 对象访问任何用 HTTP 请 ......
