VBS : Commencer à partir d'une ligne d'un CSVRésolu

Question

Bonjour, Voila, j'ai créé mon script VBS à traver ce forum mais mes beoins change légèrement... Et je j'arrive pas à trouver la solution en VBS... J'ai seulement la solution en VB ce que je ne veux pas. Voila mon Script VBS :

   Const ForReading = 1    Set objFSO = CreateObject("Scripting.FileSystemObject")    Set objFile = objFSO.OpenTextFile("C:\Documents and Settings\xxx\Bureau\Test Script CSV\Test.txt", ForReading)    Do Until objFile.AtEndOfStream    strLine = objFile.ReadLine    arrFields = Split(strLine, ",") ^{strNewContent = strNewContent & arrFields(0) & "," & arrFields(1) & vbCrLf

   Loop}    objFile.Close    Set objFile = objFSO.CreateTextFile("C:\Documents and Settings\xxx\Bureau\Test Script CSV\Test.csv") ^{objFile.WriteLine "Name,Address,Phone"
   objfile.WriteLine "Test,Test2,,Test3"
   objFile.Write strNewContent} ^{objFile.Close}

La seule chose que je veux... C'est de commencer à prendre les infos du fichier test.txt à partir de la deuxième ligne... Avez vous la solution

cs_Jack · Accepted Answer

Salut Bah il te suffit de lire la première ligne mais de ne pas la traiter. Insère ^{strLine = objFile.ReadLine
juste avant ton Do Until} Vala Jack, MVP VB NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

VBS : Commencer à partir d'une ligne d'un CSV

1 réponse

Votre réponse

Discussions similaires