|
发表于 2010-9-2 18:36:15
|
显示全部楼层
广东省东莞市
POST地址错误了吧!
.版本 2
.支持库 internet
提交登陆 = 彗星HTTP读文本 (“http://www.3600gz.cn/logging.php?action=login”, “POST”, , , “formhash=a88cb170&referer=http%3A%2F%2F www.3600gz.cn% 2F&loginfield=username&username=” + 编辑框1.内容 + “&password=” + 编辑框2.内容 + “&ques tionid=0&answer=&loginsubmit=%B5%C7%C2%BC”, )
' 输出调试文本 (提交登陆)
.如果 (寻找文本 (提交登陆, “欢迎您回来”, , 假) > 0)
编辑框4.内容 = 彗星HTTP读文本 (“http://www.3600gz.cn/space.php?username=” + 删首尾空 (编辑框1.内容))
图 片框1.图 片 = HTTP读文件 (“http://www.3600gz.cn/ucenter/avatar.php?uid=” + 编辑框1.内容 + “&size=middle”)
' 编辑框4.内容 = 彗星HTTP读文本 (“http://www.3600gz.cn/logging.php”, , , )
取UID ()
取用户名 ()
取精币 ()
取精华 ()
取积分 ()
取推广 ()
取好评 ()
取下载点数 ()
取荣誉 ()
取帖子 ()
取用户组 ()
取阅读权限 ()
取QQ ()
信息框 (编辑框1.内容 + “ 登陆成功!精易欢迎您!”, 0, )
.否则
信息框 (编辑框1.内容 + “ 登陆失败!请检查您的输入是否有误!”, 0, )
--
俺们论坛的 |
|