2013-04-29 21 views
1

下載進度我剛剛發現這個漂亮的VBS code允許從地址我下載了一些文件,包括在VBS代碼:顯示用VBS和批處理

Download "www.someadress.com", "c:\file.ext" 

Sub Download(sSource,sDest) 

    Const adTypeBinary = 1 
    Const adSaveCreateNotExist = 1 
    Const adSaveCreateOverWrite = 2 

    set oHTTP = WScript.CreateObject("Microsoft.XMLHTTP") 
    oHTTP.open "GET", sSource, False 
    oHTTP.send 
    set oStream = createobject("adodb.stream") 

    oStream.type = adTypeBinary 
    oStream.open 
    oStream.write oHTTP.responseBody 
    oStream.savetofile sDest, adSaveCreateOverWrite 
    set oStream = nothing 
    set oHTTP = nothing 

End sub 

不過雖然腳本,但它運行着:我看不到任何窗口,彈出窗口或任何東西。當文件被下載時,它會顯示在它的文件夾中。

我想用somebat.bat和我的VBS文件創建一個批處理窗口。例如,我運行我的.bat文件,並在此窗口中顯示文本"Downloading new file"和下載的百分比,如"Downloading new file .. 10%"

僅僅編輯和使用我的VBS和一個.bat文件就可能嗎?

回答

1

顯示「下載新文件」與文件的名稱是沒有問題的,但顯示其進展是。您需要一種方法,使您可以將您的下載分成幾部分,您可以按比例進行測量和繪圖,無論是圖形化進度條還是基於文本的計數器。最好的解決方案是使用像wget這樣的外部工具,它具有這樣的功能,或者使用更適合於這類工具的語言,比如Ruby,這是Vbscripters的一個自然發展。