Discussion :

[revline]

Bonjour,

Est-il possible en VB6 d'ouvrir un document spécifié avec un logiciel spécifié (qui n'est donc pas le logiciel par défaut) ?
par exemple ouvrir un document "c:\1\essai.txt" avec "c:\utils\xyz.exe" ?

Lorsque j'étais sous windows 98 ou ME, j'utilisais Shell + sendkeys mais sous XP, ça me bloque le PC pendant plusieurs secondes, voire plus d'une minute...

Merci d'avance

Marie-Line

[ProgElecT]

Function Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Double
Membre de VBA.Interaction
Lance un programme exécutable

1° argument, Nom du programme à exécuter, ainsi que tous les arguments ou paramètres de ligne de commande ; peut également préciser le répertoire ou dossier et le lecteur.

Code :

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

1
2
3
4
Private Sub Command1_Click()
'Shell "Notepad.exe c:\1\essai.txt", vbNormalFocus
Shell "c:\utils\xyz.exe c:\1\essai.txt", vbNormalFocus
End Sub

[Chatbour]

Salut à tous

Code :

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

1
2
3
4
Private Sub Command1_Click()
'Shell "Notepad.exe c:\1\essai.txt", vbNormalFocus
Shell "MonProgramme MonParametre", vbNormalFocus
End Sub

(avec modification)

ça fonctionnera toujours tanque MonProgramme est programmé pour ouvrir MonParametre..


C'est comme ce script batch (appelé par exemple monScript.bat)

start %1

si vous tapez dans la ligne de commande, ou Exécuter, MonScript winmine, ça va ouvrir Démineur..

Bon, j'espère ne pas avoir fatigué vos yeux en vin

[revline]

Merci pour votre réponse... mais certains programmes n'acceptent pas ceci... et ça ne fonctionne pas !

[ProgElecT]

c:\utils\xyz.exe

Ce programme, permet-il d'ouvrire un fichier(de quel type) en double cliquant dessus dans l'explorateur Widows?
Ce programme, c'est une construction perso?