> Sub GetARegistry()
>      MyKey = GetSetting("myProgram", "myRegistry", "myProgramAutoKey",
> "12345678")
> End Sub
> 
> Sub SaveARegistry()
>        SaveSetting "myProgram", "myRegistry", "myProgramAutoKey", MyKey
> End Sub
Paul, look at the queryRegistry() and setRegistry() functions.