ASP5位随即数字代码 知道的帮下忙 代码注释下 谢谢

随机产生5位随机数字

答案：<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Function FormatSn(getNum,getBit) 
Dim FormatsnNum,Formatsnpre,Formatsnj
FormatsnNum = getBit - len(getNum)
For Formatsnj = 1 To FormatsnNum
   Formatsnpre = Formatsnpre & "0"
Next
FormatSn = Formatsnpre & getNum
End Function
 

Dim MyValue
Randomize   '初始化随机数生成器。
   MyValue = FormatSn(Int((99999 * Rnd) + 1),5)
   Response.write MyValue
%>
 
<%
dim num
randomize
num=round(Rnd,5)*100000
response.write num
%>
<%
dim num
randomize
num=int((55555-2222+1)*RND+2222)
%>
最主要的函数randomize要记住，然后后面就是一个特定的公式了。int转换，
公式为: 大-小+1*Rnd+小.
如果不对，可以改变相应的数字。
 

上一个：求一段ASP.net代码，用于点击登录时点击imagebutten更换成另一个imagebutten
下一个：ASP.NET服务器控件Repeater在页面上生成的一疙瘩密密麻麻的代码