CAMPO INT NAO GRAVA

AQUILESBRUM 16/09/2009 13:29:19
#323033

Só para complementar, estou recebendo a mensagem:

[Ô]Run-time error [ô]3265[ô]:

O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado. [Ô]

Ps: No banco (SQL-Server 2005) esta tabela CAD_BAIRROS, existem apenas dois campos: CD_BAIRRO tipo inteiro e DS_BAIRRO tipo varchar.

MARCIO.ROGERIO 16/09/2009 14:06:54
#323040

Bem, este erro é porque o campo informado no VB está com a nomenclatura diferente ao nome informado no SQL.

Até,


Rogério.

AQUILESBRUM 16/09/2009 15:23:32
#323052

Rogério, estou conseguindo navegar e excluir registros, só na hora de adicionar que esta pegando.

AQUILESBRUM 19/09/2009 10:06:56
#323257

Pessoal, ontem na faculdade procurei um professor e ele resolveu o problema.

Removeu [Ô]rs.close[Ô] do inicio do if e criou um recordset auxiliar [Ô]rs_Aux[Ô]. Usou o novo recordeset exclusivamente para esta rotina.


If mblnInserindo Then
rs.Close
[ô]Busca o último codigo e incrementa o proximo codigo
strSQL = [Ô]SELECT MAX(CD_BAIRRO) + 1 FROM CAD_BAIRROS[Ô]
rs.Open strSQL
lblCodigo.Caption = rs.Fields(0)
End If


If mblnInserindo Then
[ô]Busca o último codigo e incrementa o proximo codigo
strSQL = [Ô]SELECT MAX(CD_BAIRRO) + 1 FROM CAD_BAIRROS[Ô]
rs_Aux.Open strSQL, cn, adOpenForwardOnly, adLockPessimistic
lblCodigo.Caption = rs_Aux.Fields(0)
rs_Aux.Close
End If

Obrigado a todos que me ajudaram.