超級鏈接功能可以使程序具備直接訪問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 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屬性為:“鏈接到計算機(jī)世界網(wǎng)站”。
(3)在Command1的Click Event事件中寫入代碼:ThisForm.HyperLink1.NavigateTo("www.computerworld.com.cn")
(4)保存表單Form1,然后運行這個表單,當(dāng)單擊“鏈接到計算機(jī)世界網(wǎng)站”這個命令按鈕時,就會啟動Internet 瀏覽器并直接鏈接到http://www.computerworld.com.cn站點。
如金山詞霸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 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屬性為:“鏈接到計算機(jī)世界網(wǎng)站”。
(3)在Command1的Click Event事件中寫入代碼:ThisForm.HyperLink1.NavigateTo("www.computerworld.com.cn")
(4)保存表單Form1,然后運行這個表單,當(dāng)單擊“鏈接到計算機(jī)世界網(wǎng)站”這個命令按鈕時,就會啟動Internet 瀏覽器并直接鏈接到http://www.computerworld.com.cn站點。

