Страница: 1 |
Страница: 1 |
Вопрос: Большой текст.файл без #13. Help!
Добавлено: 28.02.06 15:18
Автор вопроса: Kvv
Народ, подскажите!
Есть большой тестовый файл, который генерит БД. Так вот в нем в качестве признака конца строки стоит #10, и обычное построчное чтение не работает!
Поскажите, как бы его прочитать в строковыю переменную ?(чтобы дальше работать нужна именно строка).
Могу прочитать его в массив
Dim buffer() As Byte
Open "test.txt" For Binary As #5
Get #5, , buffer
но как массив этот в строку конвертнуть???
Или еще какой способ есть ?
Файл 10Мб
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Sacred Phoenix
ICQ: 304238252
Вопросов: 52
Ответов: 927
Профиль | | #1
Добавлено: 28.02.06 15:29
Dim strBuffer$
Open "Test.txt" For Binary As #5
strBuffer=String(LOF(5), Chr(0))
Get #5, , strBuffer
Close #5
Сорри, если есть ерроры , писал по памяти