其它 媒體動畫 電腦基礎 硬件教程 網絡安全
function gethttppage(url)dim httpset http=createobject("MICROSOFT.XMLHTTP")http.open "GET",url,falsehttp.send()if http.readystate<>4 thenexit functionend ifgethttppage=bytestostr(http.responseBody,"GB2312")if err.number<>0 then err.clearend function
function bytestostr(body,cset)dim objstreamset objstream=createobject("adodb.stream")objstream.type=1objstream.mode=3objstream.openobjstream.write bodyobjstream.position=0objstream.type=2objstream.charset=csetbytestostr=objstream.readtextobjstream.closeset objstream=nothingend function
function savetofile(bodyall,filename)dim objstream1set objstream1=createobject("adodb.stream")objstream1.type=2objstream1.openobjstream1.position=objstream1.sizeobjstream1.writetext bodyallobjstream1.savetofile filename,2objstream1.closeset objstream1=nothingend function
dim url,httpurl="http://www.86516.com"html=gethttppage(url)'msgbox htmlsavefilename="index1.htm"savetofile html,savefilename
XMLHTTP批量抓取遠程資料
也談采集入庫的技術
獨孤劍寫的馬克斯迅雷片庫采集插件1.4 官方最新版提供下載了
如何寫ASP入庫小偷程序
vbs或asp采集文章時網頁編碼問題
asp下用ADODB.Stream代替FSO讀取文本文件
asp下利用XMLHTTP 從其他頁面獲取數據的代碼
藍色空間 天氣小偷
XML相關技術資料
asp讀取遠程文件并保存到本地代碼
關于我們 - 廣告合作 - 聯系我們 - 免責聲明 - 網站地圖 - 投訴建議 - 在線投稿
©CopyRight 2006-2024 JB51.Net