Est-il possible de tester

si un programme est déjà démarré et effetuer le démarre s'i ca n'est pas le cas ?

sous msdos on peux utiliser le find avec if errorlevel mais sous sz mystère

re ,
??????????????????

STP , écris en NORMAL PAS en SMS .

Tu veux empécher de démarrer ton programme plusieurs fois non ?
SZ as cette fonction . Regarde dans les propriétées du projet .

Cordialement ,
Le réparateur de PC

re ,

Il y as aussi un moyen plus lours :
On récupère la liste de tous les processus dans une variable tableau ;
Ensuite , on lis chaque processus et si le processus de l'application existe , cela veux dire que le programme est déjà lancé .
Il est tout a fait fesable sous SZ :

Après un test , il faut passer par un tout petit peu de code VB .

Premièrement , les variables :
ProcessList -> variable tableau ; elle reçevera la liste de tous les processus .
nbx -> NON tableau ; utile à la boucle limitée .
AppName -> NON tableau ; elle recevera le nom de l'application .
ProcessNameList -> NON tableau ; elle reçevera le processus en cours de lecture part la boucle .
NbxProcess -> NON tableau ; elle sera incrémentée de 1 à chaue processus touvé .

Dans l'évènement Load de votre Form :

Palcer l'action Obtenir le nom de l'application ( catégorie Application ) et slectionnez la variable AppName .

Ensuite , placez l'action exécuter du code VB ( catégorie général )et mettre :

Code:

ProcessList = System.Diagnostics.Process.GetProcesses()

.

Puis on attaque la boucle limitée ( catégorie général ) :
Elle part de la variable nbx ayant pour valeur 0 jusqu'a la variable ProcessList et soustraire de 1 .
DANS cette boucle lilmitée , on modifie la variable ProcessNameList et on met comme valeur NON texte :

Code:

ProcessList(nbx).ProcessName

Ensuite , on crée une condition :
SI ProcessNameList = AppName Alors
Celà veux dire que le processus existe normal , on est dessus ....
On fait un calcul simple ( catégorie math ) : NbxProcess + 1 et on enregistre dans NbxProcess .
toujours dans cette condition , on crée une autre condition :
SI NbxProcess > 1 Alors
Comme notre processus est lancé , on as donc 1 mais si on le lance une autre fois , on en aura 2 donc > à 1
Message : Le programme est déjà lancé !
Placez l'action Arrêter l'application ( catégorie Application )

En image , ça done :


DONC , au final , ce code est le représentation SZ de mon code VB à la ligne prêt ! le code qui étais :

Code:

 ProcessList = System.Diagnostics.Process.GetProcesses()
        For nbx = 0 To ProcessList.Length - 1
            If ProcessList(nbx).ProcessName = My.Application.Info.AssemblyName Then
                ProcessNumber = ProcessNumber + 1
                If ProcessNumber > 1 Then
                    MessageBox.Show("InfoBat3 est déjà lancé ." & System.Environment.NewLine & "Il ne peut donc pas être lancé une seconde fois .", "Erreur de processus", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, Nothing)
                   
                    Me.Close()
                Else
                   
                End If
            End If
        Next

Cordialement ,
Le réparateur de PC

lereparateurdepc a écrit:re ,
??????????????????

STP , écris en NORMAL PAS en SMS .

Tu veux enpeicher de d~é~marrer ton programme plusieurs fois non ?
SZ as cette fonction . Regarde dans les propriétées du projet .

Cordialement ,
Le réparateur de PC

Merci je vais tester la méthode que tu m'as envoyer... ceci dit... il faudrait que tu m'explique ou est le langage sms ... il n'y en a absolument pas a moins que pour toi SZ soit du langage sms

en attendant bonne soirée et merci de ta réponse

re ,

Je parlais de cette phrase :

darkfreemc a écrit:si un programme est déjà démarré et effetuer le démarre s'i ca n'est pas le cas ?

Cordialement ,
Le réparateur de PC