Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal,Como eu faço um while rodar até que ele encontre um determinado registro (um rs puxado de uma tabela), depois executar um codigo.Ex.: faça enquanto registroX igual a RegistroYSe verdadeiroda movenext no registro (anda pra o proximo)Fim seFim whiletenho a logica mas nao consigo aplicar o codigoValeu
onde voce armazena os valores dos registros, pois precisará armazenar pelo menos um ja que mudara de registro
Boa... MarioufpaArmazeno num BD, mas vou criar uma variavel registroZ para armazenar isso! Mas uma pergunta que ainda me assola... e se for o ultimo registro da tabela eu der um movenext ele vai dar erro, se eu colocar um if eof = true then movefirst dará certo?
da certo se voce setar o seu recorset para aceitar essa manipulaçoesé que o defalut é apenas movenext, mas isso é configuravel
como assim? Poderia me expçicar melhor!
MarioufpaComo eu seto esse recordset para aceitar essa movimentação de registro?
procure informações sobre cursorlocation, com ele você seta o recordset ou conexão para executar de diferentes formas, de acordo com a necessidade
exatoabrindo o famoso adovbs.inctemos os seguintes'---- CursorTypeEnum Values ----Const adOpenForwardOnly = 0Const adOpenKeyset = 1Const adOpenDynamic = 2Const adOpenStatic = 3o padrao é 0 (adOpenForwardOnly)
Valeu Galera, podem fechar o topico, consegui!
Valeu Galera, podem fechar o topico, consegui!
Mas Dony, como finalizou td? Tem como você colocar a solução final? Pq assim, quem ler seu tópico, pode tirar alguma dúvida em relação a isso sem a necessidade de abrir um novo tópico...
Abraço!
Vou por sim, o cod tá na maquina de casa, a noite posto!
ok entao
Pequeno artigo, he hehe
Então pessoal, fiz um codigo burro mas funcional:
Criei tres recordset's um para pegar o primeiro registro da tabela, um pra pegar o ultimo e outro (RS3) que busca todo os registro que atendam requisitos (where tipo="C" and local="L"). Agora porque tudo isso? porque senão quando ele estivesse no ultimo registro e desse um movenext iria gerar um erro, então quando registroAtual = Ultimo registro ele faz o registro atual ser igual ao Primeiro. Chega de blá, blá, blá vamos ao código, mas não vou colocar os SQL´s isso todo mundo sabe fazer :-)
do While not rs3.EOF If rs3("IdImoveis") = idAtual Then rs3.movenext if idAtual = ultimo then idAgora = Primeiro Else idAgora = rs3("IdImoveis") end if exit do End If rs3.movenextloop
Bom era isso, valeu a todos pela ajuda, precisando estamos aqui! http://forum.imasters.com.br/public/style_emoticons/default/clap.gif
Dony
Olá Dony.Estava passando por aqui e ví seu tópico, não sei se está certo mais tente assim.Do While not rs.EOF If registroX = registroY Then Response.Write = "valor encontrado" Else Response.Write = "nada foi encontrado"End IfNext Então cara, tenta porque faz tempo q não mexo com isso e não me lembro ao certo, boa sorte.Abraço