Page 345 Windows Registry APIs

gimmieknowledge · August 21st, 2013, 02:25 PM

Hello all,
I have typed the necessary code starting on page 336 up to page 347. I am stepping through the code on pg 354 at the top under Public Function DeleteValue. I get an compile error msg stating that the variable KEY_ALL_ACCESS is not defined

' Open the key and get its handle
lngReturn = RegOpenKeyEx(lngRootKey, strSubKey, _
0&, KEY_ALL_ACCESS, hKey)

Can any one shed some light on this. I would appreciate it.
Thanks

gjgriffith · August 21st, 2013, 03:47 PM

Hello Gimmieknowledge,

Thank you for posting in the "Access 2010 Programmer's Reference" forum. At this point, I'm wondering if you can send me your code so I can take a look? Please let me know when you have a chance!

Thanks,

gjgriffith · August 22nd, 2013, 02:34 AM

Hello Gimmieknowledge,

So, I took a look at the sample files for this chapter (which you can download from here: http://www.wrox.com/WileyCDA/WroxTit...-DOWNLOAD.html), and I think I can help fix your problem here. It looks like the "KEY_ALL_ACCESS" constant that is used in the code you provided is defined in the "basRegistryFunctions" module of the "RegistrySamples.accdb" database file in the Chapter 10 sample code. I think you should be able to add the following line of code to the top of your VBA module where you use the "RegOpenKeyEx" function. The code should be:

Code:

Private Const KEY_ALL_ACCESS As Long = (( _
    STANDARD_RIGHTS_ALL _
    Or KEY_QUERY_VALUE _
    Or KEY_SET_VALUE _
    Or KEY_CREATE_SUB_KEY _
    Or KEY_ENUMERATE_SUB_KEYS _
    Or KEY_NOTIFY _
    Or KEY_CREATE_LINK) _
    And (Not SYNCHRONIZE))

Anyway, I hope that helps, but if you need anymore help on this, please just let me know and I'll do what I can to help. And thanks again for reading the Access 2010 Programmer's Reference!

Best Regards,

gimmieknowledge · August 22nd, 2013, 08:56 AM

griffith,
I spent some time going over your reply and over the code I typed from the book. Turns out I did have the code that you referenced included in my module. After hours of going over and over this code, it turns out that I had misspelled ACCESS in declaring my constant. One misspelled word and hours of frustration.
It was good practice on using the debugging tools.

Thanks again for your assistance.

gjgriffith · August 23rd, 2013, 10:11 AM

Hello Gimmieknowledge,

I'm so glad to hear that you found the problem in your code. I definitely recommend reusing the sample code for the book when possible, which can be found here: http://www.wrox.com/WileyCDA/WroxTit...-DOWNLOAD.html. And thank you again for reading the "Access 2010 Programmer's Reference" book, we truly appreciate your readership! If there is anything else I can do to help, please just let me know!

Best Regards,