1. #1
    Membre à l'essai
    Femme Profil pro
    bordeaux
    Inscrit en
    avril 2017
    Messages
    17
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 33
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : bordeaux
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : avril 2017
    Messages : 17
    Points : 14
    Points
    14

    Par défaut Ligne cmd dans vbs, fonctionne mais..

    Bonjour, je bloque sur quelque chose de simple mais je ne trouve pas l'erreur ....

    J'aimerais inclure une commande cmd dans mon fichier vbs, jusque là aucun souci, mais je bloque sur ce bout de commande:

    Il permet d'enregistrer sur fichier texte le contenue de la commande "ping"

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Set objShell = CreateObject("Wscript.Shell")
    strCommand = strCommand & "ping > ping.txt"
    resultat=objShell.Run(strCommand,0,True)
    Mais apparemment il n'arrive pas à enregistrer le fichier ... alors que sous fichier .bat la même commande fonctionne parfaitement.
    Si je remplace "ping > ping.txt" par "calc" ça ouvre bien la calculatrice donc le code vbs est bon ..

    EDIT: j'ai réussi à trouver le message d'erreur:
    La commande Ping n'a pas pu trouver l'hote >. Vérifiez le nom et essayez à nouveau.
    merci du coup de patte !

  2. #2
    Modérateur
    Avatar de l_autodidacte
    Homme Profil pro
    Retraité : Directeur de lycée/Professeur de sciences physiques
    Inscrit en
    juillet 2009
    Messages
    2 043
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Retraité : Directeur de lycée/Professeur de sciences physiques
    Secteur : Enseignement

    Informations forums :
    Inscription : juillet 2009
    Messages : 2 043
    Points : 4 659
    Points
    4 659

    Par défaut

    Remplace la ligne n° 3 par : strCommand = "Cmd.exe /C ping > ping.txt"
    Ne pas oublier le tag si satisfait.
    Voter pour toute réponse satisfaisante avec pour encourager les intervenants.
    Balises CODE indispensables. Regardez ICI
    Toujours utiliser la clause Option Explicit(VBx, VBS ou VBA)
    Vous pouvez consulter mes contributions
    Consultez les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr ICI

  3. #3
    Membre à l'essai
    Femme Profil pro
    bordeaux
    Inscrit en
    avril 2017
    Messages
    17
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 33
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : bordeaux
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : avril 2017
    Messages : 17
    Points : 14
    Points
    14

    Par défaut

    Merci beaucoup !

Discussions similaires

  1. Réponses: 2
    Dernier message: 01/03/2014, 10h19
  2. Insertion ligne vide dans une colonne, mais pas toutes les colonnes.
    Par gsekscor dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 21/04/2013, 22h33
  3. Regex qui fonctionne dans un preg_replace mais pas dans un ereg
    Par méphistopheles dans le forum Regex
    Réponses: 4
    Dernier message: 31/03/2007, 11h56
  4. Réponses: 5
    Dernier message: 02/09/2006, 15h10
  5. Réponses: 18
    Dernier message: 26/07/2006, 14h51

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo