[AccessD] Bind Form to RecordSet

Salakhetdinov Shamil mcp2004 at mail.ru
Sun Feb 24 13:07:33 CST 2013

 Hi Arthur --

Access forms can be bound to ADODB recordsets only.

-- Shamil

Воскресенье, 24 февраля 2013, 13:16 -05:00 от Arthur Fuller <fuller.artful at gmail.com>:
>I'm playing around with ways to do this but am running into a problem.
>The form_open looks like this:
>Dim db As DAO.Database
>Dim rs As DAO.Recordset
>Dim strSQL As String
>Set db = CurrentDb
>strSQL = "SELECT * FROM Volunteers WHERE LastName IS NOT NULL " & _
>         "ORDER BY LastName"
>' Open the recordset
>Set rs = db.OpenRecordset(strSQL)
>With rs
>    If .EOF And .BOF Then
>        MsgBox "No records returned."
>    Else
>        .MoveFirst
>        While Not .EOF
>            Debug.Print rs("VolunteerID"), rs("LastName")
>            .MoveNext
>        Wend
>    End If
>End With
>MsgBox "Setting new record source"
>Debug.Print "Setting new record source"
>'Here's where I get busted:
>'Set Me.RecordSource = rs
>Set rs = Nothing
>End Sub
>I read something from microsoft on how to bind a form to a recordset but
>the example was bound to a SQL Server db, and I wanted to keep it simple -
>just create a local recordset and then assign it to the recordsource.
>So I'm confused. Every previous time I've altered RecordSource it's been by
>substituting a string. But the code in the MS example uses exactly the
>syntax that failed me above.
>Any suggestions, people?
>AccessD mailing list
>AccessD at databaseadvisors.com
>Website:  http://www.databaseadvisors.com

More information about the AccessD mailing list