亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > ASP > 正文

淺談ASP采集程序的原理_ASP教程

2024-05-04 11:04:05
字體:
來源:轉載
供稿:網友

推薦:ASP與ACCESS鏈接
本文例舉了ASP實例關于ASP與ACCESS鏈接的兩種方式。 以下為引用的內容: %dim dd,connstrdd=data.mdbconnstr=&q

采集程序的主要步驟如下:

一、獲取被采集的頁面的內容

二、從獲取代碼中提取所有用的數據

 

 

一、獲取被采集的頁面的內容

我目前所掌握的ASP常用獲取被采集的頁面的內容方法:

1、用serverXMLHTTP組件獲取數據

以下內容為程序代碼:

以下為引用的內容:
Function GetBody(weburl)
'創建對象
Dim ObjXMLHTTP
Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP")
'請求文件,以異步形式
ObjXMLHTTP.Open "GET",weburl,False
ObjXMLHTTP.send
While ObjXMLHTTP.readyState <> 4
ObjXMLHTTP.waitForResponse 1000
Wend
'得到結果
GetBody=ObjXMLHTTP.responseBody
'釋放對象
Set ObjXMLHTTP=Nothing
End Function

調用方法:
GetBody(文件的URLf地址)


2、或XMLHTTP組件獲取數據

以下內容為程序代碼:

以下為引用的內容:

Function GetBody(weburl)
'創建對象
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
With Retrieval
.Open "Get", weburl, False, "", ""
.Send
GetBody = .ResponseBody
End With
'釋放對象
Set Retrieval = Nothing
End Function


調用方法:
GetBody(文件的URLf地址)


這樣獲取的數據內容還需要進行編碼轉換才可以使用

以下內容為程序代碼:

以下為引用的內容:
Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

調用方法:BytesToBstr(要轉換的數據,編碼)'編碼常用為GB2312和UTF-8


二、從獲取代碼中提取所有用的數據
目前我掌握的方法有:
1、用ASP內置的MID函數截取需要的數據

以下內容為程序代碼:

Function body(wstr,start,over)
start=Newstring(wstr,start)
'設置需要處理的數據的唯一的開始標記
over=Newstring(wstr,over)
'和start相對應的就是需要處理的數據的唯一的結束標記
body=mid(wstr,start,over-start)
'設置顯示頁面的范圍

End Function
調用方法:body(被采集的頁面的內容,開始標記,結束標記)


2、用正則獲取需要的數據

以下內容為程序代碼:

Function body(wstr,start,over)
Set xiaoqi = New Regexp'設置配置對象
xiaoqi.IgnoreCase = True'忽略大小寫
xiaoqi.Global = True'設置為全文搜索
xiaoqi.Pattern = "”&start&“. ?”&over&“"'正則表達式
Set Matches =xiaoqi.Execute(wstr)'開始執行配置
set xiaoqi=nothing
body=""
For Each Match in Matches
body=body&Match.Value '循環匹配
Next
End Function
調用方法:body(被采集的頁面的內容,開始標記,結束標記)


采集程序祥細思路:
1、取得網站的分頁列表頁的每頁地址
目前絕大部分動態網站的分頁地址都有規則,如:
動態頁
第一頁:index.asp?page=1
第二頁:index.asp?page=2
第三頁:index.asp?page=3
.....
靜態頁
第一頁:page_1.htm
第二頁:page_2.htm
第三頁:page_3.htm
.....
取得網站的分頁列表頁的每頁地址,只需要用變量替代每頁地址的變化的字符即可如:page_<%="&page&"%>.htm
2、獲取被采集網站的分頁列表頁內容
3、從分頁列表代碼中提取被采集的內容頁面的URL連接地址
絕大部分分頁頁面里的內容頁連接也有固定規則,如:
連接1

連接2

連接3

用以下代碼就可以獲得一個URL連接集合

以下內容為程序代碼:

以下為引用的內容:
Set xiaoqi = New Regexp
xiaoqi.IgnoreCase = True
xiaoqi.Global = True
xiaoqi.Pattern = ””“. ?”““
Set Matches =xiaoqi.Execute(頁面列表內容)
set xiaoqi=nothing
url=""
For Each Match in Matches
url=url&Match.Value
Next

4、取得被采集的內容頁面內容,根據”提取標記“從被采集的內容頁面分別截取要取得的數據
因為是動態生成的頁面,大多數內容頁面內都有相同的html標記,我們可以根據這些有規則的標記提取需要的各個部分的內容。
如:
每個頁面都有網頁標題,用我上面寫的MID截取函數就可以獲得之間的值,也可以用正則表達式來獲得。
例:body("","")

