DATAGRID COM ADO

WHELLNET 01/06/2005 18:35:38
#86438
é possível preencher o datagrid sem o adodc?

Estou aprendo Ado agora e já me enrosquei!
Fiz a referencia e tal tudo beleza e tenho o codigo

Dim Conn As ADODB.Connection
Dim Tabela As ADODB.RecordSet

'Seto...
Set Conn = New ADODB.Connection
Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & App.Path & "\" & App.ProductName & ".mdb;"

Set Tabela = New ADODB.RecordSet
Tabela.Open "Select * from tbl_item", Conn, adOpenKeyset, adLockPessimistic
'Tabela.Filter = "iden=1"     Estou usando pra selecionar os dados que quero, tá certo?

'Data
Set dg.DataSource = Tabela
dg.Refresh


Já não era para aparecer os dados? O que está faltando [S59]
FABIO.ALEXANDRE 01/06/2005 20:00:29
#86446
BOM , FAZ ASSIM

Citação:

'Seto...
Set Conn = New ADODB.Connection
Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & App.Path & "\" & App.ProductName & ".mdb;"

Set Tabela = New ADODB.RecordSet
Tabela.Open "Select * from tbl_item", Conn, adOpenKeyset, adLockPessimistic
'Tabela.Filter = "iden=1" Estou usando pra selecionar os dados que quero, tá certo?

'Data
Set dg.DataSource = Tabela
dg.Refresh



SET DATAGRID.DATASOURCE=DG

ESPERO TER AJUDADO
WHELLNET 02/06/2005 06:58:17
#86465
Fabio Alexandre, desculpe eu informei errado, mas o dg = datagrid
;-)

Alguem já fez isso?
USUARIO.EXCLUIDOS 02/06/2005 11:13:41
#86512
SET DG.DATASOURCE=TABELA
WHELLNET 02/06/2005 15:23:41
#86591
Isso já está na minha pergunta Renanerman!
USUARIO.EXCLUIDOS 02/06/2005 15:27:27
#86597
posso estar enganado, mas pelo menos tente, inverta a posicao do set dg para antes do open

Dim Conn As ADODB.Connection
Set Conn = New ADODB.Connection
Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & App.Path & "\" & App.ProductName & ".mdb;"

Dim Tabela As ADODB.RecordSet
Set Tabela = New ADODB.RecordSet
Set dg.DataSource = Tabela

Tabela.Open "Select * from tbl_item", Conn, adOpenKeyset, adLockPessimistic

'talvez seja necessario um refresh do grid aqui.
FABIO.ALEXANDRE 02/06/2005 15:56:24
#86611
BOM , FAZ O SEGUINTE

BOM , OU SUA TABELA ESTA VAZIA OU O FILTER, C NAUM ESTIVER COMENTADO NA SUA INSTRUÇÃO VC COMENTE

C VC PRECISA FILTRAR ? COLOQUE NA PRORPIA STRING SQL
"Select * from tbl_item WHERE CAMPO=x " PELO MENOS NESTA POSIÇÃO DE CARREGAMENTO DE DADOS


ESPERO TER AJUDADO
WHELLNET 03/06/2005 07:33:57
#86722
A tabela não está vazia mesmo, inclusive deixei nenhuma restrição de consulta mas enfim, os dados não querem vier por nada pra ca!

Mas não tem problema não!

De qualquer forma, valeu pela ajuda galera!
Tópico encerrado , respostas não são mais permitidas
Voltar