emory only recordset bound to a grid?

I got the following code this morning and it is working perfectly:

  Dim r As ADODB.Recordset
   
  Set r = New ADODB.Recordset
  r.CursorLocation = adUseClient
   
  r.Fields.Append "IntegerField", adInteger
  r.Fields.Append "StringField", adVarChar, 30
  r.Fields.Append "DateField", adDate
   
  r.Open
   
  r.AddNew
  r.Fields("IntegerField").Value = 3
  r.Fields("StringField").Value = "It Works"
  r.Update
   
 
I am rather new to this so if this questions sounds silly, I apologize <g> I am able to populate the recordset but now I would like to present it to the user. I have tried setting the datasource or recordsource of a datagrid control to "r" but it rejects that. Can someone clear this up for me. I thought r was a recordset object and should be useable
scotts27Asked:
Who is Participating?
 
samopalCommented:
Just add this lines

    Set DataGrid1.DataSource = r
    DataGrid1.Columns(0).DataField = r.Fields(0).Name
    DataGrid1.Columns(1).DataField = r.Fields(1).Name
    DataGrid1.Columns(2).DataField = r.Fields(2).Name
   
    DataGrid1.ReBind

HTH
0
 
scotts27Author Commented:
Thanks! I was so close. I did not have it using the set syntax. I was just oing an assignmentt
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.