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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 047 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

cs_FredT
Messages postés
66
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.
christoussaint
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??
cs_max12
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 @+
Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
57 -
bien observé !! j'adore !!
cs_TheHacker
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

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.