Deletar um registro

[Davidmg 0]

Seguinte, tenho um select e logo após um delete dos dados que o select pega, é +ou- assim:

 

Set dados = MyConn.Execute("Select * from cadastro where idcad = '5'")	While Not dados.eofMyConn.Execute("Delete * From dados Where idcad = '5'")dados.MoveNextWend

No caso aqui são 5 registros encontrados e abaixo ele vai excluir os 5.

Até a exclusão do 4º registro ele vai numa boa, mais qdo ele exclui o 5º registro ele dá o erro na linha dados.MoveNext, pq não existe mais registros e ele vai tentar dar o loop.

 

Como posso fazer pra não dar esse erro?

Ou qdo apagar o ultimo registro ele nao chamar o loop...

 

Valews

[PedBolo 0]

já que a sua sql de exclusão não usa nd do record dados não precisa nem do select nem do loop; uma simples linha apaga todos os registros q tenham idcad como "5"MyConn.Execute("Delete * From dados Where idcad = '5'")ateh

[Davidmg 0]

Até pensei nisso, mais nem deu tempo de testar, vou fazer isso...valew