Jag har lite problem med att läsa en textfil som ett annat program genererar om jag inte sparar om textfilen i formatet UNICODE i anteckningar. Annars försvinner ÅÄÖ spårlöst...

Min nuvarande kod:

Dim sr As IO.StreamReader
Dim strText As String

Do Until sr.Peek = -1
strText = sr.ReadLine.Trim
'gör lite jox med strText
loop
sr.Close()

Titta under System.Text, där kan det finnas något användbart.

Citat från msdn: <b>StreamReader defaults to UTF-8 encoding unless specified otherwise, instead of defaulting to the ANSI code page for the current system. UTF-8 handles Unicode characters correctly and provides consistent results on localized versions of the operating system.</b>

Du måste alltså explicit ange din encoding om du vill ha nåt annat än utf-8

Om du kör VS2005 skriv

dim s as string
s = file.readalltext("C:\text.text", --din encoding)

Voila, nu ligger hela filen i strengen S