|
楼主 |
发表于 2020-5-14 12:35:34
|
显示全部楼层
我不是操作600个页面,是在同一个注销页面中提交600次
$tTxtRowVal = FileReadLine($oExcel)
getOutWorkTxtVal($tTxtRowVal,@TAB,$oAgentCode,$oAgentName,$oIDNo)
While $oAgentCode<>""
_IELoadWait($oIE)
Sleep(2000)
ConsoleWrite("RowNum = " & $oRowNum & " AgentCode = " & $oAgentCode & " IDNo = " & $oIDNo & @crlf )
$oID= _IEGetObjByName($oIE, "ID")
_IEFormElementSetValue($oID, $oIDNo)
$oName= _IEGetObjByName($oIE, "NAME")
_IEFormElementSetValue($oName, $oAgentName)
$oIsValid= _IEGetObjByName($oIE, "ISVALID")
_IEFormElementSetValue($oIsValid, "0")
$oSearch = _IEGetObjById ($oIE, "searchbutton")
_IEAction ($oSearch, "click")
_IELoadWait($oIE)
;$tBusy = _IEPropertyGet($oIE,"busy")
;ConsoleWrite("selectbutton busy = " & $tBusy & @crlf)
;$table = _IETableGetCollection ($oIE,0)
$table= _IEGetObjById($oIE, "querytable" )
Sleep(1000) |
|