Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Connect to Oracle from Access w/ADO (not ODBC)
- Thread starter DavidTN
- Start date
This is from VB6. It should work within Access.
Dim objConn As ADODB.Connection
Dim rsTmp As ADODB.Recordset
Dim strConnect as String
strConnect="Provider=OraOLEDB.Oracle.1;Password=some_password;Persist Security Info=True;User ID=User1;Data Source=DBname"
Set rsTmp = CreateObject("ADODB.Recordset"
Set objConn = CreateObject("ADODB.Connection"
objConn.Open sConnect
With rsTmp
.CursorLocation = adUseClient
.Open "Select * from some_table", objConn, adCursorType, adLockType
Set .ActiveConnection = Nothing
End With
Set CallingFunctionName = rsTmp
Dim objConn As ADODB.Connection
Dim rsTmp As ADODB.Recordset
Dim strConnect as String
strConnect="Provider=OraOLEDB.Oracle.1;Password=some_password;Persist Security Info=True;User ID=User1;Data Source=DBname"
Set rsTmp = CreateObject("ADODB.Recordset"
Set objConn = CreateObject("ADODB.Connection"
objConn.Open sConnect
With rsTmp
.CursorLocation = adUseClient
.Open "Select * from some_table", objConn, adCursorType, adLockType
Set .ActiveConnection = Nothing
End With
Set CallingFunctionName = rsTmp
- Status
Similar threads
- Locked
- Question