1. Accueil
  2. Tous les snippets
  3. Snippets Visual Basic / VB.NET
  4. Verifier si l'exe est deja en machine avec vb.net

Verifier si l'exe est deja en machine avec vb.net

Soyez le premier à donner votre avis sur cette source.

Snippet vu 9 296 fois - Téléchargée 38 fois

Commenter

Contenu du snippet

Ceci est l'equivalant de App.PrevInstance en vb6 :)

Source / Exemple : 


Public Function PrevInstance() As Boolean
  If Diagnostics.Process.GetProcessesByName _
     (Diagnostics.Process.GetCurrentProcess.ProcessName) _
               .Length > 1 Then
     Return True
  Else
     Return False
  End If
End Function

' *******
' * Utilisation 
' *******

If PrevInstance() = True Then
  ' Recuperer toutes les intances
  Dim Processes() As Process
  Processes = _
    Diagnostics.Process.GetProcessesByName( _
    Diagnostics.Process.GetCurrentProcess.ProcessName)
  ' Activer la premiere
  AppActivate(Processes(0).Id)
  ' Fermer cette intance
  Application.Exit()
End If

Conclusion :


Bonne prog

Crazyht

A voir également

Ajouter un commentaire Commentaires
cs_Damien10
Messages postés
12
Date d'inscription
jeudi 12 septembre 2002
Statut
Membre
Dernière intervention
26 février 2007
26 févr. 2007 à 17:14
Bonjour,

Merci pour le code, c'est exactement ce que je cherchai.

Damien
cs_Targos
Messages postés
26
Date d'inscription
samedi 18 janvier 2003
Statut
Membre
Dernière intervention
7 juillet 2008
22 mai 2003 à 17:44
Le focus se met bien sur l'appli mais elle ne la maximize pas quand elle est dans la barre des taches. Comment pourrais-je faire pour l'afficher ?

voici le code que j'ai :
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then

Dim Processes() As Process
Processes = Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)
'Dim i As Application
'Activer la premiere
AppActivate(Processes(0).Id)
'Fermer cette intance
Application.Exit()

End If

Merci
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 (cs_Crazyht)