Daniel da Silva
não registrado
|
|
Postada em 20/06/2007 19:28 hs
Olha para somar umas variaveis faça data1.recordsource="select * from vendas" data1.refresh total=0 while not data1.recordset.eof total=total+data1.recordset("valor") data1.recordset.movenext wend msgbox total mas dizem que tem um metodo melhor e mais rápido para fazer calculo usando um simples linha sql alguém sabe como? porque meu banco de dados está enorme e ta demorando um pouco para fazer essas somas! Obrigado desde já? |
|
|
|
|
|
|
|
Postada em 21/06/2007 10:11 hs
Select Sum(Valor) As Variavel From Vendas MsgBox Variavel Pode se usar a clausula Where para somar campos determinados. vlu// |
|
|
|
Daniel Lima da
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 21/06/2007 12:13 hs
fiz assim LCRAMOS e não dá certo! se pode me dizer o que estou fazendo errado? MsgBox variavel
|
|
|
|
Michel Morgado
não registrado
|
|
Postada em 21/06/2007 12:29 hs
mas você tem o campo valor na sua tabela do banco ? Você tem que dar o sum em cima de algum valor. Se não tiver faça assim: "Select sum(valor) as Total From vendas" Data1.refresh Msgbox "Total", vbinformation, " Atenção !!" |
|
|
|
Daniel Lima da
não registrado
|
|
Postada em 21/06/2007 13:43 hs
Nesse procedimento abaixo não apresenta nenhum erro! mas a variavel continua vazia Data1.DatabaseName = " \webovasvendaslojawin.mdb" Data1.RecordSource = "Select Sum(Valor) As variavel From Venda" Data1.Refresh MsgBox variavel enquanto no procedimento abaixo da certo! só que é lento! data1.refresh total=0 while not data1.recordset.eof total=total+data1.recordset("valor") data1.recordset.movenext wend msgbox total NO QUE ESTOU ERRANDO? tem que declarar esse variáveis? |
|
|
|
Michel Morgado
não registrado
|
|
Postada em 21/06/2007 13:52 hs
Cara .. da uma verificada no bd e ve se o campo valor está como texto e se todos os registros tem valores. Pois aconteceu há um tempo atrás comigo que tinha um campo que não tinha valor e não estava me trazendo o resultado. |
|
|
|
