Discussion :

[papydev]

Bonjour à tous,

dans mon appli. je souhaite fournir WD ZIP.EXE dans le Rep EXE
et donc pour le lancer de mon appli. j'utilise le code ci-dessous.

En cas ou WD ZIP.EXE n'ai pas installé sur UC,
un message d'erreur doit s'afficher.

Je teste ce code cela fonctionne, WD ZIP.EXE s'ouvre
mais j'ai le message d'erreur suivant :
"Cette application ne peut pas être lancée plusieurs fois"

Avez-vous une solution ou un code optimisé pour cette action

Merci à vous

PapyDev - Débutant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
// Code pour lancer WD ZIP.EXE
LOCAL
	MaChaineTemp est une chaîne
	DoubleQuottes est une chaîne = """"
MaChaineTemp = DoubleQuottes  +...
ComplèteRep(fRepEnCours())+ "WD Zip.EXE"+...
DoubleQuottes 
LanceAppli(MaChaineTemp)
 
SI PAS LanceAppli(MaChaineTemp) ALORS Erreur ("Le logiciel WD Zip n'est pas installé sur le disque dur !")

J'ai essaye avec le code ci-dessous, j'ai le même message d'erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
LanceAppli("WD Zip.EXE")
SI PAS LanceAppli("WD Zip.EXE") ALORS Erreur ("Le logiciel WD Zip n'est pas installé sur le disque dur !")

[mail.spam]

Bonjour
quand tu fais

LanceAppli("WD Zip.EXE")
SI PAS LanceAppli("WD Zip.EXE")

tu le lance deux fois.

Pour faire ton test et le lancer il faut juste la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SI PAS LanceAppli("WD Zip.EXE")

[papydev]

Bonjour,

Merci à toi