Sujet Précédent Sujet Suivant

SOS pb avec COMMAND()

cs_josman Messages postés 2 Date d'inscription dimanche 18 avril 2004 Statut Membre Dernière intervention 3 mai 2004 - 3 mai 2004 à 13:01
cs_josman Messages postés 2 Date d'inscription dimanche 18 avril 2004 Statut Membre Dernière intervention 3 mai 2004 - 3 mai 2004 à 17:14

Voila mon pb , quand je selectionne un fichier dans l'explorateur windows et que je lance mon prg par le menu contexuel, je recupere le chemin et nom du fichier selectionne avec la fonction command() sans pb.

Mais si je selectionne plusieurs fichiers , mon prg ne se lance pas, comment faire pour recuperer tous les chemins et nom de fichiers.

Merci d'avance :)

A voir également:

SOS pb avec COMMAND()
Pattern command - Conseils pratiques -C# / .NET
Shutdown command - Conseils pratiques -Visual Basic / VB.NET
Runtime.getruntime().exec(command) - Conseils pratiques -Java
Make linux command - Conseils pratiques -C / C++ / C++.NET
Javac command - Forum Java

2 réponses

Réponse 1 / 2

cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
3 mai 2004 à 14:33

Quand tu as plusiquers fichiers ils sont séparé par un espace
utilise le code suivant :

Private Sub Form_Load()
    Dim t As Variant
    Dim i As Long
    t = Split(Command, " """)
    For i = 0 To UBound(t)
        MsgBox t(i)
    Next
End Sub

E.B.

Réponse 2 / 2

cs_josman Messages postés 2 Date d'inscription dimanche 18 avril 2004 Statut Membre Dernière intervention 3 mai 2004
3 mai 2004 à 17:14

Merci beaucoup, mais j'ai toujours le meme pb
si il y qu'un de selectionne sa marche, sinon plusieurs rien,le prg ne se lance meme pas.
peut etre une erreur ici, voici le reg que je rajoute :

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\*\Shell\PRG\Command]
@="c:\\PRG.exe %1"

merci encore.
:)

Discussions similaires

Executer commande net use, mapper un lecteur resau

Application Multithread : "fatal error encountered during command execution"

Message d'erreur "Command text was not set for the command object.

Vba Excel: Comment utiliser la fonction Command() ?

executer commande DOS