★→ASP程序学习群:62655404 微信公众号开发
订阅本栏目 RSS您所在的位置: 深山工作室 > asp函数 > 正文

asp随机显示字符长度与类型(可随机显示数字、小写字母、大写字母,可以做为随机密码使用)

本站原创 2018/5/18 16:58:25 深山工作室 字体:  浏览 797 我要评论
asp随机显示字符长度与类型(可随机显示数字、小写字母、大写字母,可以做为随机密码使用)

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
以下是测试显示12位的随机数:
asp纯数字随机数:<%=qwbm_shuijima(18,1)%>
asp小写字母随机数:<%=qwbm_shuijima(18,2)%>
asp大写字母随机数:<%=qwbm_shuijima(18,3)%>
asp数字、小写字母、大写字母随机数:<%=qwbm_shuijima(18,0)%>

以下是测试显示36位的随机数:
asp纯数字随机数:<%=qwbm_shuijima(36,1)%>
asp小写字母随机数:<%=qwbm_shuijima(36,2)%>
asp大写字母随机数:<%=qwbm_shuijima(36,3)%>
asp数字、小写字母、大写字母随机数:<%=qwbm_shuijima(36,0)%>

<%
'(取指定长度随机字符串 ,0:数字+大小写字母;1:数字 2:小写;2:大写)
Function qwbm_shuijima(sj_length,sj_mode)
sj_mima_shuzi = "0123456789" '数字
sj_mima_xiaoxie = "abcdefghijklmnopqrstuvwxyz" '小写字母
sj_mima_daxie = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" '大写字母
Select Case sj_mode
Case 1:sj_mima_data = sj_mima_shuzi
Case 2:sj_mima_data = sj_mima_xiaoxie
Case 3:sj_mima_data = sj_mima_daxie
Case else:sj_mima_data = sj_mima_shuzi & sj_mima_xiaoxie & sj_mima_daxie
End Select
sj_j = Len(sj_mima_data)
Randomize(Timer)
For i = 1 To sj_length
sj_sow = sj_sow & Mid(sj_mima_data, Int(sj_j * Rnd + 1), 1)
Next
qwbm_shuijima = sj_sow
End Function
%>
前一页:没有了
相关阅读
( 2019/5/6 17:22:07 )网站从http改成https(ssl证书)后设置301跳转将http跳转到https的方法
( 2019/5/2 21:47:46 )ASP利用fso读取文件夹里所有文件的名字
( 2019/4/16 15:23:47 )jquery动态生成的html代码中无法使用jquery事件的解决方法
( 2019/4/16 14:40:46 )asp实现获得当前文章的上一篇信息与下一篇信息功能及代码
( 2019/4/16 14:29:04 )asp导出内容到excel表并自定义命名后下载(非打开)
( 2019/4/16 11:31:00 )'禁止站外提交页面和数据
( 2019/4/16 11:19:50 )asp将中文汉字字符转为unicode编码(\u编码)与把unicode编码转为汉字
( 2019/4/15 22:32:46 )asp中qequest读取优先级顺序(通过优化之后提高速度)
共有0条关于《asp随机显示字符长度与类型(可随机显示数字、小写字母、大写字母,可以做为随机密码使用)》的评论
发表评论
正在加载评论……
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
深山工作室网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
rss学习
个人空间
网站设计
网站公告
下载
photoshop学习
ASP学习
DIV+CSS学习
SEO搜索引擎忧化
java学习
HTML学习
网站信息
网站类信息
更多>>同类信息
asp采用access数据库搜索信息时因为日文片假名问题提示“Microsoft JET Database Engine 错误80040e14”的解决方法
asp利用dateadd获得上个月、本月、下个月的第一天和最后一天
更多>>最新添加文章
网站从http改成https(ssl证书)后设置301跳转将http跳转到https的方法
ASP利用fso读取文件夹里所有文件的名字
jquery动态生成的html代码中无法使用jquery事件的解决方法
asp实现获得当前文章的上一篇信息与下一篇信息功能及代码
asp导出内容到excel表并自定义命名后下载(非打开)
'禁止站外提交页面和数据
asp将中文汉字字符转为unicode编码(\u编码)与把unicode编码转为汉字
asp中qequest读取优先级顺序(通过优化之后提高速度)
更多>>随机抽取信息
asp经典正则表达式应用收藏
旅行社管理系统 V1.9
利用Asp里的xmlhttp组件来获取页面内容
2012-3-22中午的一件电话事件(一个不懂怎么定义的电话)(备份)
竖排的选项卡
深山留言板2.14情人节留言板模板v4.8
用javascript美化Select,并获取相应的值
360500怎么样?啥时候能帮我的工资给我。
11