Verificar se existe um campo dentro da tabela


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Verificar se existe um campo dentro da tabela

Álvaro

GUARULHOS
SP - BRASIL

Postada em 14/03/2007 11:48 hs

Galera bom dia !!

Gostaria de saber como que eu posso estar verificando se existe um campo dentro da tabela, estive verificando aqui no fórum, achei algumas coisas más não deu para adaptar ao que eu estava querendo.

O que eu quero é simples, tipo perguntar se existe ou não o campo e adicionar e depois dar um update. Deixa eu colocar o que tenho.

Fiz uma alteração na qual tive que incluir 4 campos no banco de dados, porém como esse não é um programa meu, e os outros não pensaram nisso, o cliente tem vários testes armazenados sem esses campo adicionais, queria que na hora de carregar esses testes eu conseguise verificar se os campos saida_analógica1,saida_analógica2,saida_analógica3,saida_analógica4 existem e se não existirem eu criar usando um alter table banco add .... e depois eu iria dar um update

Será que no vb tem algum comando exist ou algo assim, apenas para verificar esses campos ??

Obrigado

kerplunk

SÃO PAULO
SP - BRASIL

Postada em 14/03/2007 14:00 hs

Public Function CampoExiste(Tabela as ADODB.RecordSet, NomeCampo as String) as Boolean
dim i as long
CampoExiste = False
for i = 0 to tabela.fields.count -1
    if tabela.fields(i).name = NomeCampo then
      campoexiste = True
   end if
next i
end Function

Essa função retorna True caso o campo exista.
Para utiliza-la:
Dim rs as new adodb.recordset
set rs = new adodb.recordset
rs.open "Select * from Clientes",cn
if campoexiste(rs,"Descricao") then
   'faz alguma coisa aqui
end if

Álvaro

GUARULHOS
SP - BRASIL

Postada em 14/03/2007 15:05 hs

Valew kerplunk, ficou show !!

Abraço e que DEUS te abençõe, espero poder ter te ajudado

Eu sou o Senhor, o DEUS de vocês;
eu os seguro pela mão e lhes digo;
Não fiquem com medo, pois eu os ajudo
Isaias 41:13

TÓPICO EDITADO

Página(s): 1/1