
Bind an ado recordset directly to an ado data control (adodc)
Hi
Can't you just set the recordset property of the ado data control? The
following
code seems to work fine... Is this what you need, or am I missing something?
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
' open data connection and open recordset
cn.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & App.Path &
"\db1.mdb;"
rs.Open "select * from tblTest", cn, adOpenStatic, adLockReadOnly
Set Adodc1.Recordset = rs
Adodc1.Refresh
' display the nr of rows in the recordset
MsgBox Adodc1.Recordset.RecordCount
' kill objects
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing
Jurgen
Quote:
> Can an ado recordset be directly bound to an ado data control? If so,
how?