Streamreader problem

[Jack Russell]

I have the following code in VB.net 2003

Dim s As String
Dim sr As StreamReader = New StreamReader("t est.txt", New
UTF7Encoding)
s = sr.ReadLine
Debug.Write(s)

If the string read is 1+.03 it converts it to 1.3

If I remove the UTF7encoding option it does not.

Why should the encoding cause a text string to do arithmetic work? and
can I prevent it.

Thanks

Jack Russell

[Ryan S. Thiele]

Re: Streamreader problem

I think it's in the UTF encoding.
The '+' may not be a valid charactor, so it ignores it.
Can you avoid UTF7? UTF8 seems to work fine.

--
Thiele Enterprises - The Power Is In Your Hands Now!
"Jack Russell" <jackr@norubbis h.tpg.com.auwro te in message
news:OXEO%23N88 GHA.3552@TK2MSF TNGP03.phx.gbl. ..

>I have the following code in VB.net 2003
>
Dim s As String
Dim sr As StreamReader = New StreamReader("t est.txt", New
UTF7Encoding)
s = sr.ReadLine
Debug.Write(s)
>
If the string read is 1+.03 it converts it to 1.3
>
If I remove the UTF7encoding option it does not.
>
Why should the encoding cause a text string to do arithmetic work? and can
I prevent it.
>
Thanks
>
Jack Russell

[Jack Russell]

Re: Streamreader problem

Ryan S. Thiele wrote:

I think it's in the UTF encoding.
The '+' may not be a valid charactor, so it ignores it.
Can you avoid UTF7? UTF8 seems to work fine.
>

You are right, I just discovered that UTF7 regards + as an escape character.

I have files written by the old Fileopen, printline,filec lose method

I use streamreader to read these as it seems much faster than openfile,
lineinput.

It all works fine until I try to read files containing French such as

äüöéèà

The only way I can find to read these is with UTF7, everything else
ignores them.

Any ideas gratefully received.

Jack

[Ryan S. Thiele]

Re: Streamreader problem

Try Binary:

Dim sr As New BinaryReader(Fi le.OpenRead("te st.txt"))
Do While sr.PeekChar >= 0
Console.Write(C hr(sr.ReadByte) )
Loop
sr.Close()

Notice I used chr code to convert bye to character.


--
Thiele Enterprises - The Power Is In Your Hands Now!


--
"Jack Russell" <jackr@norubbis h.tpg.com.auwro te in message
news:OJxCu9$8GH A.5012@TK2MSFTN GP06.phx.gbl...
Ryan S. Thiele wrote:

I think it's in the UTF encoding.
The '+' may not be a valid charactor, so it ignores it.
Can you avoid UTF7? UTF8 seems to work fine.
>

You are right, I just discovered that UTF7 regards + as an escape character.

I have files written by the old Fileopen, printline,filec lose method

I use streamreader to read these as it seems much faster than openfile,
lineinput.

It all works fine until I try to read files containing French such as

äüöéèà

The only way I can find to read these is with UTF7, everything else
ignores them.

Any ideas gratefully received.

Jack

[Jack Russell]

Re: Streamreader problem

Ryan S. Thiele wrote:

Try Binary:
>
Dim sr As New BinaryReader(Fi le.OpenRead("te st.txt"))
Do While sr.PeekChar >= 0
Console.Write(C hr(sr.ReadByte) )
Loop
sr.Close()
>
Notice I used chr code to convert bye to character.
>
>

Well that works thanks but with the large files that I am reading it is
horrendously slow which is why I went to streamreader in the first
place!! Any other ideas?

[Chris Dunaway]

Re: Streamreader problem

Jack Russell wrote:

Ryan S. Thiele wrote:
>

Try Binary:

Dim sr As New BinaryReader(Fi le.OpenRead("te st.txt"))
Do While sr.PeekChar >= 0
Console.Write(C hr(sr.ReadByte) )
Loop
sr.Close()

Notice I used chr code to convert bye to character.

Well that works thanks but with the large files that I am reading it is
horrendously slow which is why I went to streamreader in the first
place!! Any other ideas?

Have you tried Encoding.Defaul t instead of UTF7? What encoding was
used to write the file?

[Ryan S. Thiele]

Re: Streamreader problem

Are you editing the text? Use a richtext box...

Me.RichTextBox1 .LoadFile("Text .exe", RichTextBoxStre amType.PlainTex t)


--
Thiele Enterprises - The Power Is In Your Hands Now!

--
"Jack Russell" <jackr@norubbis h.tpg.com.auwro te in message
news:edZCp7A9GH A.3384@TK2MSFTN GP05.phx.gbl...
Ryan S. Thiele wrote:

Try Binary:
>
Dim sr As New BinaryReader(Fi le.OpenRead("te st.txt"))
Do While sr.PeekChar >= 0
Console.Write(C hr(sr.ReadByte) )
Loop
sr.Close()
>
Notice I used chr code to convert bye to character.
>
>

Well that works thanks but with the large files that I am reading it is
horrendously slow which is why I went to streamreader in the first
place!! Any other ideas?

[Jack Russell]

Re: Streamreader problem

Chris Dunaway wrote:

Jack Russell wrote:
>

>>Ryan S. Thiele wrote:
>>
>>

>>>Try Binary:
>>>
>>>Dim sr As New BinaryReader(Fi le.OpenRead("te st.txt"))
>>>Do While sr.PeekChar >= 0
>> Console.Write(C hr(sr.ReadByte) )
>>>Loop
>>>sr.Close()
>>>
>>>Notice I used chr code to convert bye to character.
>>>
>>>

>>
>>Well that works thanks but with the large files that I am reading it is
>>horrendousl y slow which is why I went to streamreader in the first
>>place!! Any other ideas?

>
>
Have you tried Encoding.Defaul t instead of UTF7? What encoding was
used to write the file?
>

I do not know what encoding was used, it was written using the "old" VB
method of file open, printline, file close. I have not been able to find
out what encoding that uses. Just to recap my problem the file can
contain foregin characters such as äüöéèà. If I do not specify any
encoding when I open the streamreader these get lost. If I specify UTF7
they are found but UTF7 treats + as an escape character. I will try
default but ...

[Andrew Morton]

Re: Streamreader problem

Jack Russell wrote:

Chris Dunaway wrote:

>Have you tried Encoding.Defaul t instead of UTF7? What encoding was
>used to write the file?
>>

I do not know what encoding was used, it was written using the "old"
VB method of file open, printline, file close. I have not been able
to find out what encoding that uses.

I suspect you'll find the bits you need in the help at the
System.Text.ASC IIEncoding section, and something to do with Windows-1252 or
ISO 8859-1.

If you look at your file with a hex editor, do the accented characters
correspond to the ones in this table:-

http://en.wikipedia.org/wiki/Windows-1252

?

Also see http://en.wikipedia.org/wiki/ISO_8859-1.

HTH

Andrew