![]() |
Произвольный (Random) доступDate: 2015-10-07; view: 371. Этот вид доступа предполагает, что файл имеет постоянную структуру. В начале работы используется инструкция Open: Open имя_файла For Random [Access - дост][Lock] As [#]ном_файла [Len = длина записи] · имя_файла - имя файла, · Access - доступ задаeт права доступа к файлу. Ниже даны типы доступа и соответствующие примеры: · чтение - Open "file1.dat" For Random Access Read As #1, · запись - Open "file1.dat" For Random Access Write As #1, · чтение и запись - Open "file1.dat" For Random Access Read Write As #1, · без указания - Open "file1.dat" For Random As #1, · Lock определяет права доступа к открытому файлу пользователя/процесса при коллективном использовании: · Shared - все процессы могут писать в файл и считывать из файла, · Lock Read Write - запрет записи в файл и считывания из файла, · Lock Read - запрет считывания из файла, · Lock Write - запрет записи в файл, · As [#]номер_файла - номер файла, · Len определяет длину записи; если значение Len меньше реальной длины записи, то возникает ошибка. Инструкция Close [[[#]номер_файла][, [#]номер_файла] :] используется для закрытия файла. Для записи/чтения используются инструкции Put/Get: Put [#]номер_файла, [номер записи] имя_переменной · номер_файла - номер открытого файла, · номер записи - номер записи, в которую начинается запись данных (записи нумеруются с 1. Если "номер записи" отсутствует, то подразумевается номер следующей записи; его пропуск указывается наличием вместо него запятой, например: Put #2,,), · имя_переменной - имя переменной, содержащей данные, которые будут записаны в файл, Get [#]номер_файла, [номер записи] имя_переменной · номер_файла - номер открытого файла, · номер записи - номер записи, с которой начнeтся считывание данных, · имя_переменной - имя переменной, в которую проводится считывание.
|