Keep From Copying Database

[jmyersnc]

I am wanting to develop an Access database, prob in 2007. When I develop it, I want to be able to sell it. I want a way to have the customer to register it and not be able to give a blank copy to his/her buddies. Is there a way to do this?

[llkhoutx]

Have registration be limited to 1 PC computer.Surreptitiously capture the unique computer name when registering the program and save same in a hidden table or in the registry. You could save the "computer name" in some oscure hidden folder and file in folder Program Files.

dim txtComputerName as string
txtcomputerName = Environ("Computername")

On startup verify the user's computer name was what was registered by comparing with the hidden file or registry.

Charge a fee for resetting the registration (resetting the "compouter name" to that of a new computer.

A snoopy user may be able to find what you did, but it wouldn't be easy.

Alternatively encrypt a dongle with the computer name.

[llkhoutx]

I gave you the wrong argument for the Environ function. The user can change the computer name.

try

Dim fso As New FileSystemObject
    GetSerialNumber =  fso.GetDrive(drive).SerialNumber 

I apologize for the inconvenience.