[VB] Copie fichier TXT vers fichier TXT : Perte mise en forme

Copie fichier TXT vers fichier TXT : Perte mise en forme [VB] - VB/VBA/VBS - Programmation

Marsh Posté le 10-04-2008 à 09:27:36    

Bonjour,
 
Je souhaite copier, en ligne par ligne, le contenu d'un fichier text vers un autre fichier text, mais je perds la 'mise en page'.
 
Exemple de fichier source :


 
  Ceci est le contenu
   de mon
  fichier


 
Ca donne après copie :


Ceci est le contenu
de mon
fichier


 
Comme faire pour conserver les tabulations ?


Message édité par SplitForm le 10-04-2008 à 09:28:29
Reply

Marsh Posté le 10-04-2008 à 09:27:36   

Reply

Marsh Posté le 10-04-2008 à 09:39:54    

C'est quoi ton code actuel ?


---------------
Feedback : http://forum.hardware.fr/hfr/Achat [...] 2666_1.htm
Reply

Marsh Posté le 10-04-2008 à 10:44:22    

Ben je fais un bête :
 

Open Source For Input As #1
Open Destination For Output As #2
 
While Not EOF(1)
Input #1, Ligne
Print #2, Ligne
wend
 
Close #1
Close #2

Reply

Marsh Posté le 10-04-2008 à 11:04:12    

Une petite piste : tu peux essayer l'ouverture et l'écriture en binaire pour voir ce que ca donne


---------------
Feedback : http://forum.hardware.fr/hfr/Achat [...] 2666_1.htm
Reply

Marsh Posté le 10-04-2008 à 11:24:41    

Salut

Line Input#1,Ligne


 
Sinon via Via Microsoft Scripting Runtime et FSO

FSO.CopyFile Fichier, DossierDest & "\" & Nom, False

Message cité 1 fois
Message édité par kiki29 le 10-04-2008 à 11:29:51
Reply

Marsh Posté le 10-04-2008 à 11:42:43    

kiki29 a écrit :

Salut

Line Input#1,Ligne


 


 
Nickel pile poil  [:yaisse2]  
 
Merci  :jap:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed