Открытие файла

Открывать можно как существующие на диске, так и новые файлы. Каждый файл идентифицируется в программе определенным номером, который присваивается ему в момент открытия. Свободный номер файла можно определить с помощью встроенной функции FileFree, которая возвращает очередной свободный номер для открытия файла (номер изменяется в диапазоне 1-511).

Файл открывают в определенном режиме работы:

Open <путь_имя_файла> [For <режимы>] [Access <направление_потока>]

[<блокировка>] As [#]номер [Lеn=<длина_записи>]

где <путь_имя_файла> - строка символов, задающая местоположение и имя дискового файла;

<режимы> - режимы работы с файлом:

Append добавление записей

Binary двоичный файл

Input файл для чтения

Output файл для записи

Random файл произвольного доступа;

<направление_потока> - задает тип потока данных по отношению к файлу:

Read только чтение

Write только запись

Read Write чтение и запись одновременно;

<блокировка> - определяет возможность работы с файлом других приложений:

Shared распределенный доступ

Lock Read блокировка файла для чтения

Lock Write блокировка файла для записи

Lock Read Write блокировка файла для чтения и записи;

номер - условный идентификатор файла;

<длина_записи> - указывается для записей фиксированной длины, максимум – 32767

байт. Оптимальная длина записи кратна размеру дискового сектора (512

байт).

Для файлов произвольного доступа объявляется структура записи с помощью оператора Туре;указываются типы и длина компонентов структуры. В режимах Binary, Input, Random под разными номерами можно открыть один и тот же файл, не закрывая ранее открытых; в режимах Append, Output требуется предварительно закрыть ранее открытые файлы.

Пример 19.27. Открытие файлов

Текст программы Комментарий
Open "FILE" For Input As #1 Open "FILE" For Binary Access Write As #1 Type Record Define userdefined type ID As Integer Name As String * 20 End Type Dim MyRecord As Record Open "FILE" For Random As #1 Len = Len(MyRecord)   Open "FILE" For Output Shared As #1     Open "FILE" For Binary Access Read Lock Read As #1 Открытие последовательного файла для чтения Открытие двоичного файла только для записи   Объявление пользовательского типа данных     Открытие файла произвольного доступа. Длина записи файла определяется встроенной функцией Len Открытие последовательного файла с распределенным доступом (любые приложения могут читать и писать в файл) Открытие двоичного файла для чтения, чтение файла другим приложениям запрещено

Наши рекомендации