none
Controler si mon programme est déjà en exécution RRS feed

  • Question

  • Bonjour

    en VB6, en début du Sub Main je plaçais les instructions suivantes:

        If App.PrevInstance Then
            iRet = MsgBox("Program already running", _
                               vbCritical, App.Title)
            Exit Sub
        End If   

    Comment faire en VB_NET? Je n'ai rien trouvé de similaire.
    Qui pet m'aider?

    Cordialement ey merci d'avance
    Luigi

     

     


    Luigi1936
    dimanche 20 février 2011 16:42

Réponses

  • Bonjour,

     

    Vous cherchez a faire quoi exactement ?

    si vous voulez que votre programme soit executé une seule fois vous avez autre chose que de vérifier les process en cours

        For Each oProcess In Process.GetProcesses
          If oProcess.ProcessName = "Le nom de votre programme" Then
            MsgBox("coucou " & oProcess.ProcessName)
          End If
        Next
    

     

     


    Cordialement,
    Xavier
    Alias Troxsa My M@iL
    • Proposé comme réponse TroxsaEditor dimanche 20 février 2011 18:36
    • Marqué comme réponse Luigi1936 dimanche 20 février 2011 19:07
    dimanche 20 février 2011 17:34
    Auteur de réponse

Toutes les réponses

  • Bonjour Luigi1936,

    Visual Studio intègre directement cette fonctionnalité dans les propriétés du projet.

    Ouvrez les propriétés et cochez la case "Application à instance unique"

     


    N'hésitez pas à poser des questions si un problème subsiste ou quelque chose n'est pas clair. Dans l'autre cas, veuillez indiquer que le problème est résolu. Cordialement.
    • Proposé comme réponse TroxsaEditor dimanche 20 février 2011 18:36
    dimanche 20 février 2011 17:32
  • Bonjour,

     

    Vous cherchez a faire quoi exactement ?

    si vous voulez que votre programme soit executé une seule fois vous avez autre chose que de vérifier les process en cours

        For Each oProcess In Process.GetProcesses
          If oProcess.ProcessName = "Le nom de votre programme" Then
            MsgBox("coucou " & oProcess.ProcessName)
          End If
        Next
    

     

     


    Cordialement,
    Xavier
    Alias Troxsa My M@iL
    • Proposé comme réponse TroxsaEditor dimanche 20 février 2011 18:36
    • Marqué comme réponse Luigi1936 dimanche 20 février 2011 19:07
    dimanche 20 février 2011 17:34
    Auteur de réponse
  • Merci beaucoup Michel

    Bien à vous

    Luigi

     


    Luigi1936
    dimanche 20 février 2011 17:47
  • Merci beaucoup Xavier

    Cordialement
    Luigi


    Luigi1936
    dimanche 20 février 2011 18:05