Exécution du programme sous vb ou exe compilé ?

Contenu du snippet

Comment savoir si le programme est exécuté à partir de VB ou s'il est compilé? Voila au moins 1 heure que je cherche sur VBFrance, en me disant j'ai vu ca quelque part !
J'ai pas réussi à retrouver ça. Tant pis si la source est en double. Ce matin j'suis mal réveillé, j'voulais pas trop faire travailler les neurones, bon c'est loupé! Finalement c'est tout simple :

Source / Exemple :


'Renvoi True, si exécution à partir du programme compilé
Public Function isExecutable() As Boolean
    On Error Resume Next
    ' Erreur division par 0, uniquement exécution sous VB.
    ' Dans un exe, la ligne est ignorée
    Debug.Print 1 / 0
    isExecutable = (Err.Number = 0)
    On Error GoTo 0
End Function

Conclusion :


Exemple d'utilisation : Comme en ce moment j'utilise beaucoup CoolMenu 1.6 et que vive les plantages VB ou même la fermeture de VB en mode débogage... j'en avais marre d'enlever et remettre les lignes en commentaire à chaque compilation.

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.