海南世紀雲圖網絡科技有限公司
咨詢熱(rè)線:400-822-8458 客戶服務:0898-32183600

ASP随機(jī)生(shēng)成英文+數字位數長度的随機(jī)碼函數

發表于:2011-07-15 00:00:00來(lái)源:SOUAB.COM人(rén)氣:3450

ASP/Visual Basic代碼
  1. <%    
  2. '******************************    
  3. '函數:Generator(Length)    
  4. '參數:Length,任意長度的數值,随機(jī)碼位數    
  5. '描述:生(shēng)成任意英文+數字位數長度的随機(jī)碼函數    
  6. '示例:Generator(80)    
  7. '******************************    
  8. Function Generator(Length)    
  9. Dim i, temp    
  10. temp = "abcdefghijklmnopqrstuvwxyz1234567890"    
  11. Generator = ""    
  12. If isNumeric(Length) = False Then    
  13. Exit Function    
  14. End If    
  15. For i = 1 to Length    
  16. Randomize    
  17. Generator = Generator & Mid(temp,Int((Len(temp) * Rnd) + 1),1)    
  18. Next    
  19. End Function    
  20. Response.Write(""&Generator(6)"")   
  21. %>  

 

文章(zhāng)整理(lǐ): 世紀雲圖  /

以上信息與文章(zhāng)正文是不可(kě)分(fēn)割的一部分(fēn),如(rú)果您要轉載本文章(zhāng),請(qǐng)保留以上信息,謝謝!

版權申明:本站(zhàn)文章(zhāng)部份來(lái)自(zì)網絡,如(rú)有侵權,請(qǐng)聯系我們,我們收到後立即删除,謝謝!

特别注意:本站(zhàn)部份轉載文章(zhāng)言論不代表本站(zhàn)觀點,本站(zhàn)所提供的攝影(yǐng)照(zhào)片,插畫(huà),設計(jì)作(zuò)品,如(rú)需使用,請(qǐng)與原作(zuò)者聯系,版權歸原作(zuò)者所有。

微信
網站(zhàn)建設
軟件(jiàn)業務
網絡營銷
400電話(huà)