ne pas lancé plusieurs fois mon programmeRésolu

Question

bonjour
voila,pour ne pas lancé plusieurs fois mon programme j'ai mis se code
Private Sub Form_Load()
If App.PrevInstance Then
    Call MsgBox("Attention le prog est déja lancé", vbCritical + vbOKOnly, "ATTENTION")
    Timer3.Enabled = False
        End
    Else
ProgressBar (0)
End If
End Sub
le probleme,c'est que le msgbox s'affiche bien au second lancement,mais quelques 
secondes aprés j'ai un message d'erreur "401",il veut lancé la fénetre de démarrage.
auriez vous une solution 
merci
@ plus
petchy

MadM@tt · Accepted Answer

C'est quoi ta fenetre de démarrage ? Elle se lance comment ?
Timer3 il fait quoi ? Et si y'a timer3, doit surement y avoir timer1 et 2, donc que font-ils ceux la ?
C'est peut etre à cause de la msgbox qui doit laisser le temps aux timer de s'executer, si tu essaye :

If App.PrevInstance Then

    Timer3.Enabled = False
    Call MsgBox("Attention le prog est déja lancé", vbCritical + vbOKOnly, "ATTENTION")
        End

ça marche ?

Ciaò 
[mailto:madmatt_12@msn.com MadMatt]
www.madmatt.fr.st

cs_petchy · Answer

Re
merci pour ton code,ça fonctionne,super 
petchy

mafia_cena · Answer

salut ca va

Ne pas lancé plusieurs fois mon programme

3 réponses

Votre réponse

Discussions similaires