Πριν κάτι μήνες το χρειάστικα και παρακάτω είναι ο κώδικας:
1. Φόρτωμα αρχείων DOS:
'Here we can translate the file from what codepage is being created, in order to see the greek chars
Dim encoding As Encoding = encoding.GetEncoding(737)
Try
FileOpenPWCData.ShowDialog()
If FileOpenPWCData.FileName.Length > 0 Then
strFileName = FileOpenPWCData.FileName
End If
' Create an instance of StreamReader to read from a file.
Dim sr As StreamReader = New StreamReader(strFileName, encoding)
Dim line As String
' Read and display the lines from the file until the end
' of the file is reached.
Ελπίζω να βοήθησα.