DATAGRID

SILVERDRAGON 22/08/2007 11:28:07
#232019
Galera tenho uma simples consulta para trazer todos clientes.. Como é que eu faço para Pegar os registros dessa consulta e jogar em um DataGrid?

grato
USUARIO.EXCLUIDOS 22/08/2007 11:31:32
#232021


Tipo de conexão ADO:

'Em um módulo coloque:
Option Explicit
Public cnn As ADODB.Connection
Public rs As ADODB.Recordset
Public SqlTabela As String


Public Sub Conecta()
    Set cnn = New Connection
    cnn.Open "PROVIDER=MSDataShape;Data PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source='" & App.Path & "\Banco.mdb';Jet OLEDB:Database Password=;"
    Set rs = New ADODB.Recordset
    rs.Open SqlTabela, cnn, adOpenKeyset, adLockOptimistic, adCmdText

End Sub



'no form coloque
SqlTabela = "Sua intrução SQL"
Conecta
Set DataGrid1.DataSource = rs

Divirta-se
USUARIO.EXCLUIDOS 22/08/2007 11:34:13
#232022

Em DAO faça:

Set Data1.RecordSet = Banco.OpenRecordset ("Sua instrução SQL")


espero ter ajudado e boa sorte
USUARIO.EXCLUIDOS 22/08/2007 11:36:47
#232023
Eu faço da seguinte forma:

Insiro o meu DataGrid e depois insiro o Adodc

No evento Load do Form coloque o seguinte:

Adodc.RecordSource = "Intrução SQL"
Adodc.Refresh

Lembre-se de conectar o seu DataGrid ao Adodc na opção DataSource do DataGrid

EDIT:

Não esqueça de colocar sua conectionString no Adodc

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=<DIretorio do BD>;Persist Security Info=False
SILVERDRAGON 22/08/2007 11:49:23
#232027
Iiiii SINKERTEC foi nao.. ele passa tudo certin + noa mostra nenhum registro..

flw
USUARIO.EXCLUIDOS 22/08/2007 11:51:47
#232029


Vamos lá...

Q tipo de conexão tu ta usando?

Qual referência vc escolheu pra essa conexão?
SILVERDRAGON 22/08/2007 12:01:12
#232035
Escolhi a Ado 2.8

Quando eu coloco

me.caption = rs.fields("Endereco")...ele mostra tudo certo entaum quer dizer que o select ta funfando ne.. + nao entendi d nao mostrar no datagrid...
USUARIO.EXCLUIDOS 22/08/2007 12:13:17
#232036


Vc fez isso?

SqlTabela = "Select * From Tabela"
Conecta
Set DataGrid1.DataSource = rs

e n mostrou nada no grid?

Text1 = rs!Campo

e nada?
SILVERDRAGON 22/08/2007 13:26:56
#232049
fiz tudo certinho.... + nao ta indo nao

porem se eu colocar

Text1 = rs!Campo

ele mostra o conteudo do registro... q sera hein
SILVERDRAGON 22/08/2007 13:44:49
#232054
Quando eu coloco a linha

Microsoft.Jet.OLEDB.4.0

no Provider ele fala q:

Nao foi possivel encontrar ISAM Instalados...


q sera?
USUARIO.EXCLUIDOS 22/08/2007 13:58:33
#232057


estranho...como deu certo antes?

no text funciona..blz

e no grid?

seu VB é atualizado com SP5 e 6?
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar