1. 爱易网页
  2. ASP教程
  3. asp产生随机密码的函数

asp产生随机密码的函数

日期：2011-12-03　 浏览次数：21317 次

产生随机密码的函数

<%
response.write makePassword(16)

function makePassword(byVal maxLen)

Dim strNewPass
Dim whatsNext, upper, lower, intCounter
Randomize

For intCounter = 1 To maxLen
whatsNext = Int((1 - 0 + 1) * Rnd + 0)
If whatsNext = 0 Then
'character
upper = 90
lower = 65
Else
upper = 57
lower = 48
End If
strNewPass = strNewPass & Chr(Int((upper - lower + 1) * Rnd + lower))
Next
makePassword = strNewPass

end function


%>

相关资料更多>

  1. 如何过滤网址里面的关键词。
  2. 精彩:Asp.net动态生成html页面
  3. 循环里同名checkbox怎么限定选取个数
  4. 在ASP中限制同以表单被多次提交
  5. 一个数组，想实现将数组里的值做为条件查找数据库，怎么做到
  6. 哪位高手能知道这个md5的密码是多少
  7. FROM 子句语法异常，求解
  8. 客户端Cookie中文编程(上)_ASP客户端_ASP教程
  9. 深入ASP.NET AJAX : 对象承继体系