asp 生成任意英文+數(shù)字位數(shù)長度的隨機碼函數(shù)
更新時間：2007年08月08日 12:10:46 作者：
<%
'******************************
'函數(shù)：Generator(Length)
'參數(shù)：Length,任意長度的數(shù)值，隨機碼位數(shù)
'作者：阿里西西
'日期：2007/7/15
'描述：生成任意英文+數(shù)字位數(shù)長度的隨機碼函數(shù)
'示例：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
%>
'******************************
'函數(shù)：Generator(Length)
'參數(shù)：Length,任意長度的數(shù)值，隨機碼位數(shù)
'作者：阿里西西
'日期：2007/7/15
'描述：生成任意英文+數(shù)字位數(shù)長度的隨機碼函數(shù)
'示例：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獲取數(shù)據(jù)庫表名、庫名、字段名的方法,本文例子使用的是SqlServer數(shù)據(jù)庫,需要的朋友可以參考下2014-07-07
ASP開發(fā)中可能有時候會用大段的if... else 的判斷，不過如果是動態(tài)Response.write的內容，你想更方便閱讀代碼，可以用Response.End()來終端ASP的執(zhí)行，也就類似于Break的用法2014-10-10
用ASP寫組件...2006-08-08
asp下html模板的加載方法，一般有以下幾種，大家可以根據(jù)情況自己決定，結果都是一樣的，都是好方法2008-01-01
asp下實現(xiàn)記錄集內隨機取記錄的代碼...2007-11-11
用asp實現(xiàn)檢測文件編碼...2007-01-01
asp中將有雙引號標題入庫的方法，需要的朋友可以參考下2012-10-10
ASP下的簡潔的多重查詢的方法與函數(shù) 真不錯...2007-10-10
大寫數(shù)字驗證碼的實現(xiàn)方法2008-11-11
這篇文章主要介紹了Asp如何解析XML并分頁顯示，附截圖，需要的朋友可以參考下2014-05-05