1

実際にはリンクをクリックする必要があり、その結果、2 つのメニュー リストが表示され、いずれかを選択する必要があります。

これは、IE を起動して必要な Web アドレスに移動するための私の VBScript です。

Dim URL 
Dim IE 
Set IE = CreateObject("internetexplorer.application")
URL = "http://it-asg.uhc.com/sites/gcas/pcas/archive/PCR/IVM/modlist/Lists/ElementTracker/AllItems.aspx" 
IE.Visible = True
IE.Navigate URL

そのリンクをクリックして、リンクのメニューソースのいずれかを選択するのを手伝ってくれる人はいますか

リンクの実際のソース:

<a id="zz13_ListActionsMenu" accesskey="C" href="#" onclick="javascript:return false;" style="cursor ointer;white-space:nowrap;" onfocus="MMU_EcbLinkOnFocusBlur(byid('zz8_RptControls'), this, true);" onkeydown="MMU_EcbLinkOnKeyDown(byid('zz8_RptControls'), MMU_GetMenuFromClientId('zz13_ListActionsMenu'), event);" oncontextmenu="this.click(); return false;" menutokenvalues="MENUCLIENTID=zz13_ListActionsMenu,TEMPLATECLIENTID=zz8_RptControls" serverclientid="zz13_ListActionsMenu">Actions<img src="/_layouts/images/blank.gif" border="0" alt="Use SHIFT+ENTER to open the menu (new window)."></a>

前もって感謝します

4

1 に答える 1

3

このシナリオでは、メソッド「getElementById」を使用できます。例えば：

IE.Document.getElementById("zz13_ListActionsMenu").Click

したがって、コードは次のようになります。

Dim URL 
Dim IE 
Set IE = CreateObject("internetexplorer.application")
URL = "http://it-asg.uhc.com/sites/gcas/pcas/archive/PCR/IVM/modlist/Lists/ElementTracker/AllItems.aspx" 
IE.Visible = True
IE.Navigate URL


 Do While IE.Busy
    WScript.Sleep 100
 Loop

IE.Document.getElementById("zz13_ListActionsMenu").Click

ページ上の要素にアクセスしてクリックするために使用できる他の方法もあります。リストについては、次を参照してください。

http://msdn.microsoft.com/en-us/library/ie/ms535862(v=vs.85).aspx

于 2013-09-03T16:23:46.877 に答える