Fórum Pegar nomes de tabelas usando o dbexpress #301341
31/10/2005
0
Alguem poderia me ajudar? Estou usando o comando SQLConnection1.GetTableNames do dbexpress para pegar os nomes das tabelas de um banco firebird mas está dando erro. Ele diz que a operação não é suportada. Uso o delphi7 e está atualizado.
Desde já agradeço.
Alex Maia
Curtir tópico
+ 0Posts
01/11/2005
Martins
Alguem poderia me ajudar? Estou usando o comando SQLConnection1.GetTableNames do dbexpress para pegar os nomes das tabelas de um banco firebird mas está dando erro. Ele diz que a operação não é suportada. Uso o delphi7 e está atualizado.
Desde já agradeço.[/quote:a0459dc408]
vc tá usando assim?
SQLConnection1.GetTableNames(Tabela.Items, False) ;
Gostei + 0
01/11/2005
Martins
procedure TFxxxxx.FormCreate(Sender: TObject); begin SQLConnection1.Connected := True; SQLConnection1.GetTableNames(ListBox1.Items, False); end;
Jogaria o nome das tabelas em um ListBox
Boa Sorte!!!
Gostei + 0
01/11/2005
Martins
procedure TFxxxxx.Button1Click(Sender: TObject); begin // FireBird 1.5 // IBX IBDatabase1.Connected := True; IBDatabase1.GetTableNames(ListBox1.Items,False); IBDatabase1.Connected := False; // DBExpress SQLConnection1.Connected := True; SQLConnection1.GetTableNames(ListBox2.Items,False) ; SQLConnection1.Connected := False; end;
Se não funcionar, só amanhã de posse do Delphi para ver o q seu pode fazer, ouo então algum colega manda a solução.
Boa Noite e Boa Sorte!!
Q sono!!!
Gostei + 0
01/11/2005
Firekiller
select rdb$relation_name from rdb$relations where rdb$system_flag= 0 order by rdb$relation_name
Gostei + 0
01/11/2005
Martins
select rdb$relation_name from rdb$relations where rdb$system_flag= 0 order by rdb$relation_name
Se utilizando as tabelas de sistemas como descrito acima, não funcionar, então é melhor pedir ajuda aos universitários ou às cartas, :lol:
Boa Sorte!!!
Gostei + 0
20/07/2008
Onhide86
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)