ADODB.Connection undefined
Posted
by Wes Groleau
on Stack Overflow
See other posts from Stack Overflow
or by Wes Groleau
Published on 2009-11-18T23:03:18Z
Indexed on
2010/05/01
2:07 UTC
Read the original article
Hit count: 291
Reference http://stackoverflow.com/questions/1690622/excel-vba-to-sql-server-without-ssis
After I got the above working, I copied all the global variables/constants from the routine, which included
Const CS As String = "Driver={SQL Server};" _ & "Server=**;" _ & "Database=**;" _ & "UID=**;" _ & "PWD=**" Dim DB_Conn As ADODB.Connection Dim Command As ADODB.Command Dim DB_Status As Stringinto a similar module in another spreadsheet. I also copied
Sub Connect_To_Lockbox() If DB_Status <> "Open" Then Set DB_Conn = New Connection DB_Conn.ConnectionString = CS DB_Conn.Open ' problem! DB_Status = "Open" End If End SubI added the same reference (ADO 2.8)
The first spreadsheet still works; the seccond at DB_Conn.Open pops up "Run-time error '-214767259 (80004005)': [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified" Removing the references on both, saving files, re-opening, re-adding the references doesn't help. The one still works and the other gets the error.
?!?
© Stack Overflow or respective owner