Populating MsHFlexgrid with ADODB recordset

Hi,

im trying to populate an Flexgrid with data from a recordset using an ADO connection. I can't seem to get it going.

Code:



Private Sub Command1_Click()
Dim myconn As ADODB.Connection
Dim myRecSet As ADODB.Recordset
Dim strdata As String
Set myconn = New ADODB.Connection
myconn.ConnectionString = "Provider=microsoft.jet.OLEDB.4.0;Data Source=N:\db2.mdb;"
myconn.Open



Do While Not myRecSet.EOF
strdata = "SELECT * FROM Accounts"
Flexgrid.AddItem (strdata)
Loop

End Sub


Any Ideas?

Cheers,

Sam

Hi,
Have a look here:
http://www.visualbasicforum.com/showthread.php?t=35110

On the other hand if you switch to MSHFlexGrid all it'd take to populate the grid is:

Set MyMSHFlexGrid.Recordset=rs


Shurik.

That simple?

Thanks mate.

Sam