Bonjour à tous,
je travaille en VB6 et je n'arrive pas à comprendre pourquoi lorsque je fias un code comme celui-ci, il me rajoute toujours un chr(13) + chr(10) en début de fichier. Donc, a chaque fois qu'un utilisateur ouvrira le fichier et le modifiera, un chr(13) + chr(10) s'ajoitera en début de fichier
merci par avance de votre aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Open "C:\........" + entarchive + ".dat" For Input As #1 i = 0 While Not EOF(1) i = i + 1 Line Input #1, x If x <> nomprodarchive Then prodfour2 = prodfour2 + LFCR + x End If Wend Close #1 Open "C:\........." + entarchive + ".dat" For Output As #1 Print #1, prodfour2 Close #1
Partager