ERRO AO EXECUTAR SELECT....

USUARIO.EXCLUIDOS 11/04/2007 10:54:05
#211176
Qdo eu executo, da um erro, alguma coisa com parametro, o mais estranho eh q usei um select parecido em outo form, e deu crto, a diferenca eh que o cod do outro era numero inteiro..



With cnnComando
.ActiveConnection = cnn
.CommandType = adCmdText
.CommandText = "SELECT * FROM tarefa WHERE codtarefa = " & _
Txtcod.Text & ";"
Set rsSelecao = .Execute
End With


deu esse erro, tava escrito alguma coisa de parametro...se algm puder me ajudar...
Rum time error -2147217094(8004e10)
HUGOSSOUZA 11/04/2007 10:56:28
#211177
.CommandText = "SELECT * FROM tarefa WHERE codtarefa = " & _
"" & Txtcod.Text & ";"
USUARIO.EXCLUIDOS 11/04/2007 11:13:12
#211182 Resposta escolhida
Se for campo do tipo testo, tem que colocar ' (plic), entre o valor informado, se for inteiro não precisa, mas também funciona.

'-------------
'Se for texto
'-------------
With cnnComando
.ActiveConnection = cnn
.CommandType = adCmdText
.CommandText = "SELECT * FROM tarefa WHERE codtarefa = '" & _ Txtcod.Text & "' "
Set rsSelecao = .Execute
End With

'----------------
'Se NÃO for texto
'----------------
With cnnComando
.ActiveConnection = cnn
.CommandType = adCmdText
.CommandText = "SELECT * FROM tarefa WHERE codtarefa = " & cint(Txtcod.Text)
Set rsSelecao = .Execute
End With

obs.: retirei o ";"
USUARIO.EXCLUIDOS 12/04/2007 10:34:10
#211466
Blz, deu crto, valeu!!!
Tópico encerrado , respostas não são mais permitidas
Voltar