当前位置:首页 > 程序&理念 >

ASP生成随机数函数

时间:2007-01-25 17:53:38浏览:25570 本站原创

Function make50file()
    dim a(8)
    For j=0 to 8
    Do
    Randomize
    asciicode=Int((122 - 48 + 1) * Rnd + 48)
    Loop Until asciicode<=57 or (65<=asciicode and asciicode<=90) or 97<=asciicode
    a(j)=chr(asciicode)
    Next
    make50file=Join(a,"")
End Function

上一篇:showModalDialog和showModelessDialog
下一篇:身份证号码检验函数JavaScript

发表评论

昵称:  验证码:

关于博主

博主

博主:BlueCode

职业:web程序

简介:2002年开始一直从事Web制作,网站运营,会PHP+MYSQL ASP+MSSQL,微信开发