验证码错误问题~100精B求完善

hk530944

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 str, 文本型
.程序集变量 url, 文本型
.程序集变量 body, 文本型
.程序集变量 idhash, 文本型
.程序集变量 update, 文本型
.程序集变量 loginhash, 文本型
.程序集变量 formhash, 文本型
.程序集变量 y5, 文本型
.程序集变量 验证码, 文本型
.程序集变量 cookies, 文本型

.子程序 __启动窗口_创建完毕

url ＝ “http://dkbbs.hogacn.com/member.php?mod=logging&action=login&infloat=yes&handlekey=login&inajax=1&ajaxtarget=fwin_content_login”
str ＝ 到文本 (网页_访问_对象 (url, 0, , ))
idhash ＝ 文本_取出中间文本 (str, “seccode_”, #引号, )
loginhash ＝ 文本_取出中间文本 (str, “loginhash=”, #引号, )
formhash ＝ 文本_取出中间文本 (str, “value=” ＋ #引号, #引号, )
url ＝ “http://dkbbs.hogacn.com/misc.php?mod=seccode&action=update&idhash=” ＋ idhash ＋ “&0.8800168812823843&modid=member::logging”
str ＝ 到文本 (网页_访问 (url, 0, , , ))
update ＝ 文本_取出中间文本 (str, “update=”, “&”, )
idhash ＝ 文本_取出中间文本 (str, “idhash=”, #引号, )
图片框1.图片 ＝ 网页_访问 (“http://dkbbs.hogacn.com/misc.php?mod=seccode&update=” ＋ update ＋ “&idhash=” ＋ idhash, 0, , , cookies)
调试输出 (idhash, update, loginhash, formhash)

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

验证码 ＝ 编辑框1.内容
str ＝ 到文本 (网页_访问_对象 (“http://dkbbs.hogacn.com/misc.php?mod=seccode&action=check&inajax=1&modid=member::logging&idhash=” ＋ idhash ＋ “&secverify=” ＋ 验证码, 0, , ))
调试输出 (str)
url ＝ “http://dkbbs.hogacn.com/member.php?mod=logging&action=login&loginsubmit=yes&handlekey=login&loginhash=” ＋ loginhash ＋ “&inajax=1”
body ＝ “formhash=” ＋ formhash ＋ “&referer=http%3A%2F%2Fdkbbs.hogacn.com%2Fforum.php%3Fgid%3D1&loginfield=username&username=hk530944&password=woshishen&questionid=0&answer=&seccodehash=” ＋ idhash ＋ “&seccodemodid=member%3A%3Alogging&seccodeverify=” ＋ 验证码 ＋ “&loginsubmit=true”
str ＝ 到文本 (网页_访问_对象 (url, 0, body, , ))
调试输出 (str)

nliger2015

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
str	文本型
url	文本型
body	文本型
idhash	文本型
update	文本型
loginhash	文本型
formhash	文本型
y5	文本型
验证码	文本型
cookies	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

str ＝ 网页_访问s (“http://dkbbs.hogacn.com/member.php?mod=logging&action=login&infloat=yes&handlekey=login&referer=http%3A%2F%2Fdkbbs.hogacn.com%2Fmember.php&inajax=1&ajaxtarget=fwin_content_login”, , , cookies)
idhash ＝ 文本_取出中间文本 (str, “seccode_”, #引号, )
loginhash ＝ 文本_取出中间文本 (str, “loginhash=”, #引号, )
formhash ＝ 文本_取出中间文本 (str, “value=” ＋ #引号, #引号, )
str ＝ 网页_访问s (“http://dkbbs.hogacn.com/misc.php?mod=seccode&action=update&idhash=” ＋ idhash ＋ “&” ＋ 时间_取随机时间戳 () ＋ “&modid=member::logging”, , , cookies)
update ＝ 文本_取出中间文本 (str, “update=”, “&”, )
图片框1.图片 ＝ 网页_访问 (“http://dkbbs.hogacn.com/misc.php?mod=seccode&update=” ＋ update ＋ “&idhash=” ＋ idhash, , , cookies)
调试输出 (idhash, update, loginhash, formhash)

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

验证码 ＝ 编辑框1.内容
str ＝ 网页_访问s (“http://dkbbs.hogacn.com/misc.php?mod=seccode&action=check&inajax=1&modid=member::logging&idhash=” ＋ idhash ＋ “&secverify=” ＋ 验证码, , , cookies)
调试输出 (str)
str ＝ 网页_访问s (“http://dkbbs.hogacn.com/member.php?mod=logging&action=login&loginsubmit=yes&handlekey=login&loginhash=” ＋ loginhash ＋ “&inajax=1”, 1, “formhash=” ＋ formhash ＋ “&referer=http%3A%2F%2Fdkbbs.hogacn.com%2Fforum.php%3Fgid%3D1&loginfield=username&username=hk530944&password=woshishen&questionid=0&answer=&seccodehash=” ＋ idhash ＋ “&seccodemodid=member%3A%3Alogging&seccodeverify=” ＋ 验证码 ＋ “&loginsubmit=true”, cookies)
调试输出 (str)
' 开始运行被调试程序
' * “cSAGZwTWV” | “67880” | “Lphup” | “76f29d05”
' * “
' ”
' * “
' if(typeof succeedhandle_login=='function') {succeedhandle_login('http://dkbbs.hogacn.com/forum.php?gid=1', '欢迎您回来，金牌会员 hk530944，现在将转入登录前页面', {'username':'hk530944','usergroup':'金牌会员','uid':'114189','groupid':'14','syn':'0'});}hideWindow('login');showDialog('欢迎您回来，金牌会员 hk530944，现在将转入登录前页面', 'right', null, function () { window.location.href ='http://dkbbs.hogacn.com/forum.php?gid=1'; }, 0, null, null, null, null, null, 3);]]>”
' 被调试易程序运行完毕

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 str, 文本型<br /> .程序集变量 url, 文本型<br /> .程序集变量 body, 文本型<br /> .程序集变量 idhash, 文本型<br /> .程序集变量 update, 文本型<br /> .程序集变量 loginhash, 文本型<br /> .程序集变量 formhash, 文本型<br /> .程序集变量 y5, 文本型<br /> .程序集变量 验证码, 文本型<br /> .程序集变量 cookies, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> str ＝ 网页_访问s (“http://dkbbs.hogacn.com/member.php?mod=logging&action=login&infloat=yes&handlekey=login&referer=http%3A%2F%2Fdkbbs.hogacn.com%2Fmember.php&inajax=1&ajaxtarget=fwin_content_login”, , , cookies)<br /> idhash ＝ 文本_取出中间文本 (str, “seccode_”, #引号, )<br /> loginhash ＝ 文本_取出中间文本 (str, “loginhash=”, #引号, )<br /> formhash ＝ 文本_取出中间文本 (str, “value=” ＋ #引号, #引号, )<br /> <br /> str ＝ 网页_访问s (“http://dkbbs.hogacn.com/misc.php?mod=seccode&action=update&idhash=” ＋ idhash ＋ “&” ＋ 时间_取随机时间戳 () ＋ “&modid=member::logging”, , , cookies)<br /> update ＝ 文本_取出中间文本 (str, “update=”, “&”, )<br /> <br /> 图片框1.图片 ＝ 网页_访问 (“http://dkbbs.hogacn.com/misc.php?mod=seccode&update=” ＋ update ＋ “&idhash=” ＋ idhash, , , cookies)<br /> 调试输出 (idhash, update, loginhash, formhash)<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 验证码 ＝ 编辑框1.内容<br /> str ＝ 网页_访问s (“http://dkbbs.hogacn.com/misc.php?mod=seccode&action=check&inajax=1&modid=member::logging&idhash=” ＋ idhash ＋ “&secverify=” ＋ 验证码, , , cookies)<br /> 调试输出 (str)<br /> <br /> str ＝ 网页_访问s (“http://dkbbs.hogacn.com/member.php?mod=logging&action=login&loginsubmit=yes&handlekey=login&loginhash=” ＋ loginhash ＋ “&inajax=1”, 1, “formhash=” ＋ formhash ＋ “&referer=http%3A%2F%2Fdkbbs.hogacn.com%2Fforum.php%3Fgid%3D1&loginfield=username&username=hk530944&password=woshishen&questionid=0&answer=&seccodehash=” ＋ idhash ＋ “&seccodemodid=member%3A%3Alogging&seccodeverify=” ＋ 验证码 ＋ “&loginsubmit=true”, cookies)<br /> 调试输出 (str)<br /> <br /> ' 开始运行被调试程序<br /> ' * “cSAGZwTWV” | “67880” | “Lphup” | “76f29d05”<br /> ' * “<br /> ' ”<br /> ' * “<br /> ' if(typeof succeedhandle_login=='function') {succeedhandle_login('http://dkbbs.hogacn.com/forum.php?gid=1', '欢迎您回来，金牌会员 hk530944，现在将转入登录前页面', {'username':'hk530944','usergroup':'金牌会员','uid':'114189','groupid':'14','syn':'0'});}hideWindow('login');showDialog('欢迎您回来，金牌会员 hk530944，现在将转入登录前页面', 'right', null, function () { window.location.href ='http://dkbbs.hogacn.com/forum.php?gid=1'; }, 0, null, null, null, null, null, 3);]]>”<br /> ' 被调试易程序运行完毕

qq626771719

附上源码，，，验证码地址。。

hk530944

qq626771719 发表于 2016-5-12 23:36
附上源码，，，验证码地址。。

源码就在上面好么

534613728

把验证码图片带上cookie试试，你那里只写了返回cookie

qq626771719

hk530944 发表于 2016-5-12 23:40
源码就在上面好么

易语言坏了 中文复制是乱码

hk530944

534613728 发表于 2016-5-12 23:40
把验证码图片带上cookie试试，你那里只写了返回cookie

我试过了 戴上了也不行 ··所以懵逼了 来求助的

hk530944

qq626771719 发表于 2016-5-12 23:41
易语言坏了 中文复制是乱码

额 那我怎么发给你啊

qq626771719

hk530944 发表于 2016-5-12 23:44
额 那我怎么发给你啊

附件。。。。。。

xiaoyu1986

倒腾这么多代码，就不能把源码传上来？？？