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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 116 fois - Téléchargée 34 fois

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

Ajouter un commentaire

Commentaires

Messages postés
65
Date d'inscription
mardi 18 février 2003
Statut
Membre
Dernière intervention
11 avril 2009

christoussaint : Explications, avec moi, CoolMenu, plante uniquement sous VB, mais une fois compilé, tout va bien. Donc dans
Private Sub Form_Load()
j'ai ajouté ces lignes :
'Chargement de Cool Menu
If isExecutable() = True Then
Call ModCoolMenu.Install(frmMain.hwnd, , frmMain.ilsOutils)
End If
je n'utilise CoolMenu que pour des raisons esthétiques, donc pour tester les modif de mon prog, je n'ai pas besoin de ca. Et une fois compilé par contre j'en ai besoin.
Messages postés
19
Date d'inscription
vendredi 4 avril 2003
Statut
Membre
Dernière intervention
23 juin 2005

Je ne vois pas ce que ça change de savoir si ton prog tourne sous vb ou de façon autonome ??
ça ne résoud pas non plus ton problème de plantage de CoolMenu.
J'ai le même problème avec les coolmenu et je ne sais pas comment le résoudre. Je suppose que si tu parles de ça c'est que ça doit etre une piste mais je comprend pas...
Quelqu'un peux m'expliquer??
Messages postés
1491
Date d'inscription
dimanche 19 novembre 2000
Statut
Modérateur
Dernière intervention
7 juillet 2014

J'avais aussi déposer un code comme ça :) Sur le m^me principe, c'est pour l'info @+
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
65
bien observé !! j'adore !!
Messages postés
442
Date d'inscription
samedi 23 novembre 2002
Statut
Membre
Dernière intervention
19 octobre 2005

voila j'ai essayé sur win 98 et sous Xp et ca donne exactement les meme résultats
Afficher les 10 commentaires

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.