begin process at 2010 02 10 08:03:08
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Exécution

 > COMMENT EMPÉCHÉ MON APLI DE SE LANCÉ 2 FOIS ?

COMMENT EMPÉCHÉ MON APLI DE SE LANCÉ 2 FOIS ?


 Information sur la source

Note :
7,36 / 10 - par 11 personnes
7,36 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Exécution Classé sous :application, lancer, 2 Niveau :Débutant Date de création :20/03/2001 Vu :5 851
Auteur : youl46

Ecrire un message privé
Site perso
Commentaire sur cette source (11)
Ajouter un commentaire et/ou une note

 Description

Pas de config particuliére ici, au chargement du formulaire le programme teste si il est déjà actif.
Pour cela, ajouter If App.PrevInstance Then End dans le chargement de votre formulaire.

Source

  • Private Sub Form_Load()
  • If App.PrevInstance Then 'l'appli est déjà en mémoire?
  • ' Le msgBox est ici pour la démo, vous devez
  • ' l'enlevez pour permettre à votre Appli de se
  • ' décharger d'elle même si elle est déjà ouverte.
  • x = MsgBox("Appli déjà ouverte", vbCritical + _
  • vbOKOnly, "Erreur !!!")
  • End ' Fin du programme.
  • End If
  • End Sub 
Private Sub Form_Load()
    If App.PrevInstance Then  'l'appli est déjà en mémoire?
        ' Le msgBox est ici pour la démo, vous devez
        ' l'enlevez pour permettre à votre Appli de se
        ' décharger d'elle même si elle est déjà ouverte.
        x = MsgBox("Appli déjà ouverte", vbCritical + _
                vbOKOnly, "Erreur !!!")
        End     ' Fin du programme.
    End If
End Sub

 Conclusion

@+


 Sources du même auteur

Source avec Zip DETECT : PROGRAMME MAL ARRETER
COMPRÉSSION / DÉCOMPRÉSSION
COMMENT OBTENIR BCP D'INFO SUR VOTRE MACHINE ?
OUVRIR UNE BOITE DE FORMATAGE DE DISQUETTE
UNE CALCULATRICE PLUS SIMPLE ENCORE !
Toutes les sources de youl46

 Sources de la même categorie

Source avec Zip APPEL DE POINTEUR DE FONCTIONS - API SANS LES DECLARER par Renfield
Source avec Zip Source avec une capture RETROUVER LES DONNÉES PUBLIQUES DANS UNE BIBLIOTHÈQUE par VBsearch
Source avec Zip Source avec une capture CRÉER VOTRE PROGRAMME D'INSTALLATION par VBsearch
Source avec Zip Source avec une capture BART VOTRE BUREAU DANS UNE BARRE par alfamick
Source avec Zip Source avec une capture Source .NET (Dotnet) SIMPLE SHUTDOWN SCHEDULER : ARRÊTS PLANIFIÉS (LOCAL OU REMOT... par violent_ken
Toutes les sources de la catégorie Exécution

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) RETANGLE DE PETZOL par Londonic
Source avec Zip Source avec une capture STANDARISATION D'APPLICATIONS par mehdikobra
Source avec Zip Source avec une capture HANDLISTER par Christ_OFF
Source .NET (Dotnet) VÉRIFIER SI UNE APPLICATION EST LANCÉ, SINON ON LA DÉMARRE ! par scoubigee
Source avec Zip LANCER UN FICHIER ET RÉCUPÉRER LE HANDLE DE L'APPLICATION LA... par jack

Commentaires et avis

Commentaire de KevinK le 13/05/2002 15:45:02

karlkox> Nan c'est faux, ca marche très bien même quand tu ouvre un fichier associé avec ton prog.
   Je suis sur que t'a même pas essayé !

Commentaire de PatDeLaYaute le 14/05/2002 22:47:48

Salut, ce petit bout de code est très intérressant. Mais j'aimerais savoir :

si l'application est sur un réseau, va t-elle se détecter si elle est excécutée depuis un poste différent ?

