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文件就可能嗎?