[VB6] Passer des parametres dans un shell

Passer des parametres dans un shell [VB6] - Programmation

Marsh Posté le 03-06-2001 à 15:13:49    

Je voudrais passer des parametres dans un appli qui tourne sous DOS !? Est-ce possible !? Si Oui ... Comment !?
 
Merci d'avance !! :D

Reply

Marsh Posté le 03-06-2001 à 15:13:49   

Reply

Marsh Posté le 05-06-2001 à 09:05:10    

Quand on fait un shell (cela fait longtemps pour moi), on peut pas passer des paramètres après le nom de l'appli.exe ? Voire créer la chaîne "appli.exe nomfichier1 nomfichier2" en dur pour la passer en paramètre ?
 
Sans garantie, j'ai pas VB(3 !) sous la main en ce moment.
 
Archives : Je faisais
    ' shell DOS de trsfr3.exe
    iInstanceHandle = Shell("c:\chimie\rmn\trsfr3.exe", 1)
    Do While GetModuleUsage(iInstanceHandle) > 0
      X = DoEvents()
    Loop
pour lancer une application DOS (qui causait à un appareil pr transfert RS232), et attendre qu'elle soit terminée avant de continuer.
Si l'appli DOS sait lire les paramètres en ligne de commande ....

Reply

Marsh Posté le 05-06-2001 à 21:02:11    

Je sais pas si c'est "propre" mais bon ... ça a l'air de marcher. En se servant du "command.com" pour lancer l'appli sous VB6 ça donne ...
 
------------------------------
Dim Commande As String
Dim Resultat As Long
 
Commande = "c:\command.com /c c:\dossier\prog.exe " & "param1" & "param2"
Resultat = Shell(Commande, vbMinimizedNoFocus)
------------------------------
 
Voilà pour ceux que ça pourraient interesser !! :D

 

[edit]--Message édité par Doudos--[/edit]

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed