|
4精币
本帖最后由 gfh 于 2011-10-29 12:57 编辑
网址是:http://sg.dipan.com/
发送地址可以找到:http://pass.dipan.com/m.aspx?cn=UserLogon
发送的数据是 这个:
<?xml version="1.0" encoding="utf-8" ?>
- <root>
- <UserLogon>
<UserName1>chenshan1110</UserName1>
<Password1>19760207</Password1>
<LoginType1>0</LoginType1>
<checkcode>nsda</checkcode>
</UserLogon>
</root>
像这样的数据包应怎么发送。谢谢指教。
[e]
.子程序 POST提交, 文本型
.局部变量 局_POST地址, 文本型
.局部变量 局_POST数据, 文本型
.局部变量 局_返回文本, 文本型
局_POST地址 = “http://pass.dipan.com/m.aspx?cn=UserLogon”
局_POST数据 = “<?xml version='1.0' encoding='utf-8'?>
<root>
<UserLogon>
<UserName1>qqwwqqwwqq1</UserName1>
<Password1>a111111</Password1>
<LoginType1>0</LoginType1>
<checkcode>9iak</checkcode>
</UserLogon>
</root>”
局_返回文本 = 到文本 (网页_访问 (局_POST地址, “POST”, , , 局_POST数据))
.判断开始 (寻找文本 (局_返回文本, “关键文本”, , 假) ≠ -1)
提示框 (“”)
.判断 (寻找文本 (局_返回文本, “关键文本”, , 假) ≠ -1)
提示框 (“”)
.默认
.判断结束
返回 (局_返回文本)
[/e]
这个是助手生成的源码,但是发不过去。望指教。
|
|