problem with displaying data through DataGrid control in VB

[sentu83]

hello,
can some one pls help me about certain problem.Actually, i am using "datagrid" control of VB6.0 to display data with the help of ADODB recordset.
The back end is a MSACCESS table. I want to retrieve a specific row from this table and display in the DataGrid selectively. But following run time error is showing.
Error 7004
Recordset is not Bookmarkable.



Public adcon As New ADODB.Connection
Public rs As ADODB.Recordset


Private Sub Command1_Click()
adcon.ConnectionString = "DSN=gas"
adcon.Open
Set rs = adcon.Execute("Select * from detail1")
rs.Filter = "Consumer_Number='" & Trim(Text1.Text) & "'"

Set DataGrid1.DataSource = rs
DataGrid1.Refresh
End sub

[sashi]

Hi there,

This a common error when dealing with DataGrid control, try to bind the DataGrid to a bookmarkable recordset such as the keyset and static ADO recordsets, hope it helps you to get started with, take care my fren.. :)

[subhaCL]

Hi,

Simple coding for DataGrid Problem

Click Components option from Project menu, Select DataGridControl and ADO Data Control and place these two controls on form and then give the following codings.

Dim db As String
Private Sub Command1_Click()
db = "d:\Sample\db1.mdb"   'DataBase Path
Adodc1.ConnectionString = _
        "PROVIDER=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=" & db & ";"
Adodc1.RecordSource = "SELECT * FROM table1 where cik='" + Text1.Text + "' " 
Set DataGrid1.DataSource = Adodc1
End Sub