5lr360oc6x 发表于 2016-6-9 10:10:13

http ftp down 文件 小技巧

  iRemote = "http://www.google.com/logos/piday10-hp.gif"  // 远程文件,使用ftp 亦可
iLocal = "piday10-hp.gif"   // 欲保存的本地文件名
Set xPost = CreateObject("Microsoft.XMLHTTP")
xPost.Open "GET",iRemote,0
xPost.Send()
Set sGet = CreateObject("ADODB.Stream")
sGet.Mode = 3
sGet.Type = 1
sGet.Open()
sGet.Write(xPost.responseBody)
sGet.SaveToFile iLocal,2
===================
运行方式:
1、命名为.vbs文件,直接点击运行。
  2、命名为.vbs文件,在cmd中 > cscript ***.vbs
  
页: [1]
查看完整版本: http ftp down 文件 小技巧