求一个post登入成功的源码 50精币

0小狼0

leiyh 发表于 2015-5-8 23:19
你把第一部分取hash的那部分发来吧

可以帮我解决吗

青春献给了gou

试试试试...

leiyh

111.zip (145.32 KB, 下载次数: 0)

2015-5-9 00:05 上传

点击文件名下载附件

leiyh

  

‘解决了

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
cookies	文本型
sig	文本型
otp	文本型
signmsg	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序名	返回值类型	公开	备 注
login			自己改登陆密码及帐号 这里只传递一个验证码
参数名	类 型	参考	可空	数组	备 注
code	文本型

变量名	类 型	静态	数组	备 注
url	文本型
form	文本型
body	文本型
get	文本型

url ＝ 网页_访问s (“http://login.funmily.com/?url=ht ... ints%3Fmodule%3Dlog”, , , cookies, cookies)
form ＝ 文本_取出中间文本 (url, #常量3, “'”)
url ＝ “http://login.funmily.com/widget/login/main&do=login”
body ＝ “login_type=quick&username=TOw333678@yahoo.com.tw&password=159753&code=” ＋ code ＋ “&url=http%3A%2F%2Fwww.funmily.com&form_hash=” ＋ form
get ＝ 网页_访问s (url, 1, body, cookies, )
otp ＝ 文本_取出中间文本 (get, #常量1, #常量2 )
signmsg ＝ 文本_取出中间文本 (get, #常量4, #常量2 )
调试输出 (otp, signmsg)
url ＝ “http://passport.funmily.com/index.php?method=login”
body ＝ “url=http%3A%2F%2Fwww.funmily.com&otp=” ＋ otp ＋ “&signmsg=” ＋ signmsg ＋ “&game_code=0&secondpswurl=0&serviceloginURL=0”
get ＝ 网页_访问s (url, 1, body, )
调试输出 (编码_usc2到ansi (get))
置剪辑板文本 (get)

子程序名	返回值类型	公开	备 注
_按钮1_被单击

login (编辑框1.内容)

子程序名	返回值类型	公开	备 注
_图片框1_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
get	文本型

get ＝ 网页_访问s (“http://www.funmily.com/”)
sig ＝ 文本_取出中间文本 (get, “;sign=”, “&”)
调试输出 (sig)
图片框1.图片 ＝ 网页_访问 (“http://validcode.funmily.com/widget/base/Validcode?type=login&sign=” ＋ sig, , , , cookies, , , )
算了上传附件吧
’自己添加组件

i支持库列表	支持库注释
spec	特殊功能支持库

‘解决了<br /> .版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 cookies, 文本型<br /> .程序集变量 sig, 文本型<br /> .程序集变量 otp, 文本型<br /> .程序集变量 signmsg, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 login, , , 自己改登陆密码及帐号 这里只传递一个验证码<br /> .参数 code, 文本型<br /> .局部变量 url, 文本型<br /> .局部变量 form, 文本型<br /> .局部变量 body, 文本型<br /> .局部变量 get, 文本型<br /> <br /> url ＝ 网页_访问s (“http://login.funmily.com/?url=ht ... ints%3Fmodule%3Dlog”, , , cookies, cookies)<br /> form ＝ 文本_取出中间文本 (url, #常量3, “'”)<br /> url ＝ “http://login.funmily.com/widget/login/main&do=login”<br /> body ＝ “login_type=quick&username=TOw333678@yahoo.com.tw&password=159753&code=” ＋ code ＋ “&url=http%3A%2F%2Fwww.funmily.com&form_hash=” ＋ form<br /> get ＝ 网页_访问s (url, 1, body, cookies, )<br /> otp ＝ 文本_取出中间文本 (get, #常量1, #常量2)<br /> signmsg ＝ 文本_取出中间文本 (get, #常量4, #常量2)<br /> 调试输出 (otp, signmsg)<br /> url ＝ “http://passport.funmily.com/index.php?method=login”<br /> body ＝ “url=http%3A%2F%2Fwww.funmily.com&otp=” ＋ otp ＋ “&signmsg=” ＋ signmsg ＋ “&game_code=0&secondpswurl=0&serviceloginURL=0”<br /> get ＝ 网页_访问s (url, 1, body, )<br /> 调试输出 (编码_usc2到ansi (get))<br /> 置剪辑板文本 (get)<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> login (编辑框1.内容)<br /> <br /> <br /> .子程序 _图片框1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 get, 文本型<br /> <br /> get ＝ 网页_访问s (“http://www.funmily.com/”)<br /> <br /> sig ＝ 文本_取出中间文本 (get, “;sign=”, “&”)<br /> 调试输出 (sig)<br /> <br /> 图片框1.图片 ＝ 网页_访问 (“http://validcode.funmily.com/widget/base/Validcode?type=login&sign=” ＋ sig, , , , cookies, , , )<br /> <br /> <br /> <br /> 算了上传附件吧<br /> <br /> ’自己添加组件