我已经在网站上尝试了与此主题相关的其他一些建议,但是我花了很多时间才开始工作。这是我到目前为止的代码,然后是" Clear"上的代码片段。下一个表单上的按钮(点击搜索后。单击搜索工作并转到另一个表单。)
Dim URL
Dim IE
Set IE = CreateObject("internetexplorer.application")
IE.Top = 0
IE.Left = 0
URL = "https://ebsprod.utg.uvn.net:4443/OA_HTML/OA.jsp?page=/oracle/apps/icx/por/reqmgmt/webui/ReqSummaryPG&_ti=1826123697&oapc=7&OAMC=77445_134_0&menu=Y&oaMenuLevel=1&oas=liPV_eLrgEnGE1mwKwcf6A.."
IE.Visible = True
IE.Navigate URL
Do While IE.Busy
WScript.Sleep 100
Loop
IE.Document.getElementById("Search").Click
我被卡住的片段。无法弄清楚如何点击此按钮:
<button title="Clear" class="x7p" onclick="return _chain('clearclearButton(); return false;','submitForm(\'DefaultFormName\',0,{\'_FORM_SUBMIT_BUTTON\':\'clearButtonfOAmnJbM\'});return false',this,event,true)" type="submit">Clear</button>
答案 0 :(得分:0)
您是否尝试将代码放入“onclick”中,如下所示:
<button title="Clear" class="x7p" onclick="myButtonClick()" type="submit">Clear</button>
VBS代码:
function myButtonClick()
(the code you want to execute)
end function