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 � ......
Active Server Pages 提供内建对象，这些对象使用户更容易收集通过浏览器请求发送的信息、响应浏览器以及存储用户信息（如用户首选项）。本文简要说明每一个对象。
Application 对象
可以使用 Application 对象使给定应用程序的所有用户共享信息。
Request 对象
可以使用 Request 对象访问任何用 HTTP 请 ......
今天在网上找了好久关于ASP生成静态页的代码 最多的就是 FSO方法，模板方法，但不知道，我把代码拿来之后都不好用，就是提供下载的压缩包里面写好的我运行都是有错误。。
不过黄天不负有心人，我终于找到一个单页生成静态的方法，拿出来给大家分享
<!-- ======================== 生成静态方法 ================ ......
在网上看到很多这方面的代码，但是有些是不能用，有些是垃圾代码太多，我简单的修改了一下现在与大家共享一下。
<%
Option Explicit
dim databasename '定义数据库名称
databasename="database.mdb" '数据库名称
dim databasepath '定义数据库存放路径
......
