SQL

USUARIO.EXCLUIDOS 27/08/2006 23:01:55
#167756

Private sub VB
Pessoal, estou utilizando a seguinte sql

Call Segunda_Tela 'Chama a configuração da tela
CONSULTASQL = "SELECT * FROM (" & _
" SELECT nomcli,SUM(valor, quantidade) as valor, quantidade cliven " & _
" FROM TabVendas GROUP BY nomcli, cliven" & _
") ORDER BY valor Desc"
Set TBSQL = CON.Execute(CONSULTASQL)
Do Until TBSQL.EOF
Lin = Lin + 1
msfgrade.Rows = Lin + 1
msfgrade.TextMatrix(Lin, 0) = TBSQL("cliven") 'cliven é o cod. clit msfgrade.TextMatrix(Lin, 1) = TBSQL("nomcli") 'nomcli nome do client
msfgrade.TextMatrix(Lin, 2) = TBSQL("valor")
msfgrade.TextMatrix(Lin, 2) = TBSQL("quantidade")
TBSQL.MoveNext
Loop
End If
end sub

O código acima é demonstrado o total dos gastos de cada cliente, porém tambem quero saber a quantidade de produto comprado pelo cliente. A sql acima não está dando certo, o que posso corrigir??