求助大神看下验证码为何第一次输入总是不对

kfyzk

RT，注册时候，第一次验证码的输入都是错误的，必须要等到第二次验证码输入了才能注册成功。源码在附件，求助大神，看看是啥问题呢？
[e]
.版本 2
.支持库 webbrowser新版中文版
.支持库 iext

.程序集 窗口程序集1
.程序集变量 网页填表, 网页填表
.程序集变量 文件号, 整数型
.程序集变量 邮箱数组, 文本型, , "0"

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

验证码_编辑框.获取焦点 ()
文件号 ＝ 打开文件 (取当前目录 () ＋ “\mail.txt”, , )
WebBrowser1.跳转 (“http://my.pcgames.com.cn/passport/register.jsp”, , , , )
网页填表.就绪判断 (WebBrowser1.取窗口句柄 (), “用户体验提升计划”, , , 1, , , )
网页填表.初始化 (WebBrowser1.取窗口句柄 ())

.子程序 _按钮_注册_被单击

网页填表.线程_启动 (&数据初始化)

.子程序 数据初始化
.局部变量 临时文本, 文本型

密码_编辑框.内容 ＝ 网页填表.文本_取随机字母 (4) ＋ 网页填表.文本_取随机数字 (2) ＋ 网页填表.文本_取随机字母 (2)
临时文本 ＝ 读入一行 (文件号)
邮箱_编辑框.内容 ＝ 网页填表.文本_取左边 (临时文本, “----”, , 假)
用户名_编辑框.内容 ＝ 网页填表.文本_取左边 (邮箱_编辑框.内容, “@”, , 假)
邮箱密码_编辑框.内容 ＝ 网页填表.文本_取右边 (临时文本, “----”, , 假)

.子程序 _验证码_编辑框_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)
网页填表.文本框_写内容 (“username”, 用户名_编辑框.内容, )
网页填表.文本框_写内容 (“password”, 邮箱密码_编辑框.内容, )
网页填表.文本框_写内容 (“passwordConfirm”, 邮箱密码_编辑框.内容, )
网页填表.文本框_写内容 (“email”, 邮箱_编辑框.内容, )
网页填表.文本框_写内容 (“captcha”, 验证码_编辑框.内容, )
网页填表.按钮_点击 (“submitButton”, )
.如果真 (网页填表.就绪判断 (WebBrowser1.取窗口句柄 (), “您的确认邮件已经发送到：”, , , 1, , , ) ＝ 1)
超级列表框1.插入表项 (0, , , , , )
超级列表框1.置标题 (0, 0, 用户名_编辑框.内容)
超级列表框1.置标题 (0, 1, 密码_编辑框.内容)
超级列表框1.置标题 (0, 2, 邮箱密码_编辑框.内容)
.如果真结束

.如果真结束


[/e]

kfyzk

呵呵，麻烦老师了，就是说，我按照老师你说的，把回车键换成了空格键，但是还是一样的，第一次验证码输入是错误的。我再多研究研究吧，麻烦老师了，呵呵。

冰点

不明白你的意思，但我把  回车键  改成  空格键 一直是可以的呀

[e]
如果真 (键代码 ＝ #空格键)[/e]

kfyzk

额，老师，我这里试了，空格键还是一样啊。。。这个是为啥呢？能不能麻烦老师给我改下源码看看？

冰点

明白了。因为 这个验证码 是响应回车键的，意思是说。你按下 回车键，网页的验证码就会更换成其他的。（你可以在网页中按回车键试试）

你可以把 按键换成空格键，这样就不会了

kfyzk

额，老师，我刚刚上传的源码搞错了。。。。
按照这个为准，麻烦老师了。

kfyzk

源码已经上传，麻烦了，嘿嘿。。。

冰点

重新回复，上传源码看看，主题的源码无法下载

kfyzk

冰点 发表于 2013-4-6 14:36
子程序开头需 先调用 初始化 命令 才能执行填表代码。

在 编辑框按下某键里面可没有哦。 加上这个看看

刚刚加上了试了，还是一样，第一次是不行的，必须要刷新了验证码后，再次输入验证码，才能注册成功。。。

冰点

子程序开头需 先调用 初始化 命令 才能执行填表代码。

在 编辑框按下某键里面可没有哦。 加上这个看看