Changement Hexa dans fichier
conan76
Messages postés
32
Date d'inscription
lundi 28 juillet 2003
Statut
Membre
Dernière intervention
9 décembre 2013
-
31 juil. 2006 à 17:27
Dolphin Boy Messages postés 630 Date d'inscription vendredi 5 mai 2006 Statut Membre Dernière intervention 17 février 2007 - 31 juil. 2006 à 19:39
Dolphin Boy Messages postés 630 Date d'inscription vendredi 5 mai 2006 Statut Membre Dernière intervention 17 février 2007 - 31 juil. 2006 à 19:39
A voir également:
- Changement Hexa dans fichier
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
- Fichier json - Conseils pratiques -Javascript
- Vba écrire dans un fichier texte - Conseils pratiques -Visual Basic / VB.NET
- Changement de repere - Forum C / C++ / C++.NET
- Traitement dédoublonnage fichier ✓ - Forum C++ & C++ .NET
1 réponse
Dolphin Boy
Messages postés
630
Date d'inscription
vendredi 5 mai 2006
Statut
Membre
Dernière intervention
17 février 2007
31 juil. 2006 à 19:39
31 juil. 2006 à 19:39
Salut, peut-être qu'en utilisant les vieilles techniques de vb6 ça devrait le faire ?
Dim c As String * 1 (as char en vb.2005)
Open "c:\temp\essai.txt" For Binary As #1 Len = 1
Open "c:\temp\essai1.txt" For Binary As #2 Len = 1
Do While Not EOF(1)
Get #1, , c
If Asc(c) <> 13 And Asc(c) <> 10 Then
Put #2, , c
End If
Loop
Close #1
Close #2
C'est juste une piste, je n'ai pas vb.net en vacances donc je n'ai pas pu tester. Si ça marche, dans essai1.txt il ne devrait plus y avoir de 0D et 0A.
Dim c As String * 1 (as char en vb.2005)
Open "c:\temp\essai.txt" For Binary As #1 Len = 1
Open "c:\temp\essai1.txt" For Binary As #2 Len = 1
Do While Not EOF(1)
Get #1, , c
If Asc(c) <> 13 And Asc(c) <> 10 Then
Put #2, , c
End If
Loop
Close #1
Close #2
C'est juste une piste, je n'ai pas vb.net en vacances donc je n'ai pas pu tester. Si ça marche, dans essai1.txt il ne devrait plus y avoir de 0D et 0A.
