(Resolvido) erro Provider (0x80020005)

ju_rezende · Setembro 10, 2009

Olá pessoal estou tendo um problema de um erro que não imagino o que seja.

Tipo de erro:

Provider (0x80020005)

Tipo não correspondente.

/tulio/aloncoimoveis/adm/imovel_cadastrar.asp, line 74

Vou postar meu código para mostra onde está dando o erro

<%call AbreConexao()
set rs = server.CreateObject ("adodb.recordset")
set rstipo= server.CreateObject ("adodb.recordset")
set rsfinalidade= server.CreateObject ("adodb.recordset")
set rstransacao = server.CreateObject ("adodb.recordset")

sqltipo="select * from tipo order by tipo asc"
sqlfinalidade="select * form finalidade order by finalidade asc"
sqltransacao= "select * from transacao order by trasacao asc"
sql="SELECT bairro.bairro, cidade.cidade, estado.estado, bairro.codigo FROM estado INNER JOIN (cidade INNER JOIN bairro ON cidade.codigo = bairro.cod_cidade) ON estado.codigo = cidade.codestado"

rstipo.open sqltipo,conn,3,3

rsfinalidade.open,sqlfinalidade,conn,3,3 esta é a linha 74
rstransacao.open,sqltransacao,conn,3,3

rs.open sql,conn,3,3

bareta · Setembro 10, 2009

sqlfinalidade="select * from finalidade order by finalidade"

QUAL O ERRO Q DA DEPOIS DESSA ALTERAÇÃO

ju_rezende · Setembro 10, 2009

depois desta alteração o erro permanece o mesmo e na mesma linha

ju_rezende · Setembro 10, 2009

gente tento dar um response.write para cada sql antes do open, e dá o mesmo erro, já verifiquei os nomes do campos e os mesmos estão certinho, nunca me ocorreu um erro assim antes...

bareta · Setembro 10, 2009

poe response.end antes de

rstipo.open sqltipo,conn,3,3

rsfinalidade.open,sqlfinalidade,conn,3,3 esta é a linha 74

rstransacao.open,sqltransacao,conn,3,3

rs.open sql,conn,3,3

ju_rezende · Setembro 11, 2009

é eu coloquei e o erro permanece, aí fica o mesmo erro erro no response.write.

ju_rezende · Setembro 11, 2009

Pessoal vou postar o código todo da página

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<!--#include file="conexao.asp"-->
<%session.LCID =1046
Response.buffer=true %>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8859-1" />
<title>Cadastrar Im&oacute;vel</title>
<link href="estilos.css" rel="stylesheet" type="text/css" />
<!--[if lte IE 7]>
<link href="estilos_ie7.css" rel="stylesheet" type="text/css" />
<![endif]-->
<!--[if lte IE 6]>
<link href="estilos_ie6.css" rel="stylesheet" type="text/css" />
<![endif]-->
 &lt;script type="text/javascript" src="js/png.js"></script>
&lt;script language="JavaScript1.2" type="text/javascript">
function mostraElemento(elemento)
{
        if(document.getElementById(elemento).style.display=='none')
        {
            document.getElementById(elemento).style.display='block';
        }
        else
        {
            document.getElementById(elemento).style.display='none';
        }
}
</script> 
&lt;script language="JavaScript">
function validaForm(){
//validar nome
d = document.cadastro;

var expressao = /([0-1]{1}[0-9]{1}|[0-2]{1}[0-4]{1})\:[0-5]{1}[0-9]{1}/;

if (d.estado.value == ""){
alert("O campo estado do formulário deve ser preenchido!");
d.estado.focus();
return false;
}
if (d.cidade.value == ""){
alert("O campo cidade do formulário deve ser preenchido!");
d.cidade.focus();
return false;
}
return true;
}
</script>



</head>

<body>

