Direct Streaming in VBS

You can use XMLHTTP in vbs also to do direct streaming.

Dim msXHttp
Set msXHttp = CreateObject("MSXML2.ServerXMLHTTP")
msXHttp.Open "GET", "http://www.google.com/", False
'msXHttp.Open "GET", " http://www.google.com/", False, Username, Password
msXHttp.send

If msXHttp.Status <> 200 Then
'Error
msgbox msXHttp.Status
Else
Dim downloadedData
downloadedData = msXHttp.responseText
msgbox downloadedData
End If