@+

Commentaire de youl46 le 15/05/2002 15:24:21

je crois pas

Commentaire de PatDeLaYaute le 16/05/2002 10:57:27

ok, ben tant pis alors :-(
@+

Commentaire de yoman64 le 08/06/2002 09:54:25

Cool merci du truc

Commentaire de SysteM le 10/06/2002 03:17:08

Pourquoi utiliser une variable (x)

x = msgbox(.......

???

Commentaire de Cervomix le 19/07/2002 11:40:57

Merci Kris je V essayer!

Commentaire de slayer le 20/01/2003 10:09:46

super ce code , mais sa sera pas possible par hasard , de fermer l'encienne apli au lieu de fermé la nouvelle q'uon ouvre ?

Commentaire de Crew209 le 05/02/2003 20:38:56

Si tu kik le process et tu démar le tien a la place...

nproc = Le PID du process

code = OpenProcess(PROCESS_TERMINAT, 0, nproc)
Tu fait : TerminateProcess code, 0

Puis la tu laisse le prog continué a séxécuter

Commentaire de frederios le 26/10/2006 21:32:37

le x dans x=msgbox cest pour retourner ce que tu va clicker comme si je me trompe pas  ca va retourner 6 si tu click ok ainsi de suite... si tu mets pas une variable avant ton msgbox tu mets pas les truc entre() pis ca va juste enclencher un messagebox mais tu vas pas  savoir ce que l'utilisateur a clicker dans le msgbox

Example

x=msgbox("ce que tu veux que ca ecrive dans le msgbox",vbOKCancel ,"Le titre du msgbox")

msgbox x

Commentaire de frederios le 26/10/2006 21:36:37

comme dans le cas de l'example de ce forum(le code en haut de la page) le x etais pas necessaire puisque le seul but du messagebox etais de dire que l'application roulait deja...

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Lancer un programme a partir be VBA [ par lulociel ] Bonjour! Je souhaite lancer une application pour extraire des données de l'AS400(que j'utilise au travail).Je voulais savoir s'il est possible d'execu comment lancer une application sur serveur , apartir du poste client [ par Zied ] bonjour a tous,j'ai besoin d'aide pour pouvoir executer une applacation (VB,WNT,SQLSERVER 7.) , installée sur le serveur, à partir d'un poste clientme Lancer un appli avec un fichier [ par Loïc ] Sous Windows, pour lancer une application, il lui faut un fichier. On prend ce fichier, on le fait glisser sur l'exe (sur l'application) et on relache Lancer un process avec des droits particuliers [ par cyrilp ] Bonjour,J'aimerai savoir comment faire avec les API windows (NT) pour lancer une application sous un compte particulier.Par exemple, je suis connecté Lancer Word et fusionner... [ par SOLDEVILA ] Bonjour à tous.Mon application lance Word en ouvrant un document de publipostage avec le code suivant:Dim MonDoc As ObjectDim MonFichier As String... Lancer une application en plein ecran [ par bbernard ] Bonjour,Je suis debutant dans ce domaine et je m'entraine en creant de petite application pour mon confort et j'ai besoin d'un peu d'aide.J'ai creer u lancer une application automatiquement [ par jerbi ] Bonjour !J'ai une application VB que je désire faire tourner 3 à 4 fois par jour et que je compte placer sur le serveur. Cette application est autonom j'ai un petit probleme pour lancer une application avec shell [ par noshelter ] D'abord salut,donc voilà j'arrive à lancer des applications avec shell (suivi du chemin du prog pour ceux qui savent pas) mais j'ai un prob avec une a Utilisation de ligne de commande pour lancer une application ? [ par PROGRAMMIX ] Voilà, j'ai créé deux applications qui contiennent chacune d'elle une ListBox avec une liste de personnes. J'ai mis dans l'une d'elle un bouton qui m


Nos sponsors


Sondage...

Comparez les prix


Console Nintendo Wii
Entre 220€ et 307€

Visiter le guide achat

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,998 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)