my connection to my SQL7 database works fine in the code but
now what do i do what code do i put in here so i can
display my results from my query in a msflexgridcontrol
called msflexgrid1 any ideas???

Code:
Private Sub Command1_Click()

Dim dyna As Recordset
Dim theError As Long
Dim theid As Long


 theid = txtCandidateID
 SQL = "Select historydate,historyaction,historyconsultant,historyquicknotes from candidate  where candidateID = " & theid & "'"
On Local Error Resume Next

Set dyna = db.OpenRecordset(SQL, dbOpenDynaset, dbSQLPassThrough + dbSeeChanges)
theError = Err
On Local Error GoTo 0
'now what do i do what code do i put in here so i can
'display my results from my query in a msflexgridcontrol
'called msflexgrid