'************************************* 'asp计算随机数 '************************************* Function randomStr(intLength) Dim strSeed, seedLength, pos, Str, i strSeed = "abcdefghijklmnopqrstuvwxyz1234567890" seedLength = Len(strSeed) Str = "" Randomize For i = 1 To intLength Str = Str + Mid(strSeed, Int(seedLength * Rnd) + 1, 1) Next randomStr = Str End Function

　　推荐阅读

　　动网论坛验证码改进 加法验证码(ASPJpeg版)

来看看效果图对比：字符验证码： → 加法验证码：优点： ①与纯字符验证码相比，本程序效防止了绝大部分(99%以上)广告机的自动识别。即使是中文验证码，也能被市面上的部分广告机识别。 ②与中文验证码相比，避免了>>>详细阅读

本文标题：asp 随机字符串函数

地址：http://www.17bianji.com/kaifa2/ASP/32114.html

 1/2    1