Как определить что к файлу есть доступ по записи?

[kibernetics]

Если файл(обычный *.mdb) лежит на компакт-диске, а я пытаюсь внести в него изменения, то естественно возникает ошибка. Проблема в том, что номер этой ошибки в зависимости от версии ADO на компьютере может быть разным.
Вот и вопрос, как лучше определить есть ли доступ к файлу по записи?

[Gemini]

Function GetAttr(PathName As String) As VbFileAttribute
Member of VBA.FileSystem
Returns the attributes of a file, directory, or folder

Проверяй: vbReadOnly

[Twister]

Того же эффекта можно добиться, используя CreateFile с запросом доступа на запись и не заморачиваясь с FileSystemObject - будет быстрее.