Path change

[dref]

Hello,
I have a database which displays this path in the start up form.
I want to block access in case someone changes the path using vba or a macro. Help?
Path is "C:\cage\cafe.mdb".
The code should block when the name of that path changes either thru the form or table.
Thanks

[GeekInOhio]

Not to state the obvious, but why not just remove the text box or label that has that info in it, or make it invisible?

[dref]

Just incase someone is trying to use the database on another computer,it should not open.

[R_Badger]

Try something like this in the form open event.

dim filepath as string
filepath = currentproject.path
filepath= filepath & curentproject.name
if filepath<>"C:\cage\cafe.mdb" then
docmd.quit
endif

This prevents renaming or movement of the file, it will still open, however as soon as the form is loaded, it will check the filepath and if it is incorrect, it will then automatically exit.

[R_Badger]

Having said that, it won't stop it being transferred assuming the filepath on the new machine is identical!

[R_Badger]

Update:

Try this: (again small flaw, if they think to rename their computer it wont work, however!)

dim filepath as string 
filepath = currentproject.path 
filepath= filepath & curentproject.name 
if filepath<>"C:\cage\cafe.mdb" and environ("computername")<>"computername" then 
docmd.quit 
endif