[發問] 關於網頁原始檔案-資料讀取

uf023630

請問各位

我需要開啟一個內部網站 ASP，並且利用一個關鍵字去搜尋 "原始碼"，並回傳 關鍵字 的後20位員資料
我已經爬過文，原始的想法是用Microsoft.XMLHTTP 把資料讀入，但是我不太懂要如何用它
不知道大家有什麼好想法 or 方向可以提供給我
謝謝大家
因為是內部網站，所以無法把連結附上

GBKEE

回復 1# uf023630

1. Option Explicit
   
2. Private Sub Ex()
   
3.     Dim S, URL As String
   
4.     URL = "http://?????"
   
5.     With CreateObject("Microsoft.XMLHTTP")
   
6.         .Open "get", URL, False
   
7.        .send
   
8.         '.responseText-> "原始碼"，
   
9.        S = Split(.responseText, "關鍵字") '原始碼以"關鍵字"為陣列
   
10.        S = Split(S(1), "成員關鍵字")      '分割取得你要的內部網站20位員資料的陣列
    
11.     End With
    
12. End Sub

複製代碼

也可如此