Ciao a tutti, ho un piccolo problema.
Devo leggere un file txt che in seguito viene suddiviso e importato in un database, il problema si presenta quando nella riga ci sono lettere accentate (àòùèéì), praticamente li elimina facendo sì che la lunghezza della riga non sia più uguale alle altre. Ho provato anche a dare una codifica allo streamreader ma niente... sempre lo stesso.
codice:
Private Function ReadtxtRic(ByVal filename As String) As Boolean
Dim temp As System.Text.ASCIIEncoding = New System.Text.ASCIIEncoding
Dim sr As StreamReader = New StreamReader(filename, temp)
Dim row As String
Do Until sr.Peek = -1
row = sr.ReadLine
If row.Length <> 153 Then
MessageBox.Show("Il file selezionato è errato", "ERRORE", MessageBoxButtons.OK, MessageBoxIcon.Error)
Return False
Exit Function
End If
row = row.Replace("?"c, " "c)
Loop
Return True
End Function
la parte in neretto è quella con la dichiarazione dello stream e l'assegnazione della codifica.
ho provato la unicode e mi mette dei punti interrogativi al posto dei caratteri accentati mentre con quella ascii (standard) li elimina accorciandomi la riga. Come posso fare in modo che vengano lette normalmente??? grazie.