Déclarez comme suit dans la zone de déclaration (utilisez Public dans le fichier .bas et PRivate dans le formulaire)
PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhWndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong
au programme
Intranet :
ShellExecuteMe.hWnd,"open","http://Hôte/répertoire Intranet","","",5
Internet:
ShellExecuteMe.hWnd,"open","http://www.ruentex.com.tw","","",5
C'est très simple !!! Même si votre machine ne parvient pas à se connecter à Internet, vous pouvez toujours profiter immédiatement des fonctions de l'intranet.->