J'ai déjà mis ce message sur le forum "A l'aide". Le le remmets ici pour les pro du texte.

Je patauge!
Comment faire pour recopier une Richtextbox dans un fichier Richtextfile? j'élimine le cas où l'on recopie ligne par ligne.

j'utilise: " ma_rtb.SaveFile (ma_rtb.FileName) "
le nom de fichier ayant été définit par l'appel à un commondialog.
Ca semble marcher si le fichier existe déjà, mais ne marche pas s'il s'agit d'un nouveau fichier.
Faut il fair qqchose de plus que l'appel "dlg.ShowSave" ?
Y a t'il un exemple sur ce site ou une question dans le forum? J'ai déjà fouillé mais n'ai pas trouvé de réponse.

Merci d'avance aux accros des forum sympa.

AZot

si ça ne marche pas lorsque le fichier n'existe pas, crées le...

voici ce qu'il faut faire :

dim IDFichier as integer 'numéro qui va identifier ton fichier

IDFichier = FreeFile 'IDFichier reçoit un numéro unique afin d'effectuer différentes opérations sur un fichier

open "ton_fichier.*" for binary as #IDFichier 'ouvre ton fichier et/ou le crée s'il n'existe pas
close #IDFichier

pour voir si un fichier existe déjà, vérifies sa taille :

Taille = FileLen("ton_fichier.*")

si Taille = 0, alors il est vide ou inexistant.

.:. NoRabbit .:.

Salut,

J'ai déjà utiliser le RichTextbox pour sauver dans un nouveau fichier et cela fonctionne.
Voici la syntaxe:
RichTextBox1.SaveFile CommonDialog1.Filename, rtfRTF


A+

Salut,

J'ai déjà utilisé le RichTextbox pour sauver dans un nouveau fichier et cela fonctionne.
Voici la syntaxe:
RichTextBox1.SaveFile CommonDialog1.Filename, rtfRTF


A+

Merci à tous. J'ai m...é un bon bout de temps avec un morceau de code que j'avais récuperé et qui ne fonctionne pas. Finalement j'ai fait un micro-programme de 8 lignes nommé RTB_RTF. Je n'ai pas résisté je l'ai soumis en code source sur ce site.
JPP
AZot