Pesquisa Banco De Dados

[Laf]

Olá Pessoal:

Sou novato em VB e nesse Forum, e estou tentando fazer uma pesquisa no bd do Acces, talvez tenha uma forma melhor de fazer isso , ou se puder me ajudar como resolver esse problema, ficarei muito agradecido.

Tenho uma tabela com campo data de compra, quantia gasta.etc. O código abaixo dá certo, mas quando ele vai para o registro que não existe ele apresenta o erro.Como faço para resolver isso, o código é o seguinte:

Rs.MoveFirst ' envia para o primeiro registro

If not rs.Eof then

For I : vdataInicial to vdatafinal

vQuantia = vQuantia + rs!Quantiagasta

rs.movenext

next i

end if

label5.caption = vQuantia

Obs: Não sei se é a melho forma de fazer isso, o que eu quero é somar os campos das tabelas atráves do text da data inicial e final definida pelo usuário.

Ats,

Laf

[kuroi]

não entendi esse seu for. da data inicail ate a final... onde isso tem relacao com o recordset??

não tenho certeza do que você quer fazr, mas acho que poderia ser assim:

Rs.MoveFirst ' envia para o primeiro registro

Do While not rs.Eof 
vQuantia = vQuantia + rs!Quantiagasta
rs.movenext
Loop
label5.caption = vQuantia[/code]


ou melhor ainda, você pode fazer um select que já soma direto. tipo assim:
[code]Select Sum(Campo) as Soma From Tabela Where {Condição}

ai pra pegar do recordset nesse exemplo, você faria assim:

rs!Soma

veja se ajuda, qualquer coisa poste.

e presta atenca também pra não postar mais no subforum de tutoriais... porque ele é so pra tutoriais entende??

[BrunoVeríssimo]

Com certeza, a melhor maneira de fazer pesquisas é por meio de SQL.

Use o comando Select, assim como o kuroi mostrou

[Laf]

Muito obrigado pela resposta. Vou tentar , acho que é isso mesmo, e descupe-me por ter postado na area errada, é que sou marinheiro de primeira viagem.