Probleme pour ecrire dans un fichier unicode

Résolu
cs_TheMag Messages postés 7 Date d'inscription mercredi 10 décembre 2003 Statut Membre Dernière intervention 8 mars 2007 - 8 mars 2007 à 00:21
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 8 mars 2007 à 22:47
Bonjour,

Je vais essayer d'etre le plus explicite posssible...:)

j'ai un fichier texte unicode composé de bcp de ligne du style :

"config1" "bonjour"
"config2" "Au revoir"

Mon but etant de povoir rajouter des lignes à ce fichier, et donc de lui envoyer
mon texte en unicode
donc j'ai fait :

Close #1
say1 = """config3""" & " " & """bye bye"""""
say1 = StrConv(say1, vbUnicode)
say2 = """config4""" & " " & """commande"""""
say2 = StrConv(say2, vbUnicode)
Open "D:\config.txt" For Append As #1
Print #1, say1
Print #1, say2
Close #1
End Sub

quanj j'ouvre mon fichier j'obtient ça :
"config3" "bye bye""?"config4" "commande""?
le ? etant un carre vide

Bref, ça ne saute pas de ligne, et à chaque print, ça me colle ce  (carre) a la fin,
à la limite ça me gene pas trop vu que le porgrammme va prendre les 2 valeur en tre guillemets,
ce que je veux avant tout, c'est que ça saute une ligne a chaque print #, enfin comme avec un fichier
normal ANSI quoi

Merci d'avance

5 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
8 mars 2007 à 00:58
en fait si le Print rajoute bien un saut de ligne mais pas en unicode










say1 = """config3""" & " " & """bye bye"""""
say1 = StrConv(say1 & vbCrLf, vbUnicode)
say2 = """config4""" & " " & """commande"""""
say2 = StrConv(say2 & vbCrLf, vbUnicode)
Open "D:\config.txt" For Append As #1
Print #1, say1,
Print #1, say2,
Close #1




Daniel
3
cs_TheMag Messages postés 7 Date d'inscription mercredi 10 décembre 2003 Statut Membre Dernière intervention 8 mars 2007
8 mars 2007 à 00:23
arf il y a un " de trop dans mon code le voilà corrigé

Close #1
say1 = """config3""" & " " & """bye bye"""""
say1 = StrConv(say1, vbUnicode)
say2 = """config4""" & " " & """commande"""""
say2 = StrConv(say2, vbUnicode)
Open "D:\config.txt" For Append As #1
Print #1, say1
Print #1, say2
Close #1
End Sub
0
cs_TheMag Messages postés 7 Date d'inscription mercredi 10 décembre 2003 Statut Membre Dernière intervention 8 mars 2007
8 mars 2007 à 08:43
Ca marche tres bien le saut de ligne,

Mais au lieu des 2 virgules par say1 et say2, c'est un ; qu'il faut mettre,
mais ça j'ai trouvé tt seul :)

Un Grand Merci à toi
0
cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 40
8 mars 2007 à 11:30
Et oui Daniel

Le ; laisse le curseur à la position actuelle alors que la , amene le curseur au début de la colonne tabulée suivante. Les colonne sont fictives mais represente en général 8 caractères, valeur d'une tabulation sous DOS.

Cette fonctionnalité est un héritage des vieux basic Dos (Gwbasic, QBasic, .....) et même avant. c'était un moyen simple et rapide à l'époque d'imprimer un document avec mise en forme.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
8 mars 2007 à 22:47
ah oui c'est vrai, désolé
je savais qu'il fallait mettre quelque chose mais j'ai confondu
le Dos c'est très loin
heureusement notre ami a corrigé tout seul.

Daniel
0
Rejoignez-nous