ADO Recordset.Open (SQL) does nothing

[workindan]

Can anyone tell me why the select query doesn't pop up? I get the msgbox, so I know the code is running, but the recordset.open command produces nothing. What's wrong? Here's my code:

Private Sub Search_Click()
' Set up ADO Recordset and Connection


' ================================================
Dim myConnection As ADODB.Connection
Set myConnection = CurrentProject.Connection
Dim myRecordset As New ADODB.Recordset
myRecordset.ActiveConnection = myConnection
' ================================================
'
Dim strOps, strEvent, strArea As Integer
Dim mySQL As String

mySQL = "SELECT ReliabilityEvents.IncidentID, ReliabilityEvents.Operation, ReliabilityEvents.TypeofEvent, ReliabilityEvents.Area FROM ReliabilityEvents;"
myRecordset.Open mySQL, , adOpenStatic, adLockOptimistic
MsgBox mySQL
End Sub

[pbaldy]

What is it you're expecting to happen? That should open a recordset, but unless you actually do something with it, nothing visible will happen. If you're expecting to see the results, you don't want a recordset. Set the source of a form or subform to that SQL or something like that. A recordset is generally for working with data behind the scenes.

[workindan]

Thank you - this makes sense. Alright, so my question is just: how do I get the results to show somewhere, maybe in a form? That's all I want to do.

Is there a good resource to learn how to control (via vba) access forms/queries/form controls, etc? I'm familiar with vba, been using it in excel for a while, but I'm still new to access dev. Any help or suggestions on what to read would be helpful. I've already poured through a for-dummies 9-in-1 reference book. Good primer, but doesn't cover my needs.

Thanks everyone, and thanks pbaldy!

[pbaldy]

You could simply make that SQL the record source of a form. In the form's properties, the Record Source property is on the Data tab.