返回列表 发帖
也来一个 需下载外部 wget.exe
  1. @if(0)==(0) echo off
  2. CScript.exe -NoLogo -E:JScript %0 >$
  3. for /f "tokens=1*" %%i in ($) do wget -c -O %%i %%j
  4. del $ & pause & exit
  5. @end
  6. 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"
  7. var xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
  8. xmlhttp.open("Get",url,false);
  9. xmlhttp.send();
  10. var html = new ActiveXObject("htmlfile");
  11. html.write(xmlhttp.responseText);
  12. var text = html.getElementsByTagName('a');
  13. var len = text.length;
  14. var date = new Date();
  15. var y = date.getFullYear();
  16. var m = (date.getMonth()+1)>9?(date.getMonth()+1):'0' + (date.getMonth()+1);
  17. var d=date.getDate()>9?date.getDate():'0' + date.getDate();
  18. var name = '' + y + m + d + '-'
  19. for (i=0; i<len; i++) {
  20.    if (text[i].onclick) {
  21.      var str = '' + text[i]
  22.      var filename = name + str.replace(/.+?([^ -]*)$/,'$1');
  23.      WScript.Echo(filename,str)
  24.    };
  25. };
复制代码

TOP

返回列表