Ne pas lancer 2* la ^m appli

Schouly Messages postés 45 Date d'inscription dimanche 21 janvier 2001 Statut Membre Dernière intervention 6 octobre 2006 - 12 janv. 2002 à 18:28
ZTPdiffusion Messages postés 46 Date d'inscription lundi 16 avril 2001 Statut Membre Dernière intervention 7 mars 2002 - 12 janv. 2002 à 23:50
Ben voilà ...

J'ai une appli et je ne veux pas qu'elle puisse être ouverte 2 fois en même temps

Si je lance une 2ième fois mon appli (cliquer sur l'icône par exemple) j'aimerais que la première prenne le focus et que la deuxième ne s'affiche pas !!!

Schouly (@skynet.be)

2 réponses

cs_Pyros Messages postés 23 Date d'inscription dimanche 12 août 2001 Statut Membre Dernière intervention 24 décembre 2003
12 janv. 2002 à 19:42
t utilise du vb script pour verifier dans le registre si ell est deja en cours
ya un source ki vien d arriver et ki parle de l acces au registre
0
ZTPdiffusion Messages postés 46 Date d'inscription lundi 16 avril 2001 Statut Membre Dernière intervention 7 mars 2002
12 janv. 2002 à 23:50
Salut

Place le code suivant dans la procédure load de ta feuille

Private sub Form_Load()
'
' Empêcher l'application de se lancer 2 fois
'
If App.PrevInstance Then
MsgBox "Cette application est" & _
vbCrLf & "déjà ouverte.", vbInformation + _
vbOKOnly, "Mon appli"
End
End If
End Sub

a+
0
Rejoignez-nous