While - Erro q eu nunca vi

Olá feras,Seguinte, tenho q fazer uma comparação de uma variável e um campo no meu bd dentro de um laço:while not rs.eofTipo = rs("Tipo")response.write Tipowhile Tipo = rs("Tipo")'O erro está aqui Codigo = rs("CodAssunto")Assunto = rs("Assunto")response.write Assuntors.movenextwendwendEle roda belezinha, só q aparece essa mensagem:error '80020009' Exception occurred. O erro acontece bem na linha de comparação.O q pode estar acontecendo?Valeu