error '80020009'

[iniciante_ASP 0]

Amigos, tô na área de novo.

 

O código abaixo está me retornando o erro "error '80020009' ". Sei que esse erro ocorre quando falta um registro no banco de dados. Conforme o codigo serão gerados 02 linhas em uma tabela e depois o código irá repetir até acabarem os registros com a condiçãos selecionada. Porém se a quantidade de registros for par não acontece o erro. mas se for impar ele plota todas as linhas e como não encontra um registro para a ultima linha indica o erro. Como contornar o problema???

 

Do while not veiculos.eof				  response.write "<tr bgcolor='#DBE3D0'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"				  veiculos.movenext				  response.write "<tr bgcolor='white'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"				  veiculos.movenext				  loop

[Mário Monteiro 179]

depois que der o move next que esta no meio do codigo voce precisa testar se ainda restam registros senao pode ocorrer isso de voce querer imprimir na tela algo que nao tem

[Mário Monteiro 179]

Do while not veiculos.eofresponse.write "<tr bgcolor='#DBE3D0'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"veiculos.movenextIF not veiculos.eof THENresponse.write "<tr bgcolor='white'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"veiculos.movenextEND IFloop

[iniciante_ASP 0]

Do while not veiculos.eofresponse.write "<tr bgcolor='#DBE3D0'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"veiculos.movenextIF not veiculos.eof THENresponse.write "<tr bgcolor='white'>"response.write "<td width='100' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("veiculo") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='30' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("ano") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='60' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("cor") & "</font></td>"response.write "<td width='3' align='left' bgcolor='#FFFFFF'> </td>"response.write "<td width='348' align='left'><font face='Tahoma' size='2'>" & veiculos.fields("descricao") & "</font></td>"response.write "<td width='3' align='center' bgcolor='#FFFFFF'> </td>"response.write "<td width='70' align='center'><font face='Tahoma' size='2'>" & veiculos.fields("preco") & "</font></td>"response.write "</tr>"veiculos.movenextEND IFloop

[Mário Monteiro 179]

nao entendi sua respostaapenas citou a minha

[iniciante_ASP 0]

Foi um erro meu na hora de postar. Muito obrigado. Foi 10 a dica.Um abraço