在Visual FoxPro 5.0中啟用Internet Explorer

目前，Internet/ Intranet技術已日趨成熟，構造企業級Intranet已被越來越多的
企業所採納。Intranet是採用Internet技術構造企業內連網絡，它既可以實現企業
內部的資訊共用，也可以通過Internet與外部世界交流資訊，具有很大的靈活性。
當前，很多應用系統的開發建構在Intranet/Web結構上，這使得用戶端的使用者能夠
通過瀏覽器查詢或訪問Web伺服器端的資料庫、瀏覽HTML頁面。瀏覽器是與使用者相
關的介面，雖然Web伺服器後端應用程式與瀏覽器沒有直接的互動，應用程式卻通
過回送一個完整的HTML頁面進行顯示，以一種非互動的方式提供了介面。

Microsoft正在將Web瀏覽器介面直接併入將來的Windows作業系統版本中。在
Internet Explorer 4.0中，Web瀏覽器與其它用於檔案瀏覽及顯示傳統型應用程式的
介面組件之間沒有什麼差別。瀏覽器正在成為無所不在的應用程式，它提供了漫遊
Web、區域網路、甚至是使用者自己的電腦和應用程式所需的全部功能。

Visual FoxPro 使組織資料、定義資料庫規則和建立應用程式等工作變得簡單易行。
Visual FoxPro的整合化的開發環境不但擁有功能強大的物件導向程式設計工具以
及客戶/伺服器能力，而且支援 OLE 及 ActiveX。如果你在系統中安裝了Internet
Explorer，而且它是預設的瀏覽器，用下面的方法，就能通過Visual Foxpro控制
Web瀏覽器訪問Web網站。

建立一個Visual Foxpro表單，其中，啟動Internet Explorer的代碼為：

oie = CreateObject("InternetExplorer.Application")，

CreateObject函數從一個OLE應用中建立一個對象。關閉Internet Explorer

的代碼為：

If Type('oie') = "O"

      oie.Quit      Release oie    EndIf

Oie類的主要成員函數為：oie.Navigate(String URL)聯向URL指定的某個接點；
oie.GoHome與Internet Explorer的首頁對應；oie.GoSearch與Internet Explorer
的搜尋對應；oie.GoBack與Internet Explorer的後退對應；oie.GoForward與Internet
Explorer的前進對應。

Oie類的主要成員變數為：oie.Top，oie.Left視窗左上方座標；oie.Height視窗高度；
oie.Width視窗寬度；oie.StatusText視窗狀態條顯示資訊；oie.StatusBar視窗是否
有狀態條；oie.FullScreen視窗是否全螢幕顯示；oie.ToolBar視窗是否有工具條；
oie.Visible視窗是否可見；oie.MenuBar視窗是否有菜單。通過設定這些成員變數，
可以控制Internet Explorer的視窗大小、位置及各種狀態。

這樣，我們就可以產生一個在Visual FoxPro中啟用並控制Internet Explorer的程式，
該程式可以作瀏覽器用。在Visual Foxpro 5.0及Internet Explorer 4.0環境下實現。