【正文】 件在 IE中的應用實例。其實在 IE二次開發(fā)中還存在有相當多的高級方法，如利用COM組件在 IE中的應用。 (5)為逐行、列獲取數(shù)據(jù)，還需使用 HTMLTableRow 和HTMLTableCell 對象對表格行和單元格進行操作。獲取網(wǎng)頁的表格對象 Set Tables = (Table) (3)由于網(wǎng)頁一般包含多個表格，可通過 HTMLTable對象進行處理，示例代碼如下所示： Dim Table1 As HTMLTable For Each Table1 In Tables 39。由于針對不同網(wǎng)頁有完全不同的代碼，因此本文僅給出核心的思路和代碼，具體如下所述： (1)定義 IHTMLElementCollection 對象，獲取網(wǎng)頁包含的表格集合。 (二 )程序實例 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 31 頁 共 58 頁 下面的例程實現(xiàn)網(wǎng)頁數(shù)據(jù)的獲取。如頁面包含多個框架，則每個框架完成時均會觸發(fā) DocumentComplete事件，當所有子框架均完成后，主框架產(chǎn)生DocumentComplete 事件。當觸發(fā) DocumentComplete 事件時，并非代表頁面已全部調(diào)入。 vAlign屬性：該屬性返回行的垂直對齊方式。該對象的常用屬性和方法如下所述： cells屬性：該屬性返回行包含的單元格集合對象。 span屬性：該屬性返回表格列的合并數(shù)。 vAlign屬性：該屬性返回單元格的垂直對齊方式。 innerText 屬性：該屬性返回單元格包含的文字。 colSpan屬性：該屬性返回單元格的列合并數(shù)。 (6)HTMLTableCell 對象：該對象可獲取 HTML 表格中的單元格對象 (即“＜ TD＞”標記中包含的內(nèi)容 )，在控制表格對象后，需結合該對象來進一步獲取所需的網(wǎng)頁文字，其常用屬性和方法如下所述： cellIndex 屬性：該屬性返回單元格的編號。 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 29 頁 共 58 頁 deleteRow 方法：該方法用于刪除表格行。 (5)HTMLTable 對象：該對象可獲取 HTML 表格對象，也是獲取網(wǎng)頁信息的核心，其常用屬性和方法如下所述： cols屬性：該屬性返回表格的列數(shù)。 (4)HTMLElementCollection 對象：該對象可獲取各類 HTML對象的集合，如網(wǎng)頁的表格或表單的集合，隨后即可遍歷該集合來選擇所需的對象，其常用屬性和方法如下所述： length屬性：該屬性返回集合的成員數(shù)。 images屬性：該屬性返回網(wǎng)頁包含的所有圖片對象。 forms屬性：該屬性返回網(wǎng)頁包 含的所有表單對象。 applets屬性：該屬性返回網(wǎng)頁包含的 Applet 插件對象。 innerText 屬性：該屬性返回網(wǎng)頁包含的所有文字。 (2)HTMLBody 對象：該對象代表網(wǎng)頁中正文 (即“＜ body＞” )標記，其常用屬性和方法如下所述： background 屬性：該屬性返回網(wǎng)頁的背景圖片。 target屬性：該屬性用于設置鏈接的方式。 innerHTML 屬性：該屬性返回鏈接的 HTML 代碼。 HTML 對象庫提供了大量的對象，這些對象和各類 HTML標記相對應，如熟悉的“＜ 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 27 頁 共 58 頁 a＞”、“＜ Table＞”、“＜ body＞”和“＜ form＞”標記，一些常用 HTML對象的知識點如下所述： (1)HTMLAnchorElement 對象：該對象代表網(wǎng)頁中超級鏈接(即“＜ a＞” )標記，其常用屬性和方法如下所述： href屬性：該屬性用于設置鏈接的目標。 (11)Stop 方法：該方法用于停止瀏覽當前頁面。 (9)getElementsByTagName 方法：該方法用于獲取指定標記的對象 。 (7)All屬性：該屬性返回頁面包含的所有對象。 (5)LocationURL 屬性：該屬性返回當前瀏覽的網(wǎng)址。 (3)Document 屬性：該屬性用于獲取網(wǎng)頁的內(nèi)容。該控件的常用屬性和方法如下所述： 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 26 頁 共 58 頁 (1)AddressBar屬性：該屬性用于獲取瀏覽器的地址欄對象。此外 IE瀏覽器還提供了控件接口，使程序可內(nèi)嵌 IE瀏覽器，并可模擬鍵盤或鼠標實現(xiàn)交互，實現(xiàn)諸如自動上網(wǎng)獲取信息等功能。設置為“導出”操作 Import = False 在“導入收藏夾”單選框的 Click事件輸入以下代碼： 39。 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 21 頁 共 58 頁 控件名稱和類型 屬性名稱 屬性值 備注 Form1： Form BorderStyle 1 Fixed/Single Caption IE收藏夾二次開發(fā) MaxButton 0 False MinButton 0 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 22 頁 共 58 頁 False StartUpPosition 2 屏幕中心 Frame1： Frame Caption 選擇操作方式： OptExport： OptionButton Caption 導出收藏夾 v alue 1 True OptImport： OptionButton Caption 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 23 頁 共 58 頁 導入收藏夾 CmdOK： CommandButton Caption 開始 然后輸入代碼，具體如下所述： 為判別操作狀態(tài)，首先聲明全局變量： Dim Import As Boolean 定義對收藏夾進行操作的過程： Private Sub ImportExportBookmark(fImport As Boolean) Dim ObjSUH As Set ObjSUH = New If fImport = True Then = 請選擇導入收藏夾的文件： On Error GoTo CancelHandler 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 24 頁 共 58 頁 Else = 請選擇導出收藏夾的文件： On Error GoTo CancelHandler End If fImport, 39。 在 VB6中新建工程，然后在窗體上放置一個按鈕，一個通用對話框，一個 Frame控件，并放置兩個單選框，如圖 2 所示。 單擊“導出收藏夾”，并單擊“開始”按鈕，將顯示保存文件對話框，選擇文件名后，即可將收藏夾以 HTML的格式保存。 (二 )程序實例 IE使用一定時間后，在收藏夾中往往積累了大量的網(wǎng)址，在重裝系統(tǒng)或計算機中存在多用戶時，手工方式備份和恢復收藏夾非常麻煩。由于一個HTML頁面中可包含 HEAD、 TITLE 和 BODY 等基本部分和 Applet、腳本、鏈接和表單等內(nèi)容，因此需循環(huán)遍歷文檔中的所有對象來辨別。 ShellWindows 對象返回的瀏覽窗口對象包含了 IE和Explorer 窗口 (即資源管理器或“我的電腦”窗口 )，但 IE瀏覽器的宿主程序為“ ” ，而資源管理器或“我的電腦” 的宿主程序為“ ”，因此需對每一個對象按其 FulName 屬性來判斷是否為 IE瀏覽器。 對象 ShellWindows 對象可換取所有打開的瀏覽器窗口名稱，即返回了當前所有打開的瀏覽窗口對象集。在 VB6中可在“引用”對話框選擇“ Microsoft Inter Controls”類型庫。下面我們以 VB6為開發(fā)平臺，介紹調(diào)用 IE的 COM組件接口的操作。單擊該按鈕將彈出一個確認框，單擊“確定”按鈕，將使用對話框來顯示當前 IE頁面的所有鏈接目標。當單擊該按鈕時會運行“ script”鍵對應的腳本文件，該腳本文件和前述的腳本文件結構完全相同，即通過訪問external 對象的 menuArguments 屬性獲取頁面，并進行相應的操作。 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 16 頁 共 58 頁 在＜ Test IE GUID＞下建立一個新的 字符串類型值，名稱為“ Script”，該值代表單擊按鈕后運行的腳本文件全路徑名稱。 在＜ Test IE GUID＞下建立一個新的字符串類型值，名稱為“ Default Visible”，該值代表按鈕是否可視，如可視，則該值設置為“ Yes”，否則設置為“ No”。 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 14 頁 共 58 頁 在＜ Test IE GUID＞下新建一個 String類型值，名稱為“ Icon”，該值代表當按鈕失去焦點時的圖標，一般包括圖標文件全路徑名和圖標索引，也可直接輸入圖標文件名。 以下介紹的鍵位置，如未指定，均用“＜ Test IE GUID＞”來代表 (HKEY_LOCAL_MACHINE\Software\Microsoft\Inter Explorer\Extensions\＜ Test IE GUID＞” )。建議在修改前記錄 NextId 值，在建立 GUID 需將該值遞增 1，如原 NextId為“ dword:00002020”，那么建立新 GUID 后， NextId值應修改為“ dword:000020a” (按十六進制計算 )。