Read Only - DB

[Guest]

Access 97 - I am putting a totally new (renamed) version of an applicaton
into production. I would like to prevent the users from entering data into
the old production system (i.e. Convert to Read Only). I tried a very simple
approach, from the Installation program for the new application I coded:

dim Db as Database

set Db = OpenDatabBase("C:\OldApplicationName")

None of the listed properties for DB seem to allow me to convert the old
application to a "Read Only" status.

Any ideas would be appreciated.

Dean

P.S. I couple of people have mentioned that this process can be "easily"
done through Explorer. Unfortunately, my users are spread across the U.S.
and Canada and many are computer iliterate. So, I need a programable answer,
not something that requires user interaction.

Thanks

 

[Nikos Yannacopoulos]

Dean,

How about:

SetAttr "C:\OldApplicationName", vbReadOnly

HTH,
Nikos

 

[John Griffiths]

Check out in Help

Sub SetAttr(PathName As String, Attributes As VbFileAttribute)

and

Function GetAttr(PathName As String) As VbFileAttribute

where

VbFileAttribute
vbNormal 0 Normal.
vbReadOnly 1 Read-only.
vbHidden 2 Hidden.
vbSystem 4 System file. Not available on the Macintosh.
vbDirectory 16 Directory or folder.

Regards John