分享:如何使用ASP訂制自己的XML文件讀寫方法
在此之前,我寫了兩篇關于ASP結合XML的貼子,分別介紹了用XML取代數據庫和用XML整合數據庫這兩方面的技術,讓數據庫在某種情況下不再是我們的唯一選擇。而XML跟傳統數據庫相比,更有以下優

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
亚洲色图在线观看| 欧美成人亚洲成人日韩成人| 国产精品99久久久久久人| 欧美黑人国产人伦爽爽爽| 成人观看高清在线观看免费| 日韩精品在线看| 欧美国产日韩中文字幕在线| 久久人人爽亚洲精品天堂| 亚洲人午夜精品| 欧美激情视频在线观看| 亚洲欧美国产日韩中文字幕| 91久久国产精品| 成人激情春色网| 久久久精品视频在线观看| 2023亚洲男人天堂| 国产精品第三页| 久久久99免费视频| 国产精品精品视频一区二区三区| 色悠久久久久综合先锋影音下载| 欧美午夜www高清视频| 日本久久精品视频| 国产精品一区二区电影| 国产精品视频在线播放| 成人欧美一区二区三区在线湿哒哒| 亚洲综合av影视| 亚洲xxxx3d| 日本亚洲欧美成人| 亚洲一品av免费观看| 日韩亚洲成人av在线| 91av在线影院| 亚洲女人天堂网| 亚洲高清福利视频| 欧美在线激情视频| 成人av.网址在线网站| 久久99久久99精品免观看粉嫩| 国产精品免费网站| 亚洲欧洲在线看| 亚洲精品中文字幕av| 亚洲天天在线日亚洲洲精| 一本色道久久88精品综合| 91精品国产99久久久久久| 亚洲欧美制服综合另类| 777国产偷窥盗摄精品视频| 亚洲第一中文字幕在线观看| 国产精品久久久久久久电影| 91性高湖久久久久久久久_久久99| 亚洲人成亚洲人成在线观看| 久久久国产精品视频| 欧美成人精品h版在线观看| 日韩激情av在线播放| 午夜精品理论片| 欧美成人全部免费| 亚洲最大在线视频| 亚洲国产精品成人av| 成人黄色激情网| 国产精品久久久久久久app| 成人免费在线视频网站| 国产成人av网址| 亚洲999一在线观看www| 欧美二区乱c黑人| 国产精品一区av| 97久久久久久| 精品国产一区二区三区四区在线观看| 精品av在线播放| 欧美亚洲激情视频| 91久久久在线| 久久综合免费视频| 日韩欧美亚洲综合| 韩国一区二区电影| 中文日韩电影网站| 久久国产精品影视| 久久夜色精品国产欧美乱| 精品亚洲一区二区三区四区五区| 久久久久国色av免费观看性色| 欧美高清在线观看| 欧美猛少妇色xxxxx| 国产一区欧美二区三区| 国产亚洲一区二区在线| 欧美乱大交xxxxx另类电影| 国产精品视频区| 国产精品亚洲网站| 日韩电视剧免费观看网站| 国产亚洲欧洲在线| 欧美精品18videosex性欧美| www.日本久久久久com.| 国产69久久精品成人| 欧美电影免费观看高清完整| 亚洲新声在线观看| 欧美日韩国产一中文字不卡| 91精品视频免费观看| 91性高湖久久久久久久久_久久99| 久久网福利资源网站| 久久久久久国产精品三级玉女聊斋| 欧美日韩视频免费播放| 国产精品中文久久久久久久| 国产精品福利在线观看网址| 国产噜噜噜噜久久久久久久久| 一区二区在线免费视频| 精品自拍视频在线观看| 国产91色在线免费| 日韩有码在线电影| 啪一啪鲁一鲁2019在线视频| 国产精品久久久久久久久久久久久久| 992tv在线成人免费观看| 97香蕉超级碰碰久久免费软件| 国产丝袜精品视频| 色偷偷av亚洲男人的天堂| 一区二区亚洲精品国产| 国产精品∨欧美精品v日韩精品| 日韩成人网免费视频| 色与欲影视天天看综合网| 亚洲欧美国产一区二区三区| 成人深夜直播免费观看| 国产成人精品一区二区在线| 亚洲国产成人久久综合一区| 国产午夜精品视频| 欧美一区第一页| 亚洲美女性视频| 亲子乱一区二区三区电影| 亚洲摸下面视频| 91影院在线免费观看视频| 欧美成aaa人片免费看| 91中文字幕在线观看| 亚洲人成在线免费观看| 久久久999精品视频| 亚洲欧美日韩在线一区| 性欧美视频videos6一9| 26uuu国产精品视频| 欧美与黑人午夜性猛交久久久| 欧美亚洲另类在线| 中文字幕自拍vr一区二区三区| 91av在线免费观看视频| 亚洲高清久久网| 亚洲第一视频网| 精品中文字幕在线2019| 国产在线观看一区二区三区| 91精品国产高清久久久久久久久| 国产精品入口日韩视频大尺度| 永久555www成人免费| 97久久精品在线| 国产精品欧美风情| 91福利视频网| 亚洲少妇激情视频| 中文字幕亚洲专区| 亚洲一区制服诱惑| 性色av一区二区三区在线观看| 亚洲3p在线观看| 日本精品视频网站| 欧美大片免费观看在线观看网站推荐| 欧美在线视频观看免费网站| 日韩av不卡电影| 欧美精品videosex极品1| 欧美大片第1页| 最近日韩中文字幕中文| 国产一区二区日韩精品欧美精品| 日本午夜精品理论片a级appf发布| 欧美最猛黑人xxxx黑人猛叫黄| 欧美午夜性色大片在线观看| 欧美成年人视频网站| 欧美日韩国产精品一区二区三区四区| 国产视频久久久久| 精品国产精品三级精品av网址| 俺也去精品视频在线观看| 国产午夜精品全部视频播放|