注册126邮箱，提交出现的问题
本帖最后由 crkey12345 于 2009-8-19 15:10 编辑注册网址：http://reg.email.163.com/mailregAll/reg0.jsp?from=126mail
最后提交时不对，提示未阅读服务条款，可默认明明是选中的，加了选中的代码也不行
估计是“创建帐号”时的问题，重点是35行以后
我写的代码如下：#include<ie.au3>
$oie=_IECreate("http://reg.email.163.com/mailregAll/reg0.jsp?from=126mail")
$oForm =_IEGetObjById($oie,"regform")
$oQuery = _IEFormElementGetObjByName ($oForm, "inp_uname")
_IEFormElementSetValue ($oQuery, "asdd00fs11ioafd74")
Send(@CR);;回车
Sleep(1000);;等待，这两句好像不太保险，不知高手有何妙法改进
_IEFormElementRadioSelect ($oForm, "asdd00fs11ioafd74@126.com", "rdAccount", 1, "byValue")
$oQuery1=_IEGetObjById($oie,"password")
_IEFormElementSetValue ($oQuery1, "a9974515")
$oQuery2=_IEGetObjById($oie,"passwordconfirm")
_IEFormElementSetValue ($oQuery2, "a9974515");;;;;;;;;;;;;;;;;密码
$oSelect = _IEFormElementGetObjByName ($oForm, "secproblem")
_IEFormElementOptionSelect ($oSelect, "您配偶的生日是?", 1, "byValue")
$oQuery3=_IEGetObjById($oie,"secanswer")
_IEFormElementSetValue ($oQuery3, "19810515");;;;;安全问题
_IEFormElementRadioSelect ($oForm, "0", "rd1", 1, "byValue");;选择性别
$oQuery4=_IEGetObjById($oie,"year")
_IEFormElementSetValue ($oQuery4, "1980")
$oQuery5=_IEGetObjById($oie,"month")
_IEFormElementSetValue ($oQuery5, "04")
$oQuery6=_IEGetObjById($oie,"day")
_IEFormElementSetValue ($oQuery6, "10");;;;;;;;;;;;;;出生日期
$oQuery7=_IEGetObjById($oie,"authcode")
$oyzm=InputBox("验证码","")
_IEFormElementSetValue ($oQuery7, $oyzm);;;;;;;;;;;;;验证码
Sleep(1000)
MsgBox(1,"","");;;;;;;;;;;;;;从这开始
$oInputs = _IETagNameGetCollection ($oIE, "INPUT")
For $oInput In $oInputs
if $oInput.title = "创建帐号" And $oInput.class="btn-submit" then
_IEAction ($oInput, "click")
EndIf
Next;;;;;;;;;;;;;;;;;重点在这里
Exit 郁闷。。还是没有思路 我用楼主的代码试了一下，提示请选择用户名，手动选用户名后，注册成功 楼上，不知你加下延时就应该不用手动选择用户名了。
我这里提示这里错误：：
if $oInput.title = "????" And $oInput.class="btn-submit" then
if $oInput.title = "????" And $oInput.class^ ERROR
不知到你怎么注册成功的。。我真是郁闷啊。。。。
页:
[1]