| Вопрос: Binary mode | Добавлено: 20.07.03 02:01 |
Автор вопроса:  Chill | ICQ: 554200 |
|
Народ, кто-нибудь работал с двоичным доступом в VB.NET? Плз., киньте пример как открывать файл, записывать в него и читать от туда в двоичном режиме. |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  Chill ICQ: 554200 Вопросов: 101 Ответов: 343 |
Профиль | | #1 | Добавлено: 20.07.03 15:07 |
|
Private Sub btnNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnString.Click Const BLOCK_SIZE As Integer = 1024 Static j As Long = 1 Dim strText As New String(" ", BLOCK_SIZE) FileOpen(1, "E:\Books\111.txt", OpenMode.Binary, OpenAccess.Read) FileGet(1, strText, j)
txtText.Text &= strText FileClose(1) j += BLOCK_SIZE End Sub '********************************************** Вот написал, такой код, вроде все работает, только одна проблема, как мне в получившемся тексте заменить символы vbCrLf на vbCR????? |
||
|
Номер ответа: 2 Автор ответа: skl Вопросов: 1 Ответов: 9 |
Профиль | | #2 | Добавлено: 22.07.03 15:28 |
|
А зачем ты двоичный код в строку считываешь? Нужно использовать Byte массив. Также удобно работать со Stream |
||
|
Номер ответа: 3 Автор ответа: ChillICQ: 554200 Вопросов: 101 Ответов: 343 |
Профиль | | #3 | Добавлено: 22.07.03 21:32 |
|
кинь пример плз., а со стримами у меня ничего не получилось не могу разобраться, мне надо очень большой файл считывать, а в стримах не получается указывать с какого байта по какой этот файл читать, т.е. мне не надо открывать весь файл, а только частично. |
||
|
Номер ответа: 4 Автор ответа: sklВопросов: 1 Ответов: 9 |
Профиль | | #4 | Добавлено: 23.07.03 10:33 |
|
Dim i As Integer = FreeFile() FileOpen(i, "c:\text.txt", OpenMode.Binary) Dim arr() As Byte ReDim arr(FileLen("c:\text.txt") - 1) FileGet(i, arr) У FileGet можно задать байт с которого считывать. Если нужна обработка больших объемов данных, то массив будет самый шустрый, тем более что в VBNET по нему сделан поиск и сортировка. А пиши лучше на мыло skl2000@mail.ru |
||
Страница: 1 |