| 查看: 1395 | 回复: 1 | ||
[求助]
如何用bat保存网页
|
|
各位大佬，我想用bat写一个保存网页的脚本，遇到了问题，用网上的方法保存下来的网页信息不完整（http://221.237.179.75:9090/scszj ... blish/preview.xhtml），另外，怎么实现以时间命名啊，我每天都想保存一个网页。先谢谢大佬了！ 下面是网上找的，但是保存的网页打开后信息不完整，我需要右边的具体数据。。。 set Url=http://221.237.179.75:9090/scszjcsj/szjc_sj/DataPublish/preview.xhtml set Save=D:\document for %%a in ("%Url%"  do set "FileName=%%~nxa"if not defined Save set "Save=%cd%" (echo Download Wscript.Arguments^(0^),Wscript.Arguments^(1^) echo Sub Download^(url,target^) echo Const adTypeBinary = 1 echo Const adSaveCreateOverWrite = 2 echo Dim http,ado echo Set http = CreateObject^("Msxml2.ServerXMLHTTP"^) echo http.open "GET",url,False echo http.send echo Set ado = createobject^("Adodb.Stream"^) echo ado.Type = adTypeBinary echo ado.Open echo ado.Write http.responseBody echo ado.SaveToFile target echo ado.Close echo End Sub)>DownloadFile.vbs DownloadFile.vbs "%Url%" "%Save%\%FileName%" del DownloadFile.vbs |
回复此楼» 猜你喜欢
售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急
已经有3人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有3人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有3人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有4人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有7人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有7人回复
-
科研人应该花精力去思考如何解决问题，而不是去凝练问题
已经有19人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有8人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有8人回复
2楼2018-08-31 00:53:31
