1

VB スクリプトをバックグラウンドで URL に移動させたいと考えています。バックグラウンドでブラウザを開き、後で閉じることができます。「沈黙」が多いほど良い。私のマシンでは動作するが別のマシンでは動作しない 2 つの実装がありました。

Set WshShell = WScript.CreateObject("WScript.Shell") 
Return = WshShell.Run("iexplore.exe " &  myURL, 1)

ここに別のものがあります：

Set objExplorer = WScript.CreateObject _
("InternetExplorer.Application", "IE_")
objExplorer.Navigate myURL
'Determines if the window is visible or not
objExplorer.Visible = 0
'Suspend the script for 1 minute
WScript.Sleep 6000
'Close the IE (instantiated) window
objExplorer.quit

...ここで、myURL は URL を含む文字列変数です。

上記のいずれかがラップトップでは機能するのにサーバーでは機能しない理由がわかりません。どんな助けでも大歓迎です。

4

2 に答える 2

5

サイレント アプローチを探している場合は、Internet Explorer COM オブジェクトを完全に削除して、XMLHttpRequestオブジェクトを使用することをお勧めします。

myURL = "http://www.google.com/"

Set req = CreateObject("MSXML2.XMLHTTP.6.0")
req.Open "GET", myURL, False
req.Send

WScript.Echo req.ResponseText
于 2013-02-12T15:25:15.577 に答える
-1 
Set WshShell = WScript.CreateObject("WScript.Shell") 
Return = WshShell.Run("iexplore.exe " &  myURL, 1) 
WScript.Sleep 10000
WshShell.SendKeys "{F6}"
WScript.Sleep 500
WshShell.SendKeys "y"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "t"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "e"
WScript.Sleep 500
WshShell.SendKeys "{ENTER}"
WScript.Sleep 500
于 2013-11-29T03:29:16.583 に答える