如何做一个随机密码产生器?

所属分类: 网络编程 / 编程10000问 阅读数: 1610
收藏 0 赞 0 分享

<%
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]

更多精彩内容其他人还在看

在无组件的情况下,如何上传图片?

在无组件的情况下,如何上传图片?
收藏 0 赞 0 分享

如何限制上传文件的大小?

如何限制上传文件的大小?
收藏 0 赞 0 分享

如何用拦截表单的方法上传图片?

如何用拦截表单的方法上传图片?
收藏 0 赞 0 分享

如何对用户进行授权?

如何对用户进行授权?
收藏 0 赞 0 分享

如何更好地保护我的网页?

如何更好地保护我的网页?
收藏 0 赞 0 分享

如何实现某些页面只让特定的用户浏览?

如何实现某些页面只让特定的用户浏览?
收藏 0 赞 0 分享

如何实现某一页面只让特定的用户浏览?

如何实现某一页面只让特定的用户浏览?
收藏 0 赞 0 分享

如何实现强制登录?

如何实现强制登录?
收藏 0 赞 0 分享

如何制作一个安全的页面?

如何制作一个安全的页面?
收藏 0 赞 0 分享

如何最大限度地实现安全登录功能?

如何最大限度地实现安全登录功能?
收藏 0 赞 0 分享
查看更多