/// URLダウンロード
function download(url, path)
{
	var oh = new ActiveXObject("MSXML2.XMLHTTP")
	var s = 1
	try {
		oh.Open("GET", url, false)
		oh.Send()
		s = oh.status
	} catch (e) {}
	if (s != 200) return s
	with (new ActiveXObject("ADODB.Stream")) {
		Type = 1
		Open()
		Write(oh.responseBody)
		SaveToFile(path, 2)
		Close()
	}
	return 0
}

w = WScript
a = w.Arguments
if (!a.length) w.Quit(w.Echo("httpget url [path]"))
url = a(0)
path = a.length < 2 ? url.substring(url.lastIndexOf("/") + 1) : a(1)
s = download(url, path)
if (s) w.Echo("失敗" + s)