Страница: 1 |
Страница: 1 |
Вопрос: Не видит русские буквы
Добавлено: 22.04.08 17:31
Автор вопроса: PVV
Dim PathBl As String = "D:\Dir\File.txt"
Dim strIniPath As String = ""
Dim fi As New System.IO.FileInfo(PathBl)
Dim sr As System.IO.StreamReader = fi.OpenText()
strIniPath = sr.ReadLine()
sr.Close()
Если File.txt содержит строку на латиннице, то все работает отлично, но если строка состоит из русских букв, то VB их не видит и в strIniPath появляется пустая строка. Помогите, очень нужны русские буквы. Заранее спасибо.
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Skywalker
ICQ: 300-70-6пятьЪ
Вопросов: 62
Ответов: 545
Web-сайт:
Профиль | | #1
Добавлено: 22.04.08 19:07
Dim fi As New Systen.IO.StreamReader(PathBl, System.Text.Encoding.GetEncoding(1251))
strIniPath = fi.ReadLine()
Номер ответа: 2
Автор ответа:
PVV
Вопросов: 8
Ответов: 21
Профиль | | #2
Добавлено: 23.04.08 09:54
Ура! Все работает. Yxaxa, Огромное Спасибо!