code page problem

[David Scemama]

Hi,

I'm developing an application that reads data from a file. The data has been
encoded using code page 850.
I use the FileOpen function to open the file and the FileGet function to
read the records, but the string I read is encoded using code page 1252.

Is there a way to specify the codepage before reading the data, or do I have
to convert every string I find ?
I've found a sample of convertion function in the help, but it slows down my
application:

Protected Function ConvertString(B yVal str As String) As String
Dim enc As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(850)
Dim encw As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(1252)

' Convert the string into a byte[].
Dim wBytes As Byte() = encw.GetBytes(s tr)

' Perform the conversion from one encoding to the other.
Dim bytes As Byte() = System.Text.Enc oding.Convert(e nc, encw,
wBytes)

' Convert the new byte[] into a char[] and then into a string.
' This is a slightly different approach to converting to illustrate
' the use of GetCharCount/GetChars.
Dim asciiChars(encw .GetCharCount(b ytes, 0, bytes.Length)) As Char
encw.GetChars(b ytes, 0, bytes.Length, asciiChars, 0)
Dim asciiString As New String(asciiCha rs)

Return asciiString
End Function

Thanks for your help

David

[Dmitriy Lapshin [C# / .NET MVP]]

Hi David,

You can use StreamReader which allow for specifying the source encoding upon
instance construction.

--
Dmitriy Lapshin [C# / .NET MVP]
X-Unity Test Studio
http://x-unity.miik.com.ua/teststudio.aspx
Bring the power of unit testing to VS .NET IDE

"David Scemama" <da***********@ nospam.wanadoo. fr> wrote in message
news:uy******** *****@TK2MSFTNG P11.phx.gbl...

Hi,

I'm developing an application that reads data from a file. The data has been encoded using code page 850.
I use the FileOpen function to open the file and the FileGet function to
read the records, but the string I read is encoded using code page 1252.

Is there a way to specify the codepage before reading the data, or do I have to convert every string I find ?
I've found a sample of convertion function in the help, but it slows down my application:

Protected Function ConvertString(B yVal str As String) As String
Dim enc As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(850)
Dim encw As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(1252)

' Convert the string into a byte[].
Dim wBytes As Byte() = encw.GetBytes(s tr)

' Perform the conversion from one encoding to the other.
Dim bytes As Byte() = System.Text.Enc oding.Convert(e nc, encw,
wBytes)

' Convert the new byte[] into a char[] and then into a string.
' This is a slightly different approach to converting to illustrate ' the use of GetCharCount/GetChars.
Dim asciiChars(encw .GetCharCount(b ytes, 0, bytes.Length)) As Char
encw.GetChars(b ytes, 0, bytes.Length, asciiChars, 0)
Dim asciiString As New String(asciiCha rs)

Return asciiString
End Function

Thanks for your help

David

[David Scemama]

I'm using FileGet because I'm reading records and using it, I directly get
the records filled after reading.
Is there a way to do the same using streamreader ?
David

"Dmitriy Lapshin [C# / .NET MVP]" <x-****@no-spam-please.hotpop.c om> wrote
in message news:eI******** ******@TK2MSFTN GP09.phx.gbl...

Hi David,

You can use StreamReader which allow for specifying the source encoding upon instance construction.

--
Dmitriy Lapshin [C# / .NET MVP]
X-Unity Test Studio
http://x-unity.miik.com.ua/teststudio.aspx
Bring the power of unit testing to VS .NET IDE

"David Scemama" <da***********@ nospam.wanadoo. fr> wrote in message
news:uy******** *****@TK2MSFTNG P11.phx.gbl...

Hi,

I'm developing an application that reads data from a file. The data has been

encoded using code page 850.
I use the FileOpen function to open the file and the FileGet function to
read the records, but the string I read is encoded using code page 1252.

Is there a way to specify the codepage before reading the data, or do I

have

to convert every string I find ?
I've found a sample of convertion function in the help, but it slows down my

application:

Protected Function ConvertString(B yVal str As String) As String
Dim enc As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(850)
Dim encw As System.text.Enc oding =
System.Text.Enc oding.GetEncodi ng(1252)

' Convert the string into a byte[].
Dim wBytes As Byte() = encw.GetBytes(s tr)

' Perform the conversion from one encoding to the other.
Dim bytes As Byte() = System.Text.Enc oding.Convert(e nc, encw,
wBytes)

' Convert the new byte[] into a char[] and then into a string.
' This is a slightly different approach to converting to

illustrate

' the use of GetCharCount/GetChars.
Dim asciiChars(encw .GetCharCount(b ytes, 0, bytes.Length)) As

Char encw.GetChars(b ytes, 0, bytes.Length, asciiChars, 0)
Dim asciiString As New String(asciiCha rs)

Return asciiString
End Function

Thanks for your help

David