外部テキストファイルの文字を全て消すには？

解決

たっち〜 2004-08-18 17:39:07 No: 115734 IP: [192.*.*.*]

質問があります。お願いします。

VBでRichtextbox内の文字を .txt で上書き保存をできるように
したのですが、それだけでは追加のような感じで、以前保存した
文章の最後から保存をします。
なので、一旦リセットというか、全て消してから保存したいのですが、
そのようなことができますでしょうか？

わかりにくい文で申し訳ないです。
わかる方よろしくお願いします。

編集削除

nanashi 2004-08-18 17:52:39 No: 115735 IP: [192.*.*.*]

つーか保存の際、どういう処理をしてるんですか？

編集削除

たっち〜 2004-08-18 18:10:58 No: 115736 IP: [192.*.*.*]

CommonDialog1.Filter = "テキスト(*.txt)|*.txt"
    CommonDialog1.Flags = cdlOFNOverwritePrompt
    CommonDialog1.ShowSave
    outfile = CommonDialog1.FileName

Open outfile For Append As #FileNumber
    Print #FileNumber, RichTextBox1.text
    Print #FileNumber, RichTextBox2.text
              ・
              ・
              ・
Close #FileNumber

といった具合に.txtに書き込んでいくようにしています。
で、同じファイルを指定した時に、以前保存した状態の次の行から
Richtextの内容が保存されていきます。
わかりますでしょうか？

編集削除

マグ 2004-08-18 18:13:20 No: 115737 IP: [192.*.*.*]

RichTextBoxなのにどのようにして.txt型で保存しているかが気になります。

メモ帳でそのtxt型のファイルを開いて文字など読めるでしょうか?

>全て消してから保存したいのですが

と書かれていますが、そのファイルの中身をすべて消すのではなく、
削除したほうが良いのでは・・・
その上で保存するというのはどうでしょうか?

編集削除

ABC 2004-08-18 18:19:15 No: 115738 IP: [192.*.*.*]

For Appendにしてるから追記されるのでしょう
ここのパラメータに何故Appendを選んだのですか？
追記したいからではじゃないのですか？

新規に書き出すなら
Open outfile For OutpuAs #FileNumber
でしょう。

編集削除

ABC 2004-08-18 18:20:13 No: 115739 IP: [192.*.*.*]

Outpu → Output です。

編集削除

たっち〜 2004-08-18 18:24:49 No: 115740 IP: [192.*.*.*]

txtファイルは普通に開いて読むことはできますよ。

全て消してから、というのは追記されてしまうからなので、
見た目上書きになれば全然OKなんです。

削除のやり方とか全然わからないのですが、
もしよかったら教えていただけますでしょうか・・・？

すみません。教えて教えてばかりで・・・。

編集削除

たっち〜 2004-08-18 18:28:10 No: 115741 IP: [192.*.*.*]

ABCさんの言う通りでした。
ありがとうございました。
マグさんnanashiさんもアドバイスありがとうございました。

こんな初歩的なことで質問してしまって申し訳ありませんでした・・・。
以後気をつけます。

編集削除