Comment empéché mon apli de se lancé 2 fois ?

Commenter

Contenu du snippet

Pas de config particuliére ici, au chargement du formulaire le programme teste si il est déjà actif.
Pour cela, ajouter If App.PrevInstance Then End dans le chargement de votre formulaire.

Source / Exemple : 


Private Sub Form_Load()
    If App.PrevInstance Then  'l'appli est déjà en mémoire?
        ' Le msgBox est ici pour la démo, vous devez
        ' l'enlevez pour permettre à votre Appli de se
        ' décharger d'elle même si elle est déjà ouverte.
        x = MsgBox("Appli déjà ouverte", vbCritical + _
                vbOKOnly, "Erreur !!!")
        End     ' Fin du programme.
    End If
End Sub

Conclusion :


@+

A voir également

S'inscrire maintenant

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.

Du même auteur (youl46)