ULTIMO REGISTRO EM CONSULTA SQL

GNCNET 28/05/2011 14:53:43
#375221
Preciso encontrar o ultimo registro do campo ORCAMENTO do cliente txt_codigo para então acrescentar um novo orçamento. Mas esta consulta está dando erro de sintaxe.
BD access

Set rso = bbo.OpenRecordset([Ô]Select Max orcamento From tblorcam where codcli = [Ô] & txt_codigo.Text & [Ô][ô] [Ô])
MsgBox rso!orcamento

agradecido,
Gardel
MARCELO.TREZE 28/05/2011 14:59:19
#375222 Resposta escolhida
tente assim

[Ô]Select Max(orcamento) From tblorcam where codcli = [Ô] & txt_codigo.Text & [Ô][ô][Ô]


ou assim


[Ô]Select Max(orcamento) As Ultimo From tblorcam where codcli = [Ô] & txt_codigo.Text & [Ô][ô][Ô]


rs!Ultimo
GNCNET 28/05/2011 15:09:14
#375223
Marcelo,
Continua...

Erro de sintaxe na sequenca de caracteres na expressão de consulta [ô]codcli = 34[Ô].

O campo estava como text, torneio como número, mas nada...
MARCELO.TREZE 28/05/2011 15:15:12
#375224
desculpe tire a aspa simples do fim da query

...[Ô] & txt_codigo.Text & [txt-color=#e80000][Ô][ô][Ô][/txt-color]

faça assim


Set rso = bbo.OpenRecordset([Ô]Select Max(orcamento) As UltimoOrcamento From tblorcam where codcli = [Ô] & txt_codigo.Text)
MsgBox rso!UltimoOrcamento
GNCNET 28/05/2011 15:16:56
#375225
Resolvido
thanks
Tópico encerrado , respostas não são mais permitidas
Voltar