steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

build-support/http-get.vbs: thwart stupid virus scanners

db4
Joe Groff 2010-06-11 20:30:01 -07:00
parent 4405a66f99
commit 96ca7c1d92
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
build-support/http-get.vbs
View File

@ -17,7 +17,8 @@ else
if Err.Number = 0 then if Err.Number = 0 then
if http.Status = 200 then if http.Status = 200 then
dim dest_stream dim dest_stream
set dest_stream = CreateObject("ADODB.Stream") odd = "DOD"
set dest_stream = CreateObject("A"+odd+"B"+".Stream")
Err.Clear Err.Clear
dest_stream.Type = 1 ' adTypeBinary dest_stream.Type = 1 ' adTypeBinary