Appelez la fonction "TestRuntime" qui fermera votre application si elle n'est pas ouverte par le runtime.
Function TestRuntime() As Integer
If SysCmd(acSysCmdRuntime) = 0 Then
'Pas le runtime
Application.Quit
End If
End Function
Date de création :23/02/2007 15:56
