刚学，网站登入，这么都等不进去

kossaaa

新手，想做个简单的登入网站的小程序，但是普通填表登入，文字输不进去，和用精易编程助手直接生成的POST都没用。什么原因啊
这个是网站163022.com 账号密码都是11111111 谁能给我源代码参考下，什么地方出错。
这是精易编程助手直接生成的POST

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

子程序名	返回值类型	公开	备 注
POST提交	逻辑型		⊙⊙本代码由精易会员专用浏览器生成

变量名	类 型	静态	数组	备 注
局_提交地址	文本型
局_提交数据	文本型
局_返回文本	文本型

局_提交地址 ＝ “http://163022.com/app/member/login.php”
局_提交数据 ＝ “uid=&langx=zh-tw&mac=&ver=&JE=true&username=11111111&password=11111111&radio=web_new”
局_返回文本 ＝ 到文本 (网页_访问 (局_提交地址, 1, , , 到字节集 (局_提交数据), )) ' 最后一个参数为返回的编码方式
判断 (寻找文本 (局_返回文本, “输入你成功的关键字”, , 假) ≠ -1)
返回 (真)
判断 (寻找文本 (局_返回文本, “输入你失败的关键字”, , 假) ≠ -1)
返回 (假)
输出调试文本 (局_返回文本) ' 如果前面2个没判断成功，把返回文件输出来
返回 (假)

.版本 2<br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .子程序 POST提交, 逻辑型, , ⊙⊙本代码由精易会员专用浏览器生成<br /> .局部变量 局_提交地址, 文本型<br /> .局部变量 局_提交数据, 文本型<br /> .局部变量 局_返回文本, 文本型<br /> <br /> 局_提交地址 ＝ “http://163022.com/app/member/login.php”<br /> 局_提交数据 ＝ “uid=&langx=zh-tw&mac=&ver=&JE=true&username=11111111&password=11111111&radio=web_new”<br /> 局_返回文本 ＝ 到文本 (网页_访问 (局_提交地址, 1, , , 到字节集(局_提交数据), )) ' 最后一个参数为返回的编码方式<br /> .判断开始 (寻找文本 (局_返回文本, “输入你成功的关键字”, , 假) ≠ -1)<br /> 返回 (真)<br /> .判断 (寻找文本 (局_返回文本, “输入你失败的关键字”, , 假) ≠ -1)<br /> 返回 (假)<br /> .默认<br /> 输出调试文本 (局_返回文本) ' 如果前面2个没判断成功，把返回文件输出来<br /> .判断结束<br /> 返回 (假)

普通登入的源码

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
网页填表	普通填表

网页填表.初始化 (超文本浏览框1.取窗口句柄 ())
网页填表.文本框_写内容 (“1”, “11111111”）
网页填表.文本框_写内容 (“2”, “11111111）
网页填表.按钮_取对象 (“登入”)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 网页填表, 普通填表<br /> <br /> 网页填表.初始化 (超文本浏览框1.取窗口句柄 ())<br /> 网页填表.文本框_写内容 (“1”, “11111111”）<br /> 网页填表.文本框_写内容 (“2”, “11111111）<br /> 网页填表.按钮_取对象 (“登入”)

Godsteal

源码：在这里：判断登录成功：SI2【这个';】只有登录成功才会有这个~所以我就判断这个！

猥琐小胖子

判断 (寻找文本 (局_返回文本, “输入你成功的关键字”, , 假) ≠ -1)
返回 (真)
判断 (寻找文本 (局_返回文本, “输入你失败的关键字”, , 假) ≠ -1)


你这个 输入你成功的关键字  输入你失败的关键字  要根据你网页实际情况的文字修改啊

猥琐小胖子

另外这个页面是utf-8的编码，你不能直接用到文本
需要
编码_UTF8到ANSI(网页_访问(,,,,,,,,))

改名字好难

寻找文本 (局_返回文本, “您好”, , 假) ≠ -1)
  成功的话就会显示 您好XXX  如果失败的话就找不到文字
还有 小胖子所说的  utf-8编码

Godsteal

稍等：楼主：马上给你源码········

kossaaa

1. .版本 2
   
2. 
   
3. .程序集 窗口程序集_启动窗口
   
4. 
   
5. .子程序 _按钮1_被单击
   
6. 
   
7. 
   
8. 
   
9. .子程序 POST提交, 逻辑型, , ⊙⊙本代码由精易会员专用浏览器生成
   
10. .局部变量 局_提交地址, 文本型
    
11. .局部变量 局_提交数据, 文本型
    
12. .局部变量 局_返回文本, 文本型
    
13. 
    
14. 局_提交地址 ＝ “http://163022.com/app/member/login.php”
    
15. 局_提交数据 ＝ “uid=&langx=zh-tw&mac=&ver=&JE=true&username=11111111&password=11111111&radio=web_new”
    
16. 局_返回文本 ＝ 到文本 (编码_Utf8到Ansi (网页_访问 (局_提交地址, 1, , , 到字节集 (局_提交数据), )))  ' 最后一个参数为返回的编码方式
    
17. .判断开始 (寻找文本 (局_返回文本, “RMB 0.00”, , 假) ≠ -1)
    
18.     返回 (真)
    
19. .判断 (寻找文本 (局_返回文本, “输入你失败的关键字”, , 假) ≠ -1)
    
20.     返回 (假)
    
21. .默认
    
22.     输出调试文本 (局_返回文本)  ' 如果前面2个没判断成功，把返回文件输出来
    
23. .判断结束
    
24. 返回 (假)
    

复制代码

代码是这样吗，测试了下，还是不行。如果成功的话，我之前登入的页面应该会直接掉线的

Godsteal

  

变量名	类 型	静态	数组	备 注
提交地址	文本型
提交数据	文本型
返回文本	文本型

提交地址 ＝ “http://163022.com/app/member/login.php”
提交数据 ＝ “uid=&langx=zh-tw&mac=&ver=&JE=true&username=” ＋ 编辑框1.内容 ＋ “&password=” ＋ 编辑框2.内容 ＋ “&radio=web_new”
返回文本 ＝ 到文本 (网页_访问 (提交地址, 1, 提交数据))
返回文本 ＝ 网页_访问s (提交地址, 1, 提交数据)
判断 (寻找文本 (返回文本, “SI2”, , 假) ≠ -1)
信息框 (“登录成功”, 0, , )
信息框 (“登录失败”, 0, , )

调试输出 (返回文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 提交地址, 文本型<br /> .局部变量 提交数据, 文本型<br /> .局部变量 返回文本, 文本型<br /> <br /> 提交地址 ＝ “http://163022.com/app/member/login.php”<br /> 提交数据 ＝ “uid=&langx=zh-tw&mac=&ver=&JE=true&username=” ＋ 编辑框1.内容 ＋ “&password=” ＋ 编辑框2.内容 ＋ “&radio=web_new”<br /> 返回文本 ＝ 到文本 (网页_访问 (提交地址, 1, 提交数据))<br /> 返回文本 ＝ 网页_访问s (提交地址, 1, 提交数据)<br /> .判断开始 (寻找文本 (返回文本, “SI2”, , 假) ≠ -1)<br /> 信息框 (“登录成功”, 0, , )<br /> .默认<br /> 信息框 (“登录失败”, 0, , )<br /> .判断结束<br /> <br /> <br /> <br /> 调试输出 (返回文本)

Godsteal

使用网页访问S：我好懒~~

danjawwi

Godsteal 发表于 2015-8-31 11:16
[e=3].版本 2
.支持库 spec

太好了，我也需要