本帖最后由 pcl_test 于 2016-9-4 17:01 编辑
获取百度搜索结果中的链接- //&cls&cscript -nologo -e:jscript "%~f0"&pause&exit
-
- var keyword = 'bbflash 破解版'; //指定搜索关键字
- var n=10; //指定需获取搜索结果的总页数
- for(var i=0;i<(n*10);i+=10)GetURL(i, keyword);
-
- function GetURL(page, str){
- var url = 'https://www.baidu.com/s?pn='+page+'&ie=utf-8&wd='+encodeURIComponent(str);
- try{var http = new ActiveXObject('MSXML2.XMLHTTP')}
- catch(e){var http = new ActiveXObject('WinHttp.WinHttpRequest.5.1')}
- http.open('GET', url, false);
- http.send();
- var htmltext = http.ResponseText;
- var reg = new RegExp('<h3\\s?[^<]*?>[\\s\\S]*?<a\\s?[^<]*?(data-click=[^<]+?)?href\\s*?=\\s*?"([^"]+)"[^<]+?>([\\s\\S]+?)<\\/a>', 'ig');
- var result='', m=0, t=page/10+1;
- WSH.echo('-----------------------第'+t+'页搜索结果-----------------------');
- while((result = reg.exec(htmltext)) != null){
- m++;
- WSH.echo(t+'-'+m+'、'+result[3].replace(/<\/?em>/ig, '')+'\r\n百度加密链接:'+result[2]);
- http.open('GET', result[2]+'&wd=', false);
- http.send();
- WSH.echo('原链接:'+http.ResponseText.match(/URL='([^']+)'/)[1]+'\r\n');
- }
- http=null;
- }
复制代码 结果如下:
|