本帖最后由 老刘1号 于 2017-7-2 11:12 编辑
先来个暴力枚举(VBS): | With CreateObject("MSXML2.XMLHTTP") | | .Open "POST", "http://bbaass.tk/math/", False | | .setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded" | | .Send "send=reg&username=老刘" | | End With | | | | For i = 1 to 100 | | If math(i) = "=" then msgbox "Win!The number is "&i | | next | | | | Function Math(num) | | With CreateObject("MSXML2.XMLHTTP") | | .Open "POST","http://bbaass.tk/math/", False | | .setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded" | | .send "send=Answer&math=" & num & "&username=老刘" | | Math = Split(Split(.responseText,",")(2),"""")(3) | | End With | | End FunctionCOPY |
|