在聲明區中聲明如下(在.bas檔中用Public,在Form中用PRivate)
PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhWndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDitoryAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDitoryAs.BAmdyShowongAmdAmdypeAmdyKPwywAy 從A提供Bmd朗
在程式中
Intranet:
ShellExecuteMe.hWnd,"open","http://Intranet主機/目錄","","",5
Internet:
ShellExecuteMe.hWnd,"open","http://www.ruentex.com.tw","","",5
很簡單吧!!!就算您的機器不能連上Internet,您也可以馬上感受一下Intranet的功能.->