欧美性猛交黑人xxxx,成人毛片一区二区三区,久久综合九色综合精品,男的把j放进女人下面视频免费

ASP采集-ASP采集程序原理

  • 發布于:2020-04-21
  • 253 人圍觀

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

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

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

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

我目前所掌握的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

萬企互聯
標簽: