Hello - I've been asked to get a Access 2003 app working in Office 2013, and one of the things that is broken is a missing library reference to Microsoft Office XP Web Components.
I gather from searches that it's no longer supported.
So, how do you read & write registry values in Access 2013?
What I need to do specifically is write a registry key that prevents the SQL Server Security check message that pops up when you do a mail merge (since about Access 2003?)
Thanks in advance for your help
Public Function ChkRpaKeys(RKey As String, RName As String) As Long
'-- check for the "SQLSecurityCheck" registry key...
Dim lngRetVal As adhRegErrors
Dim strValue As String
Const adhcMaxDataSize = 1024
strValue = Space(adhcMaxDataSize)
lngRetVal = adh_accRegGetVal(adhcHKEY_CURRENT_USER, RKey, RName, strValue, Len(strValue))
If lngRetVal = adhcAccErrSuccess Then
'MsgBox "Registry Key Found - Value: " & vbCrLf & vbCrLf & strValue
lngRetVal = adh_accRegWriteVal(adhcHKEY_CURRENT_USER, RKey, RName, 0, adhcREG_DWORD)
'MsgBox "Registry Key Created"