如何做一个随机密码产生器？
更新时间：2006年11月16日 00:00:00 作者：
<%
genPassword = ""
Randomize
For i = 1 to 8
intNum = Int(10 * Rnd + 48)
intUpper = Int(26 * Rnd + 65)
intLower = Int(26 * Rnd + 97)
intRand = Int(3 * Rnd + 1)
Select Case intRand
Case 1
strPartPass = Chr(intNum)
Case 2
strPartPass = Chr(intUpper)
Case 3
strPartPass = Chr(intLower)
End Select
genPassword = genPassword & strPartPass
Next
response.write(genPassword & "<br>")
%>
' 显示浏览器表头信息和服务器变量
<%
For Each name In Request.ServerVariables
Response.write("<b>"&name&"</b>:<br>")
Response.write(Request.ServerVariables(name))
Next
%>
[1]
相关文章
禁止站外提交表单(author:killer)...2006-11-11
如何用组件实现自动发送电子邮件？...2006-11-11
如何获知页面上的图象的实际尺寸？...2006-11-11
如何正确显示数据库里同时存在的GB码和BIG5码？...2006-11-11
如何阻止别人非法链接你网站的图片？...2006-11-11
如何做一个检索结果带链接的检索？...2006-11-11
如何验证日期输入是否正确？...2006-11-11
如何根据用户银行帐户余额的多少进行显式的提交或终止？...2006-11-11
如何制作K线图？...2006-11-11
CPU,GPU,DPU,TPU,NPU,BPU等处理器的性能及概念
CPU,GPU,DPU,TPU,NPU,BPU各种U还在傻傻分不清么？本文带你领略这些不同的U所代表的意义，让你有醍醐灌顶般的醒悟收获，有需要的朋友可以借鉴参考2021-08-08
最新评论