grabbing an HTML page from another webserver

Hello Rydel,

Try the following stripped down script. sURL can be data per client request. You do not need to save file, of course. The data stream responseBody before saving the where you can manipulate to your need.

'-----
Option Explicit

Const sPath = ".\"
Const sURL="Const sSavedFileName="329-626934.htm"

Dim sSavedFullFileName
sSavedFullFileName=sPath & sSavedFileName

WScript.echo "start downloading : "&sURL
GrabberEngine sSavedFullFileName, sURL
WScript.Echo "Download of " & sURL & " to " & sSavedFullFileName & " is complete."

Sub GrabberEngine(sFile, sURL)
const adTypeBinary = 1
const adModeReadWrite = 3
const adSaveCreateOverwrite = 2
'Error handle adding here particularly after oXML.send if no connection avail
'Without, let the script failed at runtime.
Dim oXML,oStream
set oXML = CreateObject("Microsoft.XMLHTTP&quot
oXML.open "GET", sURL, False
oXML.send
Set oStream=CreateObject("ADODB.Stream&quot
With oStream
.type = adTypeBinary
.mode = adModeReadWrite
.open
On Error Resume Next
Do
Wscript.Sleep 250
.write oXML.responseBody
Loop Until Err.number = 0
On Error Goto 0
.savetofile sFile, adSaveCreateOverwrite
End With
Set oStream=Nothing
End Sub
'-----

regards - tsuji