|
|
|
| 作者：未知 |
| 日期：2004-10-25 |
| 人氣： |
| 投稿：snow(轉貼) |
| 來源：未知 |
| 字體：大 中 小 |
| 收藏：加入瀏覽器收藏 |
|
|
|
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
|
|
|
當前位置：開發者網絡 >> 技術教程 >> ASP教程 >> 安全加密 >> 內容
