超級鏈接功能可以使程序具備直接訪問Internet的能力,不少優(yōu)秀的軟件都提供直接訪問Internet的功能。如金山詞霸2000在它的系統(tǒng)桌面上提供互聯(lián)網(wǎng)資源;Microsoft的應(yīng)用程序在其幫助菜單中提供Microsoft on the Web,這都是在系統(tǒng)內(nèi)部直接訪問Internet的典型例子。
為了在應(yīng)用程序中實現(xiàn)直接訪問Internet功能,只要能在程序中控制啟動Internet瀏覽器即可。在Visual FoxPro 6.0(以下簡稱VFP6.0)中,我們可以很容易地實現(xiàn)這一功能,這要使用VFP6.0的“超級鏈接”控件。首先介紹一下這個控件。
一、“超級鏈接”控件簡介
“超級鏈接”控件(Hyperlink)是VFP6.0新增的一個標(biāo)準(zhǔn)的表單控件,它運行時不可視,主要有以下幾個程序方法可供調(diào)用:
GoBack:向后執(zhí)行歷史記錄列表中的超級鏈接跳轉(zhuǎn)?! oForward:向前執(zhí)行歷史記錄列表中的超級鏈接跳轉(zhuǎn)?! avigateTo:向指定的目標(biāo)執(zhí)行超級鏈接跳轉(zhuǎn)。
通過以上三個程序方法我們就可以很方便地在程序中實現(xiàn)超級鏈接功能。其中主要使用NavigateTo程序方法。它的使用格式是:Object.NavigateTo(cTarget),參數(shù)cTarget指定要定位的URL。
二、在表單中實現(xiàn)超級鏈接
在表單上添加一個“超級鏈接”控件,然后再添加一個命令按鈕,在命令按鈕的 Click 事件中通過調(diào)用“超級鏈接”控件的NavigateTo方法來啟動Internet瀏覽器并實現(xiàn)向目標(biāo)地址的跳轉(zhuǎn)。也可以通過一個圖片或一個標(biāo)簽的Click事件來實現(xiàn)這種跳轉(zhuǎn)。
下面給出一個用命令按鈕來啟動超級鏈接的實例:
(1)新建一個表單(Form1),屬性設(shè)置如下:
AutoCenter = .T.
Caption=”在表單中使用超級鏈接”
(2)通過表單控制工具欄在Form1上添加一個超級鏈接控件(Hyperlink1)和一個命令按鈕Command1 ,設(shè)置Command1的Caption屬性為:“鏈接到計算機世界網(wǎng)站”。
(3)在Command1的Click Event事件中寫入代碼:ThisForm.HyperLink1.NavigateTo("www.computerworld.com.cn")
(4)保存表單Form1,然后運行這個表單,當(dāng)單擊“鏈接到計算機世界網(wǎng)站”這個命令按鈕時,就會啟動Internet 瀏覽器并直接鏈接到http://www.computerworld.com.cn站點。
三、在菜單中實現(xiàn)超級鏈接
在用戶自定義菜單中使用超級鏈接,可以實現(xiàn)通過菜單直接訪問Internet站點的功能,使我們的程序更具吸引力。就象Microsoft Office幫助菜單中的Microsoft on the Web一樣,我們可以在自己的程序菜單中加入系統(tǒng)開發(fā)者的技術(shù)支持網(wǎng)站鏈接;通過這種方法,也可以使我們的程序能為用戶提供HTML格式的幫助,因為“超級鏈接”控件也支持對本地地址(Intranet)、或本機一個磁盤文件的鏈接。
因為“超級鏈接”控件是一個表單控件,它使用時需要一個表單對象來容納,而我們在菜單中使用時通常不需要顯示用戶自定義表單,這里我們可以借助系統(tǒng)內(nèi)存變量_SCREEN,在運行時添加一個“超級鏈接”控件對象到_SCREEN,然后在_SCREEN中調(diào)用“超級鏈接”控件的NavigateTo方法?! ∠旅媸且粋€在菜單中直接訪問齊魯石化公司網(wǎng)站的實例,首先設(shè)置一個菜單選項:訪問齊魯石化網(wǎng)站,然后為這個菜單選項創(chuàng)建一個過程,寫入以下代碼即可:
**在_SCREEN中添加一個HyperLink對象
_SCREEN.AddObject('oAppHyperLink','HyperLink')
**鏈接到http://www.qlsh.net地址
_SCREEN.oAppHyperLink.NavigateTo('www.qlsh.net')
**移去oAppHyperLink對象
_SCREEN.RemoveObject('oAppHyperLink')
RETURN
四、總結(jié)
在用VFP6.0開發(fā)的應(yīng)用程序中,使用“超級鏈接”控件可以方便地跳轉(zhuǎn)到 Internet 或 Intranet 的一個目標(biāo)地址上。只要運行這個程序的客戶端已配置好Internet 瀏覽器(例如:Microsoft Internet Explorer),并且具備訪問Internet的條件,那么“超級鏈接”對象就會自動啟動瀏覽器并打開地址中指定的頁面。
為了在應(yīng)用程序中實現(xiàn)直接訪問Internet功能,只要能在程序中控制啟動Internet瀏覽器即可。在Visual FoxPro 6.0(以下簡稱VFP6.0)中,我們可以很容易地實現(xiàn)這一功能,這要使用VFP6.0的“超級鏈接”控件。首先介紹一下這個控件。
一、“超級鏈接”控件簡介
“超級鏈接”控件(Hyperlink)是VFP6.0新增的一個標(biāo)準(zhǔn)的表單控件,它運行時不可視,主要有以下幾個程序方法可供調(diào)用:
GoBack:向后執(zhí)行歷史記錄列表中的超級鏈接跳轉(zhuǎn)?! oForward:向前執(zhí)行歷史記錄列表中的超級鏈接跳轉(zhuǎn)?! avigateTo:向指定的目標(biāo)執(zhí)行超級鏈接跳轉(zhuǎn)。
通過以上三個程序方法我們就可以很方便地在程序中實現(xiàn)超級鏈接功能。其中主要使用NavigateTo程序方法。它的使用格式是:Object.NavigateTo(cTarget),參數(shù)cTarget指定要定位的URL。
二、在表單中實現(xiàn)超級鏈接
在表單上添加一個“超級鏈接”控件,然后再添加一個命令按鈕,在命令按鈕的 Click 事件中通過調(diào)用“超級鏈接”控件的NavigateTo方法來啟動Internet瀏覽器并實現(xiàn)向目標(biāo)地址的跳轉(zhuǎn)。也可以通過一個圖片或一個標(biāo)簽的Click事件來實現(xiàn)這種跳轉(zhuǎn)。
下面給出一個用命令按鈕來啟動超級鏈接的實例:
(1)新建一個表單(Form1),屬性設(shè)置如下:
AutoCenter = .T.
Caption=”在表單中使用超級鏈接”
(2)通過表單控制工具欄在Form1上添加一個超級鏈接控件(Hyperlink1)和一個命令按鈕Command1 ,設(shè)置Command1的Caption屬性為:“鏈接到計算機世界網(wǎng)站”。
(3)在Command1的Click Event事件中寫入代碼:ThisForm.HyperLink1.NavigateTo("www.computerworld.com.cn")
(4)保存表單Form1,然后運行這個表單,當(dāng)單擊“鏈接到計算機世界網(wǎng)站”這個命令按鈕時,就會啟動Internet 瀏覽器并直接鏈接到http://www.computerworld.com.cn站點。
三、在菜單中實現(xiàn)超級鏈接
在用戶自定義菜單中使用超級鏈接,可以實現(xiàn)通過菜單直接訪問Internet站點的功能,使我們的程序更具吸引力。就象Microsoft Office幫助菜單中的Microsoft on the Web一樣,我們可以在自己的程序菜單中加入系統(tǒng)開發(fā)者的技術(shù)支持網(wǎng)站鏈接;通過這種方法,也可以使我們的程序能為用戶提供HTML格式的幫助,因為“超級鏈接”控件也支持對本地地址(Intranet)、或本機一個磁盤文件的鏈接。
因為“超級鏈接”控件是一個表單控件,它使用時需要一個表單對象來容納,而我們在菜單中使用時通常不需要顯示用戶自定義表單,這里我們可以借助系統(tǒng)內(nèi)存變量_SCREEN,在運行時添加一個“超級鏈接”控件對象到_SCREEN,然后在_SCREEN中調(diào)用“超級鏈接”控件的NavigateTo方法?! ∠旅媸且粋€在菜單中直接訪問齊魯石化公司網(wǎng)站的實例,首先設(shè)置一個菜單選項:訪問齊魯石化網(wǎng)站,然后為這個菜單選項創(chuàng)建一個過程,寫入以下代碼即可:
**在_SCREEN中添加一個HyperLink對象
_SCREEN.AddObject('oAppHyperLink','HyperLink')
**鏈接到http://www.qlsh.net地址
_SCREEN.oAppHyperLink.NavigateTo('www.qlsh.net')
**移去oAppHyperLink對象
_SCREEN.RemoveObject('oAppHyperLink')
RETURN
四、總結(jié)
在用VFP6.0開發(fā)的應(yīng)用程序中,使用“超級鏈接”控件可以方便地跳轉(zhuǎn)到 Internet 或 Intranet 的一個目標(biāo)地址上。只要運行這個程序的客戶端已配置好Internet 瀏覽器(例如:Microsoft Internet Explorer),并且具備訪問Internet的條件,那么“超級鏈接”對象就會自動啟動瀏覽器并打開地址中指定的頁面。