<% '****************************** '函数：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 %>

　　推荐阅读

　　asp之日期和时间函数示例

asp之日期和时间函数示例可以使用日期和时间函数来得到各种格式的日期和时间函数语法说明示例NowNow()取得系统当前的日期和时间Dim MyVar MyVar = Now' MyVar 包含当前的日期和时间。DateDate()取得系统当前的日期>>>详细阅读

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

地址：http://www.17bianji.com/kaifa2/ASP/32476.html

 1/2    1