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 Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
remote connetion to Access
- Thread starter RTornberg
- Start date
I have my own DLL I have created to connect to a DNS-less database (Not ODBC). Here is some code to help...
Public Sub CCADORead(CCDBFile As String, CCSQL As String)
Set CCConn = CreateObject("ADODB.Connection"
Set CCRSRecordset = CreateObject("ADODB.Recordset"
CCConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & CCDBFile
CCConn.Open (CCConnString)
CCRSRecordset.Open CCSQL, CCConn, 1, 2
End Sub
Public Sub CCADORead(CCDBFile As String, CCSQL As String)
Set CCConn = CreateObject("ADODB.Connection"
Set CCRSRecordset = CreateObject("ADODB.Recordset"
CCConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & CCDBFile
CCConn.Open (CCConnString)
CCRSRecordset.Open CCSQL, CCConn, 1, 2
End Sub
- Status
