生成任意位随机数的函数

作者：整理

生成任意位随机数的函数
‘’strLong是随机数字的位数，数字型
Function rndNum (strLong)
Dim temNum
Randomize
Do While Len(RndNum) < strLong
temNum=CStr(Chr((57-48)*rnd+48))
RndNum=RndNum&temNum
loop
End Function

返回顶部

下一篇：用ASP实现下载*.ASP文件 >>

· 汉字转化为拼音
· asp动态include文件
· VBScript 函数
· Asp程序错误详细说明例表
· Asp.NET常用函数
· RS.OPEN SQL,CONN,A,B 全接触!
· 语音上传(三)
· 语音上传（二）
· 语音上传（一）
· write users ip
· 写入和读取图片（c＃ asp。net sqlserver）
· 多列显示
· CSS制作标签卡TAB效果
· WebService Behavior 学习心得
· CSS基本布局16例
· vbscript错误代码及对应解释大全
· ASP.NET常用函数表
· 消息队列服务
· 如何用c#解析word(1)--获得文档中的style标签
· ASP.NET 2.0 Beta2 中特殊文件夹名称的改变
· RSS 2.0规范
· 权限管理的设计和实现（含演示和原代码）
· Modifying GAC permissions
· 用asp实现QQ在线查询
· Modifying GAC permissions
· 一个可以读取ID3信息的类[可以很方便添加MP3了]
· asp记录日志程序
· 在Web上用style实现完美颜色渐变
· 为DataGrid 写一个 DropDownListColumn
· 写了一个求最大值与最小值的函数
· 模式窗口中提交数据的问题和解决
· 用ASP编程控制在IIS建立Web站点
· .Text blog的一点点安装心得
· MIME小知识
· 最近开发一个小型的OA
· 文件删除函数
· 表情发布（类似QQ表情）和UBB类（c＃）
· SqlServer数据库的备份和恢复措施