Книга: Excel. Трюки и эффекты
Дескрипторы файлов. Функция FreeFile
Дескрипторы файлов. Функция FreeFile
В среде программирования VBA открытые файлы идентифицируются номерами – дескрипторами. Дескриптор каждого открытого файла должен быть уникальным. Как было видно из примеров открытия файла, программист может сам назначать дескрипторы открываемым файлам (при этом необходимо учитывать, что допустимый диапазон значений дескриптора – 1-511).
Для небольших и простых программ возможность назначать дескрипторы вручную очень удобна. Однако в больших проектах, в которых ведется работа с многими файлами, бывает достаточно сложно следить за правильностью назначения дескрипторов вручную. Для избавления программиста от необходимости контролировать правильность дескрипторов в VBA введена специальная функция FreeFile, имеющая следующий формат:
FreeFile ([Диапазон])
Данная функция возвращает значение типа Long, которое можно использовать в инструкции Open в качестве дескриптора открываемого файла. Единственным параметром данной функции является необязательный параметр Диапазон, который может иметь значение 1 или 0. Если значение параметра равно 0 (по умолчанию), то функция возвращает дескриптор файла из диапазона 1-255. Если же оно равно 1 – значение из диапазона 256–511. Если свободных дескрипторов в диапазоне нет, то функция возвращает нулевое значение.
Ниже приведен пример использования функции FreeFile:
Dim hFile As Long
hFile = FreeFile ' Получение дескриптора для файла
' Открытие файла
Open «D:MyTextFile.txt» For Output As hFile
- Файловый ввод
- Резервное копирование многофайловых баз данных
- Восстановление из резервных копий многофайловых баз данных
- 2.1.3. Функция getopt_long()
- Создание файлов с блокировкой
- Группировка по встроенным функциям и UDF
- Рекомендуемое расширение для файлов баз данных - *.ib
- 19.1.1. Функция jQuery()
- Функция strcmp( )
- Создание многофайловой базы данных
- Правила именования файлов
- Глава 6 Файловые системы