也来一个 需下载外部 wget.exe- @if(0)==(0) echo off
- CScript.exe -NoLogo -E:JScript %0 >$
- for /f "tokens=1*" %%i in ($) do wget -c -O %%i %%j
- del $ & pause & exit
- @end
-
- var url = "http://www.flvcd.com/parse.php?format=&kw=http%3A%2F%2Fcctv.cntv.cn%2Flm%2Fhuanqiucaijinglianxian%2F&sbt=%BF%AA%CA%BCGO%21"
- var xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
- xmlhttp.open("Get",url,false);
- xmlhttp.send();
-
- var html = new ActiveXObject("htmlfile");
- html.write(xmlhttp.responseText);
- var text = html.getElementsByTagName('a');
- var len = text.length;
- var date = new Date();
- var y = date.getFullYear();
- var m = (date.getMonth()+1)>9?(date.getMonth()+1):'0' + (date.getMonth()+1);
- var d=date.getDate()>9?date.getDate():'0' + date.getDate();
- var name = '' + y + m + d + '-'
- for (i=0; i<len; i++) {
- if (text[i].onclick) {
- var str = '' + text[i]
- var filename = name + str.replace(/.+?([^ -]*)$/,'$1');
- WScript.Echo(filename,str)
- };
- };
复制代码
|