asp 生成任意英文+数字位数长度的随机码函数

本文主要为广大网友提供“asp 生成任意英文+数字位数长度的随机码函数”，希望对需要asp 生成任意英文+数字位数长度的随机码函数网友有所帮助，学习一下!

<%
''******************************
''函数：Generator(Length)
''参数：Length,任意长度的数值，随机码位数
''作者：阿里西西
''日期：2007/7/15
''描述：生成任意英文+数字位数长度的随机码函数
''示例：Generator(80)
''******************************
Function Generator(Length)
Dim i, tempS
tempS = "abcdefghijklmnopqrstuvwxyz1234567890"
Generator = ""
If isNumeric(Length) = False Then
Exit Function
End If
For i = 1 to Length
Randomize
Generator = Generator & Mid(tempS,Int((Len(tempS) * Rnd) + 1),1)
Next
End Function
%>