tools/w32DownloadUnzip.vbs
changeset 7813 7ac83d79b897
parent 7810 da60e6b6baa3
child 9069 24a2da6e5a22
--- a/tools/w32DownloadUnzip.vbs	Wed Oct 24 13:21:18 2012 +0100
+++ b/tools/w32DownloadUnzip.vbs	Wed Oct 24 14:55:31 2012 +0100
@@ -26,12 +26,12 @@
 strHDLocation = "C:\Windows\Temp\temp.zip"
 
 ' Fetch the file
+WScript.Echo ( "Trying to download from " & strFileURL)
 Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
 objXMLHTTP.open "GET", strFileURL, false
 objXMLHTTP.send()
 
 If objXMLHTTP.Status = 200 Then
-    WScript.Echo ( "Downloading file from " & strFileURL)
     Set objADOStream = CreateObject("ADODB.Stream")
     objADOStream.Open
     objADOStream.Type = 1 'adTypeBinary
@@ -60,5 +60,5 @@
 intOptions = 16 'no user prompt
 objTarget.CopyHere objSource, intOptions
 
-WScript.Echo ( "Extraction successful" )
+WScript.Echo ( "Success!" )
 Set objShell = Nothing