Fabio
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 18/09/2004 13:16 hs
Estou usando esse código e não consigo jogar os registros na grid: Dim rst As New ADODB.Recordset rst.Open "SELECT * fROM tabela", cnn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rst |
|
|
|
|
|
Fabio
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/09/2004 13:27 hs
Acabei de perceber que usando o .mdb em Access 2000 ou 2000 e acessando pelo OLEDB.4.0 eu não consigo o que queria acima,mas usando o .mdb em Access 97 e usando o OLEDB.3.51 eu consigo. tem algum detalhe para conseguir no OLEDB.4.0 usando Access 2000 ou 2002? |
|
|
|
MARCONE
|
BRASÍLIA
DF - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/09/2004 13:49 hs
Tente assim: sSql = "SELECT * FROM tblMovimentos"
rst.Open sSql, cnBd, adOpenKeyset, adLockOptimistic Set Me.DataGrid1.DataSource = rst
Me.DataGrid1.Refresh |
|
|
|
|
|
Postada em 20/09/2004 08:24 hs
Com esta conexão consegue, de certeza, acessar ACCESS 2000: Public Function ConexaoDados() As Connection base = PstrCamDados & "mvdoctab.mdb" Set dbDados = New ADODB.Connection With dbDados .Provider = "Microsoft.Jet.OLEDB.4.0" .Properties("Data Source") = base .Properties("Jet OLEDB:Database Password") = "password" .Open End With End Function João Mateus |
|
|
|
|
|
Postada em 20/09/2004 11:08 hs
Já tentei usar 4.0 com Access2000 e Access2002 e só funciona mesmo com 3.51 e Access97. |
|
|
|
|
|
Postada em 21/09/2004 18:03 hs
véio tenta assim vai ser batata Dim rst As New ADODB.Recordset rst.cursorlocation = adusecliente rst.Open "SELECT * fROM tabela", cnn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rst falow truta!
Marcos Nogueira
"Sempre ouvindo um RAP pra alegrar a RAPA!!!"
|
|
|
|