<div id="geral">
    <!-- #include file="topo.asp" -->    
    <!-- #include file="ladoesquerdo.asp" -->    
    <div id="conteudo">
        <h2>Cadastrar Im&oacute;vel</h2>
        <%call AbreConexao()
        set rs = server.CreateObject ("adodb.recordset")
        set rstipo= server.CreateObject ("adodb.recordset")
        set rsfinalidade= server.CreateObject ("adodb.recordset")
        set rstransacao = server.CreateObject ("adodb.recordset")
        
        sqltipo="select * from tipo order by tipo asc"
        sqlfinalidade= "select * from  finalidade order by finalidade asc"
        sqltransacao= "select * from transacao order by trasacao asc"
        sql="SELECT bairro.bairro, cidade.cidade, estado.estado, bairro.codigo FROM estado INNER JOIN (cidade INNER JOIN bairro ON cidade.codigo = bairro.cod_cidade) ON estado.codigo = cidade.codestado"    
        
        response.write "tipo   " &     sqltipo & "<br>"
    [color="#FF0000"]    response.write "finalidade   " &     rsfinalidade & "<br>"[/color] erro nesta linha, se eu comento ela o erro fica na linha de baixo
        response.write "transacao   " &     rstransacao & "<br>"
        response.write "inner    " &     sql & "<br>"
        response.End
        
         rstipo.open sqltipo,conn,3,3
         
         rsfinalidade.open,sqlfinalidade,conn,3,3
         
         rstransacao.open,sqltransacao,conn,3,3
         
         rs.open sql,conn,3,3
         
        if rs.eof=false and rstipo.eof=false and rsfinalidae.eof=false and rstransacao.eof=false then
        %>
        <form id="form" name="cadastro" action="cidade_conf_cadastrar.asp" method="post" onSubmit="return validaForm()">
             <fieldset>
             <label for="estado">Escolha o Bairro - Cidade e Estado do  imóvel</label>
                <select name="estado" tabindex="1" accesskey="e" >
                  <option value=""> Bairro - Cidade - Estado</option>
                <%rs.movefirst
                do while rs.eof=false%>
                   <option value="<%=rs("codigo")%>"><%= rs("bairro")%>  - <%=rs("cidade")%> - <%=rs("estado")%></option>
                <%rs.movenext
                loop%>
              </select>    
             <label for="Tipo">Escolha o Tipo do  imóvel</label>
                <select name="tipo" tabindex="2" accesskey="t" >
                  <option value=""> Tipo</option>
                <%rstipo.movefirst
                do while rstipo.eof=false%>
                    <option value="<%=rstipo("codigo")%>"><%= rstipo("tipo")%> </option>
                <%rstipo.movenext
                loop%>
              </select>    
             <label for="finalidade">Escolha Finalidade do imóvel</label>
                <select name="Finalidade" tabindex="4" accesskey="f" >
                  <option value=""> Finalidade</option>
                <%rsfinalidade.movefirst
                do while rsfinalidade.eof=false%>
                    <option value="<%=rsfinalidade("codigo")%>"><%= rsfinalidade("finalidade")%> </option>
                <%rsfinalidade.movenext
                loop%>
              </select>    
             <label for="transação">Escolha Transa&ccedil;&atilde;o do  imóvel</label>
                <select name="transacao" tabindex="5" accesskey="t" >
                  <option value="">Transa&ccedil;&atilde;o </option>
                <%rstransacao.movefirst
                do while rstransacao.eof=false%>
                    <option value="<%=rstransacao("codigo")%>"><%= rstransacao("transacao")%></option>
                <%rstransacao.movenext
                loop%>
              </select>    

            
             
              
          <label for="estado">Digite o nome da Cidade</label>
                 <input name="cidade" type="text" id="cidade" accesskey="c" tabindex="2"  />              
                 <input type="image" src="images/btncadastrar.gif" name="cadastrar" id="cadastrar" tabindex="3" />     
          </fieldset>  
              
        </form>
        <%else
            response.write "Não é possível cadatrar uma cidade, pois não existe nenhum estado cadastrado."
        end if%>
        
        
    </div>
    <!-- #include file="rodape.asp" -->
</div>
<%if conn.state <> 0 then conn.Close
If rs.state <> 0 Then rs.close
set conn= Nothing
set rs = Nothing
%>        

</body>
</html>

erro

Microsoft VBScript runtime  error '800a000d'

Type mismatch

/adm/imovel_cadastrar.asp, line 74

Editado Setembro 11, 2009 por ju_rezende

bareta · Setembro 11, 2009

sqltipo="select * from tipo order by tipo asc"
        sqlfinalidade= "select * from  finalidade order by finalidade asc"
        sqltransacao= "select * from transacao order by trasacao asc"
        sql="SELECT bairro.bairro, cidade.cidade, estado.estado, bairro.codigo FROM estado INNER JOIN (cidade INNER JOIN bairro ON cidade.codigo = bairro.cod_cidade) ON estado.codigo = cidade.codestado"    
        
        response.write "tipo   ---" &     sqltipo & "<br>"
        response.write "finalidade   ---" &     sqlfinalidade & "<br>"
        response.write "transacao   ---" &     sqltransacao & "<br>"
        response.write "inner    ---" &     sql & "<br>"
        
    response.End()
        
        set rs = server.CreateObject ("adodb.recordset")
        set rstipo= server.CreateObject ("adodb.recordset")
        set rsfinalidade= server.CreateObject ("adodb.recordset")
        set rstransacao = server.CreateObject ("adodb.recordset")

         rstipo.open sqltipo,conn,3,3
         
         rsfinalidade.open,sqlfinalidade,conn,3,3
         
         rstransacao.open,sqltransacao,conn,3,3
         
         rs.open sql,conn,3,3

sqltransacao= "select * from transacao order by transacao asc"

ju_rezende · Setembro 11, 2009

mesmo com a alteração o erro permanece

bareta · Setembro 11, 2009

o tipo mismatch é porque você ta tentando escrever o rsxxxxx, que é um objeto...

ju_rezende · Setembro 11, 2009

Ops, verdade desculpe, nem percebi que fiz isso.

Os responses funcionaram aí tirei o end e dá erro na finalidade quando abre

select * from tipo order by tipo asc select * from finalidade order by finalidade asc select * from transacao order by transacao asc SELECT bairro.bairro, cidade.cidade, estado.estado, bairro.codigo FROM estado INNER JOIN (cidade INNER JOIN bairro ON cidade.codigo = bairro.cod_cidade) ON estado.codigo = cidade.codestado

Provider error '80020005' Type mismatch. /adm/imovel_cadastrar.asp, line 81

lINHA 81 É          rsfinalidade.open,sqlfinalidade,c

onn,3,3

bareta · Setembro 11, 2009

faz um teste

set rsx=conn.execute("select * from finalidade order by finalidade asc")

verifique se a tabela finalidade existe e se o campo finalidade existe.

ju_rezende · Setembro 14, 2009

Eu fiz o teste e a tabela existe, se eu tirar os outros sqls, e deixar só o da finalidade aí funciona normamente...

ju_rezende · Setembro 14, 2009

Pessoal, problema resolvido era uma vírgula a mais no open

Grata pela atenção de todos

bareta · Setembro 14, 2009

lol.... kkk percebi agora q vi teu post... kkkkkkkk

Entrar

(Resolvido) erro Provider (0x80020005)

Pergunta

Link para o comentário

Compartilhar em outros sites

14 respostass a esta questão

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Estatísticas dos Fóruns