Vb6 + lancer l'execution d'un programme [Résolu]

Signaler
Messages postés
787
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
27 novembre 2008
-
Messages postés
206
Date d'inscription
lundi 22 novembre 1999
Statut
Membre
Dernière intervention
3 juillet 2008
-
Bonjour,

je viens d"installer vb6 et je voudrais lancer l'installation d'un programme (msi) avec parametre via une comamnde vb6 !?

J'ai vu qu'il y avait Shell
s = Shell("..\SQLEXPR32.EXE /qn  addlocal=all instancename=*** SAPWD=***", 1)

Ok ca fonctionne mais j'aimerais savoir si il est possible de savoir si une erreur lors de l'installation s'est produite ou pas !

Le s me renvoit un numero et je ne sais pas a quoi cela correspond !
avez vous une idée,

Meci
Christophe

3 réponses

Messages postés
206
Date d'inscription
lundi 22 novembre 1999
Statut
Membre
Dernière intervention
3 juillet 2008

Bonjour,

Shell est une fonction qui permet de lancer un programme exécutable et renvoie une valeur de type Variant
(Double) représentant l'identificateur (ID) de la tâche exécutée en cas
de succès, ou un zéro en cas d'échec.

Gerome GUILLEMIN (développeur C/C++, VB, .NET)
--=:: Visitez mon site web en cliquant ici ::=--
Messages postés
787
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
27 novembre 2008

salut salut,

ok ca fonctionne mais j'ai juste une derniere petite question !

Dim s
s = Shell("SQLEXPR32.EXE /qn  addlocal=all instancename=**** SAPWD=***", 1)


MsgBox s

donc je lance l'installation de sql server express 2005 en silencieux et quand je clique sur le bouton apres quelques secondes j'ai le message box qui s'affiche alors que sql serveur n'est pas encore installe plutot chiant ca :-(!

y'a pas une maniere de faire pour affiche le resultat donc l'id quand l'install est terminee !?

Merci pour tout
Christophe 
Messages postés
206
Date d'inscription
lundi 22 novembre 1999
Statut
Membre
Dernière intervention
3 juillet 2008

Bonjour,

Essayes ceci à la place :
Dim s
s = Shell("CMD.EXE /C SQLEXPR32.EXE /qn  addlocal=all instancename=**** SAPWD=***", 1) MsgBox s

 --=:: -----------------------------------::=--
      Gérôme GUILLEMIN, ingénieur système et auteur du langage FBSL
--=:: -----------------------------------::=--
<hr size="2" width="100%" />[h%3C/body ]