Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Exe ou pas ?

Exe ou pas ?

7 réponses
Avatar
Jean Naimard
Bonjour,

Est-il possible par code de savoir si l'application est lancé depuis VB ou
directement par l'exe ?

Merci
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Christian Hugoud
Voila...

Public Function IsDesignedMode() As Boolean
On Error Resume Next

Debug.Print 1 / 0

If Err <> 0 Then
IsDesignedMode = True
Else
IsDesignedMode = False
End If

If Err <> 0 Then Err.Clear
On Error GoTo 0

End Function

"Jean Naimard" a écrit dans le message de
news: dpu6k5$551$
Bonjour,

Est-il possible par code de savoir si l'application est lancé depuis VB ou
directement par l'exe ?

Merci




Avatar
Jacques93
Bonjour Jean Naimard,
Jean Naimard a écrit :
Bonjour,

Est-il possible par code de savoir si l'application est lancé depuis VB ou
directement par l'exe ?




Tu peux essayer :

'-----------------------------------------------------
Private Sub Command1_Click()
MsgBox IIf(IsDev(), "IDE", "EXE")
End Sub

Private Function IsDev() As Boolean
Debug.Assert SetTrue(IsDev) Or True
End Function

Private Function SetTrue(Value As Boolean) As Boolean
Value = True
End Function
'-----------------------------------------------------



--
Cordialement,

Jacques.
Avatar
Jean Naimard
Merci messieurs pour ces infos

"Jean Naimard" a écrit dans le message de
news: dpu6k5$551$
Bonjour,

Est-il possible par code de savoir si l'application est lancé depuis VB ou
directement par l'exe ?

Merci




Avatar
jcl
En utilisant un nom de projet vbp et un nom de fichier executable il suffit
d'inserer le code suivants

If App.EXEName <> "nomduprojetvpb" Then
.....

JCL


"Jean Naimard" a écrit dans le message de
news: dpuqhf$ft4$
Merci messieurs pour ces infos

"Jean Naimard" a écrit dans le message
de
news: dpu6k5$551$
Bonjour,

Est-il possible par code de savoir si l'application est lancé depuis VB
ou
directement par l'exe ?

Merci








Avatar
Renfield
il est bien plus simple de faire :


If App.LogMode = 1 Then
'# Mode Compilé ....
End If
Avatar
Jacques93
Bonjour Renfield,
Renfield a écrit :
il est bien plus simple de faire :


If App.LogMode = 1 Then
'# Mode Compilé ....
End If




Plus simple, mais alors plutôt :

If App.LogMode <> 0 Then
'# Mode Compilé ....
End If

au cas où on utilise par exemple :

App.LogEvent vbLogToNT

pour enregistrer des messages dans le journal Application, et où
App.LogMode = 3 ;-)


--
Cordialement,

Jacques.
Avatar
Renfield
ok, bien vu