JavaScriptをクリックすることなく、エクセルVBAを経由して、ポップアップを確認するためにどのように埋め込まれたonclickの

Question

HTMLおよび機能コードは

function resetClick() { 
    var tempChanged = "X"; 
    var tempTemplate = ""; 
    if (tempChanged == "X" && tempTemplate != "X") { 
     if (confirm("Modification in progress , do you wish to save?")) 
<!--  changed okcode from reset to /8 so that the exit command code will be used. --> 
<!--   SetOkCode("netmzps_0000004_100", "/8"); --> 
     SettingOkCode("/8", "netmzps_0000004_100","","",""); 
    } 
    else 
<!--  changed okcode from reset to /8 so that the exit command code will be used. --> 
<!--   SetOkCode("neetmzps_0000004_100", "/8"); --> 
     SettingOkCode("/8", "netmzps_0000004_100","","",""); 
} 

<a href="javascript:resetClick();" class="TELUSHighlightButton" name="&nbsp;&nbsp;&nbsp;&nbsp;Start over&nbsp;&nbsp;&nbsp;&nbsp;" title="Click here to initialise all fields." onmouseover="status=' ';return true;" onmouseout="status=' ';">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Start over&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</a> 

私はonclickの値、 を削除し、同様の問題を発見しているが、これは、Java embeddded関数ではありません！

ウェブをセッティングしても実際の解決策はありません。

ピート

Answer 1

私は解決策が問題をクリートないことがわかりました！

最初はボタンに付いたスクリプトを実行しようとしました！

myBrowser.Document.parentWindow.execScript "resetClick()" 

しかし、これは確認ルーチンと呼ばれています。代わりに、私はresetclickがしたことを実行し、問題を回避した提出を行いました！魅力的な作品！

myBrowser.Document.parentWindow.execScript "SetOkCode('netmzps_0000004_100', '/8')" 
    Do While myBrowser.Busy Or myBrowser.ReadyState <> 4 
    DoEvents 
Loop 

myBrowser.Document.parentWindow.submit 
myBrowser.Quit 

ピート