The computer I am developing on has a newer version of the following file.
C:\PROGRAM FILES\COMMON FILES\SYSTEM\ADO\MSADOX.DLL
The development version is 2.7 and the app is loaded on clients with version 2.5. Even though the reference dll name is the same the reference always shows up missing on the client PC's.
I run this code in the AutoExec macro but the reference does not get fixed.
'Count the number of references in the database
intCount = Access.References.Count
'Loop through each reference in the database
'and determine if the reference is broken.
'If it is broken, remove the Reference and add it back.
For intX = intCount To 1 Step -1
Set loRef = Access.References(intX)
With loRef
Debug.Print " reference = "; .FullPath
blnBroke = .IsBroken
If blnBroke = True Or Err <> 0 Then
strPath = .FullPath
With Access.References
.Remove loRef
.AddFromFile strPath
End With
End If
End With
Next
The reference shows up as broken in the above code.
How can I fix this reference in code????
C:\PROGRAM FILES\COMMON FILES\SYSTEM\ADO\MSADOX.DLL
The development version is 2.7 and the app is loaded on clients with version 2.5. Even though the reference dll name is the same the reference always shows up missing on the client PC's.
I run this code in the AutoExec macro but the reference does not get fixed.
'Count the number of references in the database
intCount = Access.References.Count
'Loop through each reference in the database
'and determine if the reference is broken.
'If it is broken, remove the Reference and add it back.
For intX = intCount To 1 Step -1
Set loRef = Access.References(intX)
With loRef
Debug.Print " reference = "; .FullPath
blnBroke = .IsBroken
If blnBroke = True Or Err <> 0 Then
strPath = .FullPath
With Access.References
.Remove loRef
.AddFromFile strPath
End With
End If
End With
Next
The reference shows up as broken in the above code.
How can I fix this reference in code????