Не получается полностью прочитать 4 Гб файл (4 700 372 992 байт). Читает только первые 405 405 696 байт. Файловая система NTFS.
Переменные:
Dim OpenFile As Integer, S(1 To 16, 1 To 128) As Byte
Открытие файла:
OpenFile = FreeFile
Open txtFile For Random As OpenFile Len = 2048
Чтение:
Get #OpenFile, CLng(txtNum), S
P.S. Интересно, что 405 405 696 байт дает функция FileLen(txtFile).
Что делать?
Чтение 4Гб файла
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 2
• Страница 1 из 1
- Den_x
- Начинающий
- Сообщения: 2
- Зарегистрирован: 10.12.2006 (Вс) 2:01
- Откуда: Украина
Чтение 4Гб файла
Den_x » 10.12.2006 (Вс) 2:20
- GSerg
- Шаман
- Сообщения: 14286
- Зарегистрирован: 14.12.2002 (Сб) 5:25
- Откуда: Магадан
GSerg » 10.12.2006 (Вс) 9:41
Какой оптимистичный юноша...
RTFM!
http://bbs.vbstreets.ru/viewtopic.php?t=27822
http://bbs.vbstreets.ru/viewtopic.php?t=28447
RTFM!
http://bbs.vbstreets.ru/viewtopic.php?t=27822
http://bbs.vbstreets.ru/viewtopic.php?t=28447
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас
Сообщений: 2
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 16