一個生成隨機密碼的函數 - 中國WEB開發者網絡 (http://www.webasp.net) -- 技術教程 (http://www.webasp.net/article/) --- 一個生成隨機密碼的函數 (http://www.webasp.net/article/15/14164.htm) |
| -- 作者：未知 -- 發佈日期： 2004-10-25 |
| tmp = "0123456789abcdefghijklmnopqrstopwxyz"
tmpPWD = RoundStr(tmp,8) Function RoundStr(str,Num) s = "" for i = 1 to Num Randomize strLen = Len(str) t = Round((RND * (strLen-1))+1) s = s & mid(str,t,1) Next RoundStr = s End Function |
| webasp.net |