Working on a tool which imports old Excel workbooks into a formatted workbook, then exports the formatted workbook to Access tables. It's working perfectly on my machine, but when my co-worker tries to run it, he gets "[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key Temporary (volatile) Ace DSN for process" on line 6 of the following code-
Expand|Select|Wrap|Line Numbers
- Sub exportInformation()
- Dim cn As ADODB.Connection, rs As ADODB.Recordset, iXCoord As Integer, sSheet As Worksheet, iRow As Integer, toAdd As Boolean, crs As ADODB.Recordset
- Set sSheet = ThisWorkbook.Sheets(1)
- Set crs = New ADODB.Recordset
- Set cn = New ADODB.Connection
- cn.Open "Driver={Microsoft Access Driver (*.mdb, *.accdb)}; Dbq=Z:\_Database\TestDatabase.accdb; Uid = Admin; Pwd = ;" '<-- Causes error
- Set rs = New ADODB.Recordset
- rs.Open "BOM", cn, adOpenKeyset, adLockOptimistic
Thank you in advance!
-RW