IEを使用せずにFireFoxをダウンロードする方法

VBScriptを使えばできまする。
donwload_firefox.vbs

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13


Set Http = Wscript.CreateObject("Msxml2.ServerXMLHTTP")
Http.Open "GET", "https://download-installer.cdn.mozilla.net/pub/firefox/releases/29.0/win32/ja/Firefox%20Setup%20Stub%2029.0.exe", False
Http.Send

Set Stream = Wscript.CreateObject("ADODB.Stream")
Stream.Open
Stream.Type = 1
Stream.Write Http.responseBody
Stream.SaveToFile "Firefox Setup Stub 29.0.exe", 2
Stream.Close

msgbox "完了"

※エラー処理とか全然してないのでプロダクトの参考にしてはいけない。