怎么运行了什么都没啊，什么弄啊
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [原创]批处理实现网页下载(260字节)
查看 6,211 回复 18
第 16 楼
发表于 2009-04-17 03:53 · 中国 安徽 马鞍山 电信
第 17 楼
发表于 2009-04-17 05:53 · 中国 广西 南宁 电信
这个和微软的脚本很像，但以AJAX的方式实现，CSS和图片等都丢弃了。不知楼主的怎么样。
微软链接：
http://www.microsoft.com/china/technet/community/scriptcenter/other/scroth16.mspx
微软链接：
http://www.microsoft.com/china/technet/community/scriptcenter/other/scroth16.mspx
第 18 楼
发表于 2009-04-17 10:05 · 中国 湖北 黄石 电信
感谢楼主分享~~~
这里我把把1楼2段代码合并了下。
复制保存为iget.bat
iget l www.baidu.com 得到http://www.baidu.com网页中的超链接
iget s www.baidu.com 得到http://www.baidu.com网页源文件
iget t www.baidu.com 得到http://www.baidu.com网页文本
这里我把把1楼2段代码合并了下。
复制保存为iget.bat
iget l www.baidu.com 得到http://www.baidu.com网页中的超链接
iget s www.baidu.com 得到http://www.baidu.com网页源文件
iget t www.baidu.com 得到http://www.baidu.com网页文本
@echo off
more +5 <"%~f0">$get$.js
cscript /NoLogo $get$.js %1 %2&&del $get$.js
goto:eof
:::::::::::::::::::::::::::::::::::::::::::::::
if(WScript.arguments.length!=2)WScript.quit();
var url=WScript.Arguments(1);
if(!/^http:\/\//i.test(url))url="http://"+url;
if(/^$/i.test(WScript.Arguments(0))==false)WScript.quit();
oDOM=WScript.GetObject(url);
while(oDOM.readyState!="complete")WScript.sleep(100);
if(WScript.arguments(0).toLowerCase()=='l'){for(i in oDOM.links)WScript.echo(oDOM.links);WScript.quit();}
if(WScript.arguments(0).toLowerCase()=='s'){WScript.echo(oDOM.documentElement.outerHTML);WScript.quit();}
if(WScript.arguments(0).toLowerCase()=='t'){WScript.echo(oDOM.documentElement.outerText);WScript.quit();}
第 19 楼
发表于 2009-05-31 13:37 · 中国 福建 三明 电信
我抢了！
论坛跳转: