2016-04-28 69 views
0

一些背景 第一種解決方案:我已經構建了一個使用文本數據源導入所需數據的Excel解決方案。 我選擇了這個方法作爲發送數據的URL將發送一個csv文件。一旦收到數據,許多過程和條件必須應用於此。Vb腳本獲取超時錯誤

引起關注的原因:這需要花費很多時間才能獲得超過6分鐘的數據。這導致Excel掛起。

在我的第二個類似的解決方案中: - 我選擇了從Excel中調用VB腳本來完成數據的下載。這對這個解決方案非常有效。 現在,我想爲第一個解決方案實現此方法。

我的主要問題:在第二個解決方案中使用的VB腳本失敗,出現以下錯誤。

錯誤: - C:\用戶用戶ID- \桌面\腳本\ download_moni.vbs(15,1)msxml6.dll:操作超時

我給VB Script代碼: -

Set args = WScript.Arguments 
Url = "url given here" 
dim xHttp: Set xHttp = createobject("MSXML2.ServerXMLHTTP.6.0") 
dim bStrm: Set bStrm = createobject("Adodb.Stream") 
xHttp.Open "GET", Url, False 'Open socket to get the website 
xHttp.Send 'send request 
with bStrm 
.type = 1 '//binary 
.open 
.write xHttp.responseBody 
.savetofile "C:\Ticket\Monitoring.csv", 2 '//overwrite 
end with 
wscript.echo("Download complete") 

請讓我知道如何解決超時錯誤。

+0

VBScript IsNot VB.NET –

+0

我知道這一點。但是,你的意思是? –

+0

你已經用'vb.net'標記了,儘管這與VB.NET無關。順便說一下,我刪除了該標籤。 –

回答

1

你說「需要花費很多時間才能獲得超過6分鐘的數據。」然而,您正在使用的磁帶庫的默認超時時間似乎是30秒(source)。

我不熟悉您正在使用的MSXML2.ServerXMLHTTP庫,但Google reveals有一個setTimeouts method,它可用於增加庫的各種超時。

+0

@Downvoter:反饋表示讚賞。 – Heinzi

+0

你有一個很好的觀點。 –