大家把下面的代码保存为.vbs 为后缀的文件，然后双击  就可以安装迅雷了
       Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET","http://down.sandai.net/Thunder5.7.6.426.exe",0
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile "临武男孩.exe",2

发错地方了···