易语言怎么制作登陆器

412549957

请去http://zhidao.baidu.com/question/482422013.html?quesup2&oldq=1里回答，如果满意，这里同样采纳！希望大家帮帮忙啊！

SpringZ

表示这个我会

御风软件

登录验证就是要自己的站点验证呗，让他输入帐号密码，POST一次自己的站就好了

Island

POST登陆~无压力~

mt664839390

是的发生的发生的法师打发士大夫

默克大海

mt664839390 发表于 2013-1-2 11:56
是的发生的发生的法师打发士大夫

你杯具了

hellohexiang

[e]
.版本 2
.支持库 internet
.支持库 spec

.程序集 窗口程序集1
.程序集变量 临时文本, 文本型
.程序集变量 formhash, 文本型
.程序集变量 返回文本, 文本型
.程序集变量 文本, 文本型

.子程序 _按钮1_被单击

标签4.标题 ＝ “正在登陆......”
临时文本 ＝ 到文本 (HTTP读文件 (“http://7788.lingd.cn/”))
formhash ＝ 文本_取出中间文本 (临时文本, “formhash=”, #引号)
HTTP读文件 (“http://7788.lingd.cn/member.php?mod=logging&action=logout&formhash=” ＋ formhash)
返回文本 ＝ 到文本 (网页_访问 (“http://7788.lingd.cn/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”, 1, , , 到字节集 (“fastloginfield=username&username=” ＋ 编辑框1.内容 ＋ “&password=” ＋ 编辑框2.内容 ＋ “&quickforward=yes&handlekey=ls” ＋ “&cookietime=” ＋ 到文本 (取现行时间 ())), , , , ))
调试输出 (返回文本)
.如果 (寻找文本 (返回文本, “http://7788.lingd.cn/”, , 假) ≠ -1)
    标签4.标题 ＝ “欢迎您回来” ＋ 编辑框1.内容
.否则
    标签4.标题 ＝ “登录失败!”
[/e]

hellohexiang

测试账号 ceshi01 密码 aaa123