Xinsoft ：应用之美，在于药到病除

［转载］在CMD中下载文件- -

                                      

引用网址：http://blog.blogchina.com/article_61854.326000.html
作者：赤紅十　来源：天极



在CMD中一条一条地敲如下语句：


echo Set xPost = CreateObject("Microsoft.XMLHTTP") >webdown.vbs
echo xPost.Open "GET","/Article/UploadFiles/200411/20041125010237726.gif",0 >>webdown.vbs
echo xPost.Send() >>webdown.vbs
echo Set sGet = CreateObject("ADODB.Stream") >>webdown.vbs
echo sGet.Mode = 3 >>webdown.vbs
echo sGet.Type = 1 >>webdown.vbs
echo sGet.Open() >>webdown.vbs
echo sGet.Write(xPost.responseBody) >>webdown.vbs
echo sGet.SaveToFile "logo.gif",2 >>webdown.vbs


敲完之后运行    cscript webdown.vbs    这样，一个文件就被下载到当前的目录。


其中/Article/UploadFiles/200411/20041125010237726.gif是要下载的文件的路径，logo.gif是下载后保存的文件名。


上面的代码就是把echo后面的语句直接写到webdown.vbs文件中，所以上面的效果也可以这样实现，把以下的代码存为*.vbs文件，双击运行就可以了。


Set xPost = CreateObject("Microsoft.XMLHTTP")  
xPost.Open "GET","/Article/UploadFiles/200411/20041125010237726.gif",0  
xPost.Send()  
Set sGet = CreateObject("ADODB.Stream")  
sGet.Mode = 3  
sGet.Type = 1  
sGet.Open()  
sGet.Write(xPost.responseBody)  
sGet.SaveToFile "ftp1.gif",2

- 作者： Xinsoft 2004年12月2日, 星期四 08:55 加入博采