asp百度搜索结果采集程序

时间：2013-05-19 05:12:56
【文件属性】：

文件名称：asp百度搜索结果采集程序

文件大小：9KB

文件格式：RAR

更新时间：2013-05-19 05:12:56

采集程序 asp 百度 搜索结果采集

可以实现在自己的网站实现百度搜索效果。演示地址：http://www.cnpatent.com/search/so_index.asp?str_key=%B5%E7%D7%D3 百度的页面代码有点改动，可以用下的替换。 http://www.cnpatent.com/换成自己的地址 TitleStarStr="百度一下，" TitleEndStr="秒

" TitleStrType=2 CreateTitle=Trim(RemoveHTML(strCut(getHTTPPage,TitleStarStr,TitleEndStr,TitleStrType))) 'if Instr(getHTTPPage,"来百度推广您的产品")>0 then 'ContentStarStr="咨询热线：400-800-8888" 'else 'ContentStarStr="来百度推广"&str_key&"" 'end if ContentStarStr="e.baidu.com

" ContentEndStr="下一页
" ContentStrType=2 PageContent=strCut(getHTTPPage,ContentStr,ContentEnd,StrType) CreateContent="" 'CreateContent=Replace(CreateContent,"s?wd=","http://www.baidu.com/s?wd=") CreateContent=Replace(CreateContent,"s?wd=","http://www.cnpatent.com/search/so_index.asp?wd=")

立即下载

【文件预览】：
新建文件夹
----so_index.asp(6KB)
----index_baidu.css(2KB)
----js()
--------search.js(2KB)
--------Tkl_PageList.js(3KB)
----说明.txt(32B)
----cookies.asp(757B)
----style.css(2KB)
----cj_fun.asp(5KB)
----right_key.asp(1KB)

网友评论

  • 不错，学习了。其中的页面跳转很有用
  • 老是报错，不知道哪儿没有配置好。
  • 用不了！错误的！根本调试不了

相关文章