Item não encontrado nesta coleção erro 3265

[11closed 0]

Boa tarde pessoal!

 

Estou tentando um select em uma tabela até ai tudo ok

mas na tabela não existe algumas coluna que o sistema está chamando. (isso ocorre porque tive que criar novas colunas na tabela, mas quem ja instalou o sistema no computador esta com a tabela antiga).

Como posso fazer para ver na tabela se existe a especifica coluna ou não?

estou usando o VB6.

 

Procurei na internet e não achei nada especifico, estou recorrendo a você para ver se alguém pode me auxiliar.

Grato.

[KhaosDoctor 242]

Cara, se a coluna não existir ele vai sempre retornar um erro, então acho que vale mais a pena você criar um pacote de atualização do que tentar ver se a coluna existe ou não.

[11closed 0]

É na verdade eu fiz isso!

Mas o problema é que ele joga o banco de dados novo (com as tabelas novas) em cima do antigo, ou seja, vão perder tudo que tem no outro banco de dados.

Ou tem como fazer algo para isso não acontecer?

[KhaosDoctor 242]

Sim, faça um patch com instruções para a criação das novas colunas no banco de dados

 

http://www.w3schools.com/sql/sql_alter.asp

[11closed 0]

Bom dia KhaosDoctor acabei não seguindo sua dica, mas agora que estou sem preça vou pesquisar mais sobre isso!

Fiz da seguinte forma:

Verifiquei com comando:

For Each Campo In rs.Fields
If Campo.Name = "NomeDaColunaNoBanco" Then
vVerificaCamp = 1
ElseIf Campo.Name = "NomeDaColunaNoBanco2" Then
vVerificaCamp = 2
ElseIf Campo.Name = "NomeDaColunaNoBanco3" Then
vVerificaCamp = 3
ElseIf Campo.Name = "NomeDaColunaNoBanco4" Then
CampoExiste = True
End If
Next

Ele faz um loop, caso não tiver a 1ª coluna quer dizer que não tem nenhuma das outras então o a variavel vVerificaCamp será igual a 3.

Ai fiz em outra tela comando If vVerificaCamp = 3 ele criará as outras colunas na tabela se for 2 criara apenas as 2 ultimas colunas se for 1 criará todas que estão faltando e caso cair no CampoExiste = True quer dizer que ja existe todas colunas e não será criado nada. Funcionou aqui!

Mas obrigado pela resposta para me ajudar, vou analisa-la para futuros trabalhos.