Exclusão de Registros!


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Exclusão de Registros!

Rochª

RIO DE JANEIRO
RJ - BRASIL

ENUNCIADA !

Postada em 25/05/2004 14:06 hs

Mil@.net® aqui ninguem incomoda ninguem

. Sem problema.

Voce tem que garantir que o txt_numero vai ter sempre um numero

Coloque isso no codigo no txt_numero.

Private Sub txt_numero_KeyPress(KeyAscii As Integer)
KeyAscii = CRITICA_NUM(KeyAscii)
End Sub

Assim ele não aceita que voce digite letras no campo numero. De preferencia inicio o campo com 0.

__________________________________________________________________________

Qualquer coisa post

Rochª

Mil@.net®

SÃO BERNARDO DO CAMPO
SP - BRASIL

Postada em 25/05/2004 14:33 hs

O Campo numero sempre tem uma numeração... pois se for incluido uma nova lista ele gera sozinho o novo numero da lista, e se for editado tera o numero da lista a ser editada.

coloquei da seguinte maneira e apresenta o mesmo erro.:

DB.Execute "delete * from ATRLISIT WHERE FUNCIONARIO = " & DBG_PARTICIPANTES.Text And NUMERO = TXT_NUMERO.Text

Rochª

RIO DE JANEIRO
RJ - BRASIL

ENUNCIADA !

Postada em 25/05/2004 14:42 hs

Voce ja verificou se na tabela os campos sao numericos. Pois se eles forem TEXT teram que estar entre aspas. Assim

DB.Execute "delete * from ATRLISIT WHERE FUNCIONARIO = " & DBG_PARTICIPANTES.Text & " And NUMERO = '" & TXT_NUMERO.Text & "'"

Tecle F9 encima da linha. Uma marca (vermelha) deve aparecer. É um ponto de parada. Rode o problema e quando ele chegar nesta linha a execucao para. Coloque entao o cursor (do mouse) encima do TXT_NUMERO, fique parado para ele mostrar o contrudo e veja o que esta nele. Ou abra a janela IMEDIATE WINDOWS no menu VIEW e digite ? txt_numero para ver o conteudo.

Este erro é uma atribuicao de tipos diferentes. Ou o campo é alfa e voce esta passando um numero ou voce versa.

__________________________________________________________________________

Qualquer coisa post

Rochª

Mil@.net®

SÃO BERNARDO DO CAMPO
SP - BRASIL

ENUNCIADA !

Postada em 25/05/2004 14:59 hs

Muito obrigado por sua ajuda... consegui achar o erro!

DB.Execute "delete * from ATRLISIT WHERE FUNCIONARIO = " & DBG_PARTICIPANTES.Text & " And NUMERO = " & TXT_NUMERO.Text

foi desta forma q eu coloquei...

Muito obriga mesmo!!!

Bjos Mila

Página(s): 2/2 « ANTERIOR

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR