Declare as follows in the declaration area (use Public in the .bas file and PRivate in the Form)
PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhWndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong
in program
Intranet:
ShellExecuteMe.hWnd,"open","http://Intranet host/directory","","",5
Internet:
ShellExecuteMe.hWnd,"open","http://www.ruentex.com.tw","","",5
It's very simple!!! Even if your machine cannot connect to the Internet, you can still experience the functions of the intranet right away.->