IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

erreurs vbs - script conversion .tra vers .pnm


Sujet :

VBScript

  1. #1
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    janvier 2021
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : janvier 2021
    Messages : 2
    Points : 2
    Points
    2
    Par défaut erreurs vbs - script conversion .tra vers .pnm
    Bonjour,
    pouvez vous m'aidez pour mon script VBS?
    Il y a deux erreurs :
    - ligne 6, "fichier introuvable", erreur 800A0035
    - ligne 7, "variable non définie "rename"", erreur 800A01F4


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    *
    ChemNomFichier = InputBox("Entrez le chemin du fichier à convertir", "Chemin du fichier à importer")
        NewFichier = ChemNomFichier & ".txt"
        OrigineFichier = ChemNomFichier & ".TRA"
     
    Set WshShell = WScript.CreateObject("WScript.Shell")
        Set fso = CreateObject("Scripting.FileSystemObject")
        fso.MoveFile OrigineFichier, ChemNomFichier & ".txt"
        Rename OrigineFichier, ChemNomFichier & ".txt"
        arg1_ext = Left(arg(0), Len(arg(0))- 4 ) & ".txt"
    Merci d'avance.

  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 339
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 65
    Localisation : Tunisie

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

    Informations forums :
    Inscription : juillet 2009
    Messages : 2 339
    Points : 5 605
    Points
    5 605
    Par défaut
    Bonjour et Bienvenu sur DVP;

    Un peu plus d'explication peut nous servir à comprendre ce que tu cherches à faire :
    - Quel est le fichier qui existe réellement dont le chemin devrait être tapé dans l'InputBox ?
    - Où devrait être placé le fichier à déplacer et avec quelle extension ?
    - La conversion dont tu parles est-ce seulement la modification de l'extension du fichier ou autre chose ?
    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) et Ne jamais typer variables et/ou fonctions en VBS.
    Vous pouvez consulter mes contributions
    Ne pas oublier de consulter les différentes FAQs et les Cours/Tutoriels VB6/VBScript
    Ne pas oublier L'Aide VBScript et MSDN VB6 Fr

  3. #3
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    janvier 2021
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : janvier 2021
    Messages : 2
    Points : 2
    Points
    2
    Par défaut
    Le fichier existant est un fichier texte au format .TRA.
    Le fichier doit être placé où nous voulons dans l'ordinateur.
    Non, ce n'est pas seulement une modification d'extension. Tout les document est modifié grâce a un tableau 2d

  4. #4
    Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    décembre 2004
    Messages
    5 483
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : décembre 2004
    Messages : 5 483
    Points : 13 384
    Points
    13 384
    Par défaut
    Salut
    Le debug VBScript n'est pas des plus fiable au niveau de l'information ligne, colonne, je pencherai plutôt pour ton Rename qui n'existe pas de cette façon en VBScript.
    Pour ton problème de Rename, une Sub qui fait le boulot.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub RenameFichier(CheminNomFichierSrc, CheminNomFichierDest)
            Dim objFSO
            Set objFSO = CreateObject("Scripting.FileSystemObject")
            objFSO.MoveFile CheminNomFichierSrc,CheminNomFichierDest
            Set objFSO = Nothing
    End sub
     
    RenameFichier "C:\MesProgs\En VBScript et HTA\Rename\testSource.txt","C:\MesProgs\En VBScript et HTA\Rename\testSource2.txt"
    Quand le fichier est déplacé dans le même dossier, en fait il est renommé, si source et destination sont différent, là il y a déplacement.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
    👉 → → Ma page perso sur DVP ← ← 👈

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Erreur 404 suite conversion VS2008 vers VS2013
    Par lerorodu51 dans le forum ASP.NET
    Réponses: 2
    Dernier message: 26/03/2015, 18h29
  2. script conversion Excel vers fichier KML ou KMZ
    Par aminepop dans le forum EDI, CMS, Outils, Scripts et API
    Réponses: 2
    Dernier message: 26/07/2010, 13h19
  3. Message d'erreur à la conversion .xls vers .pdf
    Par samson_02 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 05/02/2009, 16h02
  4. Erreur de conversion pixels vers système métrique.
    Par defluc dans le forum Langage
    Réponses: 25
    Dernier message: 19/09/2008, 11h34
  5. Erreur de dépassement: conversion XML vers NTEXT
    Par carjo dans le forum MS SQL Server
    Réponses: 5
    Dernier message: 07/03/2008, 23h05

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