Como posso receber os campos de uma tabela em um array?

Pergunta
Estou fazendo uma aplicação para atualizar um BD de MySQL que há na Internet com um BD em DBase que temos no escritório, a ambas acesso via DSN, o que queria saber é se existe alguma forma de receber todos os nomes dos campos que tem uma tabela em um array, também queria saber se pode ser feito o mesmo que o dos campos só que com as tabelas. Aliás, estou fazendo a aplicação com VisualBasic 6.

Valorize esta FAQ:
A FAQ Como posso receber os campos de uma tabela em um array? tem Pertence à categoria:
Resposta
Efetivamente com tabledef, pode-se determinar quais são as tabelas do banco de dados como se mostra no código anexo.

Dim loopTabela As TableDef
Set BancoDados = DBEngine.Workspaces(0).OpenDatabase(StrArquivoEntrada)
Combo5.Clear
For Each LoopTabela In BancoDados.TableDefs
Combo5.AddItem BucleTabla.Name
Next

Para os campos teríamos algo como o seguinte:

Dim tabela As Recordset
Dim LoopCampo As Field
Set tabla = BancoDados.OpenRecordset("select * from [" & Combo5.Text & "]")
Combo1.Clear
For Each BucleCampo In tabla.Fields
Combo1.AddItem BucleCampo.Name
Next

Todo o anterior fazendo uso do DAO, que talvez possa ser um pouco obsoleto.

Por Alexander Rodriguez G

Voltar à árvore de categorias Voltar à árvore de categorias

 
FAQs relacionadas
  + Passar variáveis de ASP ou PHP para Javascript ou vice-versa
  + Operador de comparação com vários valores
  + Calcular distância entre duas datas em ASP
  + Devolver código ASCII de um caráter em ASP
  + Loop DO LOOP em Visual Basic Script
  + Efeito cortina com DHTML
  + Consecutivo em VBasic para Excel
  + Impressão sem confirmação
  + Arrays com Visual Basic Script
  + Saber o número de campos de um Array em ASP
  + [...]

Ver todas las FAQS de VBScript

Usuários :    login / registro

Home | Sobre nós | Copyright | Anuncie | Entrar em contato