Pessoal, eu estou tentando carregar os dados de uma consulta em um Data Grid da forma descrita abaixo:
Set dg_dados.DataSource = Rs_PegaLogixN.DataSource

Porem, esta me dando este erro descrito abaixo:
Run-Time error '7004':
The rowset is not bookmarkable

 

Alguem sabe pq isto acontece e como posso resolver?

Obrigado!

o que é Rs_PegaLogixN ??? É um recordset?

sim, é um recordset como descrito abaixo:

Dim SqlN As String

Set Rs_PegaLogixN = New ADODB.Recordset

SqlN = "SELECT * FROM estoque_com_terc a , item b where b.cod_empresa='12' and b.gru_ctr_estoq in ('" & txt_grupo.Text & "') and b.cod_item=a.cod_item and b.cod_familia in ('" & txt_familia.Text & "')"

 

A Select acima esta funcionando corretamente, eu listei os dados em um ListBox, mas no Data Grid esta dando o erro postado anteriormente.

Tenta assim então: