LER TABELAS ACCESS
vb6+access97
Gostaria de obter os nomes das minhas tabelas em access. Li uma dica de um colega para usar o seguinte comando:
... select * from SysObjects ... (sql 2000)
Como eu uso access97 percebi que a tabela que contem os nomes dos objetos do bd eh MSysOBjects ...
Dai deu o erro:
Run-time error '3112':
Record(s) can't be read; no read permission on 'MySysObjects'.
Gostaria de obter os nomes das minhas tabelas em access. Li uma dica de um colega para usar o seguinte comando:
... select * from SysObjects ... (sql 2000)
Como eu uso access97 percebi que a tabela que contem os nomes dos objetos do bd eh MSysOBjects ...
Dai deu o erro:
Run-time error '3112':
Record(s) can't be read; no read permission on 'MySysObjects'.
ja tento fazer o select como se fosse access 2000?
Cara..vc ta conectando via DAO ou ADO?
Já experimentou via Access a opção:
Ferramentas -> Analisar -> Documentador
Muito bom para gerar documentação do seu BD.
Ferramentas -> Analisar -> Documentador
Muito bom para gerar documentação do seu BD.
Tenta assim
O if, faz com q ele ignore as tabelas ocultas do access
For x = 0 To Banco.TableDefs.Count
If Lcase(Left(Banco.TableDefs(x).Name, 2)) <> "msys" Then
List1.AddItem Banco.TableDefs(x).Name
End If
Next x
Tópico encerrado , respostas não são mais permitidas