闲来无事，试试论坛的易语言IDE功能

forkh · 发表于 2011-6-24 16:33:20

[e]
.版本 2
.支持库 spec
.支持库 ChongYong
.程序集窗口程序集1
.子程序 _按钮1_被单击
.局部变量 POST地址, 文本型
.局部变量 POST数据, 文本型
.局部变量返回文本, 文本型
.如果 (编辑框_帐号.内容 ≠ “” 且编辑框_密码.内容 ≠ “”)
POST地址＝ “http://www.keling.tk/member.php? ... it=yes&inajax=1”
POST数据＝ “username=” ＋删首尾空 (编辑框_帐号.内容) ＋ “&password=” ＋删首尾空 (编辑框_密码.内容) ＋ “&quickforward=yes&handlekey=ls”
返回文本＝到文本 (彗星HTTP读文件 (POST地址, “POST”, , , POST数据))
.判断开始 (倒找文本 (返回文本, “登录失败”, , 假) ≠ -1)
标签3.标题＝ “登陆状态：” ＋ “登陆失败”
.默认
标签3.标题＝ “登陆状态：” ＋ “登陆成功”
.判断结束
调试输出 (返回文本)

.否则
新信息框 (“sss”, , “提示”, )
.如果结束

.子程序 __启动窗口_创建完毕
编辑框_论坛地址.获取焦点 ()

[/e]

forkh · 发表于 2011-6-24 16:33:44

怎么不行呢，咋回事啊？？

zang爱 · 发表于 2011-6-24 19:26:14

不知道好像在修复当中~

lvbaniang · 发表于 2011-7-25 00:30:36

先看看再说。。。。

誓言゛ · 发表于 2011-8-21 15:57:20

睡地下。。。

小明无敌 · 发表于 2011-8-21 15:58:18

很好很强大

		自动登录	找回密码
密码			注册

[大家谈谈] 闲来无事，试试论坛的易语言IDE功能