海南世纪云图网络科技有限公司
咨询热线:400-822-8458 技术支持:0898-66754910 客户服务:0898-32183600

ASP随机生成英文+数字位数长度的随机码函数

发表于:2011-07-15 00:00:00来源:SOUAB.COM人气:1835

ASP/Visual Basic代码
  1. <%    
  2. '******************************    
  3. '函数:Generator(Length)    
  4. '参数:Length,任意长度的数值,随机码位数    
  5. '描述:生成任意英文+数字位数长度的随机码函数    
  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. %>  

 

文章整理: 世纪云图  https://www.yuntop.cc/

以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

版权申明:本站文章部份来自网络,如有侵权,请联系我们,我们收到后立即删除,谢谢!

特别注意:本站部份转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有。

微信
网站建设
软件业务
网络营销
400电话