|
发表于 2011-10-3 01:36:38
|
显示全部楼层
上海市上海市
本帖最后由 爱家的小懒虫 于 2011-10-3 01:48 编辑
- .版本 2
- .支持库 Krnlnex
- .程序集 窗口程序集1
- .子程序 _按钮1_被单击
- .局部变量 提交地址, 文本型
- .局部变量 提交数据, 文本型
- .局部变量 返回信息, 文本型
- .局部变量 文本, 文本型
- 提交地址 = “http://www.3600gz.cn/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”
- 提交数据 = “username=” + 删首尾空 (编辑框_帐号.内容) + “&password=” + 删首尾空 (编辑框_密码.内容) + “&quickforward=yes&handlekey=ls”
- 返回信息 = 到文本 (网页_访问 (提交地址, 1, , , 提交数据, , ))
- 调试输出 (返回信息)
- 文本 = 文本_取出中间文本 (返回信息, “<root><![CDATA[”, “<script”)
- .如果 (文本 = “” 且 返回信息 ≠ “”)
- 标签3.标题 = “登录状态:登录成功!”
- .否则
- 标签3.标题 = 文本
- .如果结束
复制代码
需要用到 精益模块2.57 应该你自己也有.我就不上传了
|
|