1.讓軟件只能在軟盤上運行

利用App對象的Path屬性返回可執行文件的路徑進行判斷。
www.home.com/mypage.htm在該頁上有一文本mypassWord:1234其中“mypassword:”是關鍵字，“1234”是密碼。關鍵字與密碼相連，主要用于確定密碼的位置。注意關鍵字在網頁的唯一性，以免判斷密碼位置發生錯誤。

右鍵單擊工具欄，在彈出的菜單中選擇部件，在控件中選擇MicrosoftInternetTransferControl6.0，單擊確定。雙擊工具箱中新出現的Inet圖標，在啟動窗體中加入InternetTransfer控件Inet1。如果你是電話撥號上網，請使用該控件的缺省屬性；如果在Intranet上，可能需要提供代理服務器才能連接到Internet上，特別是有防火墻的Intranet，需將accessType屬性設置為icNamedProxy（2），再加入代碼Inet1.Proxy="myProxyName"。

在程序中加入以下代碼：

PrivateSubForm1_Load()
DimloAsVariant
DimtextAsString
Dimp1AsLong
Dimp2AsLong
DimpAsString
DimwebsiteAsString
website="EndSub

注意如果聯系不到服務器或找不到指定的HTML文檔，不會發生錯誤，而會返回一些代碼，不同的服務器返回的代碼可能不同。