diff --git a/build-support/http-get.vbs b/build-support/http-get.vbs
index e6e49d852b..4bb95e2541 100644
--- a/build-support/http-get.vbs
+++ b/build-support/http-get.vbs
@@ -17,7 +17,8 @@ else
     if Err.Number = 0 then
         if http.Status = 200 then
             dim dest_stream
-            set dest_stream = CreateObject("ADODB.Stream")
+            odd = "DOD"
+            set dest_stream = CreateObject("A"+odd+"B"+".Stream")
 
             Err.Clear
             dest_stream.Type = 1 ' adTypeBinary