这个应该是最简单的验证码雏形了

lpxx · 发表于 2011-7-4 22:06:01


MsgBox(0, "", T(6))
Func T($t1)
        $array = StringSplit("ABCDEFGHIJKLMNOPQRSTUVWXYZ01234567890123456789", "")
        $t0 = ""
        For $X = 1 To $t1
                $t0 &= $array[Random(1, $array[0], 1)]
        Next
        Return $t0
EndFunc

jasonsjz · 发表于 2011-7-6 10:41:40

这个·····确实~

ooxxgod · 发表于 2012-7-2 02:27:08

初始代码很简明

dreamneo · 发表于 2012-7-3 20:52:13

高手，代码弄个的这么精简，厉害！支持

		自动登录	找回密码
密码			加入

[原创] 这个应该是最简单的验证码雏形了