مشکل در Encoding ؟!

[zizi_zizi69]

با سلام

من چند وقتی هست که درگیر این word و نمایش آن هستم !
الان در این مرحله هستم که با اینکه فایلم متنی داره ولی در
WordViewer اون را نمایش نمی ده؟!
و وقتی فایلم را باز می کنم(در محیط word) پیغام file conversion رو میگیره ؟!
در حالی که من در هنگام write روی فایل دستور UTF8Encoding(True) را استفاده کردم؟!

http://i40.tinypic.com/bh12q0.jpg

[shahrdar]

سلام دوست عزيز
من حدوده 1 ساله تمام دنباله حل اين مشکل بودم که پيداش کردم.
جواب سؤال خيلی راحته.
چند تا راه داره که يک راه سادش اينه:



Dim sr As New IO.StreamReader("Path", System.Text.Encoding.Default)
R.Text = sr.ReadToEnd()

[shahrdar]

درضمن دوست عزيز ، من فکر نميکنم با io.filestream بتونی فايل های DOC رو بخونی!!!!

[zizi_zizi69]

دوست عزیز پاسخ خوبی بود,دیگر در نمایش در Richtextbox مشکل ندارم.
ولی در هنگام نوشتن در فایل هم از StreamWritet استفاده کردم ولی وقتی word رو باز می کنم هنوز همون باکس file conversion میآد.

Dim path As String = "d:MyTest.doc"
Dim fs As FileStream
' Delete the file if it exists.
If File.Exists(path) = False Then
' Create the file.
fs = File.Create(path)
fs.Close()
End If
'
Dim SwFromFileTrueUTF8 = New StreamWriter(path, True, System.Text.Encoding.UTF8)
SwFromFileTrueUTF8.Write("به نام او")
SwFromFileTrueUTF8.Flush()
SwFromFileTrueUTF8.Close()
'
Dim sr As New IO.StreamReader("d:MyTest.doc", System.Text.Encoding.UTF8)
RichTextBox1.Text = sr.ReadToEnd()
fs.Close()

[zizi_zizi69]

درضمن دوست عزيز ، من فکر نميکنم با io.filestream بتونی فايل های DOC رو بخونی!!!!

من که با این دستور فایل doc را ایجاد کردم ,حالا درست یا غلط بودنش رو نمی دونم

Dim fs As FileStream
' Create the file.
fs = File.Create("d:MyTest.doc")