|
|
Postada em 13/12/2004 17:30 hs
Então tenta mudar "Delete From TB_CadContato Where Identif = '" & Identif & "'" para "Delete From TB_CadContato Where Identif = '" & vIdentif & "'" Ele pode estar confundindo o nome do campo com o nome da variável utilizada. T+ Rinaldo |
|
|
|
|
|
|
|
Postada em 14/12/2004 09:03 hs
continua dando erro: tipo de dados incompativel na expressão de critério. O meu banco de dados tem a seguinte estrutura:
Identif - autonumeração
nome_agenda - texto
telefone_agenda - texto
email_agenda - texto
icq_agenda - texto
msn_agenda - texto
tipo_contato - texto
Vejam se pode ser meu banco de dados.
E o código que estou usando é o mesmo que vc's surgeriram:
Private Sub cmdExcluir_Click()
Dim Sql$
MsgBox Identif
Sql = "Delete From TB_CadContato Where Identif = " & Identif
Db.Execute Sql
Call LimparFormulario
txtNome.SetFocus
End Sub
|
|
|
|
|
|
Postada em 14/12/2004 09:14 hs
Tente uma das opções abaixo: Sql = "Delete From TB_CadContato Where Val(Identif) = " & Identif Sql = "Delete From TB_CadContato Where Identif = " & Val(Identif) T+ Rinaldo |
|
|
|
|
|
Postada em 14/12/2004 11:00 hs
tá tudo errado. Se o campo é de autonumeração, as aspas simples não podem aparecer. |
|
|
|
|
|
Postada em 14/12/2004 11:03 hs
mais não existe aspa simples. |
|
|
|
|
|
Postada em 14/12/2004 11:39 hs
Rafael, Qual o tipo e o conteúdo da sua variável Identif? Pq vc declarou uma variável SQL$ e está atribuinto valores a variável SQL? |
|
|
|
