ThisIsntMyRealName
Board Regular
- Joined
- May 23, 2009
- Messages
- 69
Hey guys, what object reference do I need in ACCESS 2010 VBA to make this work?
Dim Cn As ADODB.Connection '* Connection String
Dim oCm As ADODB.Command '* Command Object
Dim sName As String
Dim sLocation As String
Dim iRecAffected As Integer
On Error GoTo ADO_ERROR
Set Cn = New ADODB.Connection
Cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\access\ACCESS_ITSupport_VBACode.accdb;Persist Security Info=False"
Cn.ConnectionTimeout = 40
Dim Cn As ADODB.Connection '* Connection String
Dim oCm As ADODB.Command '* Command Object
Dim sName As String
Dim sLocation As String
Dim iRecAffected As Integer
On Error GoTo ADO_ERROR
Set Cn = New ADODB.Connection
Cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\access\ACCESS_ITSupport_VBACode.accdb;Persist Security Info=False"
Cn.ConnectionTimeout = 40