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 :

lire une colonne


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    49
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 49
    Par défaut lire une colonne
    Citation Envoyé par bbil Voir le message
    pour la lecture du .csv tu pourrai t'inspirer du code suivant :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    Dim fso 
    Dim fCsv 
    Dim tb 
    Const ForReading = 1
    Set fso = CreateObject("scripting.filesystemobject")
    Set fCsv = fso.OpenTextFile("liste.csv", ForReading)
    If Not fCsv.AtEndOfStream Then fCsv.ReadLine ' lecture ligne d'entête
     While Not fCsv.AtEndOfStream
      tb = Split(fCsv.ReadLine, ",")
      If UBound(tb) = 3 Then
        Wscript.echo "Nom : " & tb(0) & "  prénom :" & tb(1) & "  login:" & tb(2) & " mot de passe:" & tb(3)
      End If
     Wend

    Bonjour


    je veux utilser votre script mais avec une autre façon

    j'ai un ficheir csv

    Dossier Name
    FR99 XXXXXX
    ALL_100 YYYYY
    Holand zzzzzzzzzzzz

    je veux que chaque fois je récupere le nom du Dossier
    exemple
    tab(0) =FR99
    tab(1)=ALL_100
    tab(2)=Hola

    FR99 c'est un nom de dossier qui existe ,je veux le deplacer dans un autres dossier

    Merci


    Coridlament

  2. #2
    Rédacteur

    Profil pro
    Inscrit en
    Avril 2004
    Messages
    94
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 94
    Par défaut
    Bonjour,

    Je vois trois solutions (en fonction du format de ton fichier) :

    1 - Trouver le premier caractère " " (espace) et prendre ce qu'il y a avant (Fonction Instr et Mid)
    2 - Utiliser la fonction Split mais avec le séparateur " " (espace)
    3 - Utiliser les expressions régulières

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    49
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 49
    Par défaut Bonjour
    Citation Envoyé par bodbod Voir le message
    Bonjour,

    Je vois trois solutions (en fonction du format de ton fichier) :

    1 - Trouver le premier caractère " " (espace) et prendre ce qu'il y a avant (Fonction Instr et Mid)
    2 - Utiliser la fonction Split mais avec le séparateur " " (espace)
    3 - Utiliser les expressions régulières

    Merci pour la réponse
    j'ai utilisé la fonction Split
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    While Not fCsv.AtEndOfStream
      tb = Split(fCsv.ReadLine, ";") 
     
     ReDim Preserve tab(j)
      tab(j)=tb(0)
      Wscript.echo "Nom : " & tab(j)
      j=j+1
    cordialement

  4. #4
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 130
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

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

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 130
    Par défaut Non facultatif
    Problème resolu ==========> bouton
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

Discussions similaires

  1. Réponses: 1
    Dernier message: 04/03/2009, 17h50
  2. Réponses: 10
    Dernier message: 18/07/2007, 15h18
  3. Réponses: 3
    Dernier message: 19/02/2007, 23h01
  4. [MySQL] Lire une base membres/nbre de colonne
    Par PuppeT mAsTer dans le forum PHP & Base de données
    Réponses: 4
    Dernier message: 30/06/2006, 16h33
  5. Réponses: 1
    Dernier message: 29/12/2005, 18h04

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