Tenho um loop do tipo while... um recordset... ex.:
sql = "minha consulta"
Set rs = conn.Execute(sql)
while not rs.eof
'imprimo o que vem do banco em tela...
rs.movenext
wend
O que eu quero é adiantar o movenext em caso de preenchimento de uma condicional, ex.:
sql = "minha consulta"
Set rs = conn.Execute(sql)
while not rs.eof
if x = y then
rs.movenext
wend
end if
'imprimo o que vem do banco em tela...
rs.movenext
wend
Ou seja, se x = y não imprimir nada em tela... daí vocês podem perguntar: Pô, porque não faz isso na própria query... e eu respondo... preciso do rs pra fazer a condicional devido a várias operações matemáticas que impossibilitam que seja na própria query...
Ahhh... antes que algué pergunte, tb já tentei assim:
sql = "minha consulta"
Set rs = conn.Execute(sql)
while not rs.eof
if x = y then
rs.movenext
wend
'imprimo o que vem do banco em tela...
rs.movenext
wend
end if
Quando tentei fazer conforme o exemplo acima, rolou esse erro:
Pergunta
Notax
Galera, seguinte:
Tenho um loop do tipo while... um recordset... ex.:
O que eu quero é adiantar o movenext em caso de preenchimento de uma condicional, ex.: Ou seja, se x = y não imprimir nada em tela... daí vocês podem perguntar: Pô, porque não faz isso na própria query... e eu respondo... preciso do rs pra fazer a condicional devido a várias operações matemáticas que impossibilitam que seja na própria query... Ahhh... antes que algué pergunte, tb já tentei assim:Quando tentei fazer conforme o exemplo acima, rolou esse erro:
referindo-se ao wend deste trecho:
if x = y then
rs.movenext
wend
end if
Alguém pode dar uma força?
Editado por NotaxLink para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados