Ir para conteúdo
Fórum Script Brasil
  • 0

Sempre Da O Mesmo Erro


maktub

Pergunta

Olá pessoal, estou com um problema, estou usando o IIS para rodar minhas páginas, ultimamente alguns códigos não estão rodando pois acusa um erro, eu já revisei o código mas o erro continua, será que é falta de algum componente? Se for como eu sei qual componente instalar?, o erro segue abaixo e o código que esta apontando erro:

Tipo de erro:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.
/imobiliaria/Default.asp, line 37


Tipo de navegador: 
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) 

Página: 
GET /imobiliaria/Default.asp 
este é o default.asp:
<!--#include file="includes/config.asp"-->
<!--#include file="includes/abrebanco.asp"-->

<head>
<title><%=titulo%></title>
<%
Function geraID ()
  geraID_tmp = ""
  Randomize
  For i = 1 to 12
    intNum = Int(10 * Rnd + 48)
    intUpper = Int(26 * Rnd + 65)
    intLower = Int(26 * Rnd + 97)
    intRand = Int(3 * Rnd + 1)
    Select Case intRand
    Case 1
      strPartPass = Chr(intNum)
    Case 2
      strPartPass = Chr(intNum)
    Case 3
      strPartPass = Chr(intNum)
    End Select

    geraID_tmp = geraID_tmp & strPartPass
  Next

  geraID = geraID_tmp
End Function

set banco = Server.CreateObject("ADODB.Connection")
banco.Open "DBQ="&Server.MapPath("database/database.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
set rectodos = Server.CreateObject("ADODB.Recordset")
rectodos.open "SELECT * FROM imoveis", banco

do while not rectodos.eof
sql_newid = "UPDATE imoveis SET NewId='"&geraID()&"' WHERE id="&rectodos("id")
set recnewid = banco.execute(sql_newid)
rectodos.movenext
loop

rectodos.close

set recrandom = Server.CreateObject("ADODB.Recordset")
sql_rnd = "SELECT TOP 6 categoria, id, bairro, foto1, desc_destaque, newid FROM imoveis WHERE foto1 <> '' ORDER BY newid"
recrandom.open sql_rnd, banco

sql_casa = "SELECT * FROM imoveis WHERE categoria = 'casa' AND destaque = on ORDER BY id DESC"
sql_apto = "SELECT * FROM imoveis WHERE categoria = 'apartamento' AND destaque = on ORDER BY id DESC"
sql_comercial = "SELECT * FROM imoveis WHERE categoria = 'comercial' AND destaque = on ORDER BY id DESC"
sql_terreno = "SELECT * FROM imoveis WHERE categoria = 'terreno' AND destaque = on ORDER BY id DESC"
sql_categ = "SELECT DISTINCT categoria FROM imoveis"
sql_tipo = "SELECT DISTINCT tipo FROM imoveis"
sql_local = "SELECT DISTINCT bairro FROM imoveis"
sql_contador = "INSERT INTO contador (ip) VALUES ('"& Request.ServerVariables("REMOTE_ADDR") &"')"
Set exe_casa = banco.execute(sql_casa)
Set exe_apto = banco.execute(sql_apto)
Set exe_comercial = banco.execute(sql_comercial)
Set exe_terreno = banco.execute(sql_terreno)
Set exe_categ = banco.execute(sql_categ)
Set exe_tipo = banco.execute(sql_tipo)
Set exe_local = banco.execute(sql_local)
Set exe_contador = banco.execute(sql_contador)
%>
<link href="<%=local%>includes/styles/link.css" rel="stylesheet" type="text/css">
<style>
font         { font-family: Arial; font-size: 11 }
</style>
</head>

<body bgcolor="<%=fundo%>" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="77"><!--#include file="includes/barra.asp"--></td>
  </tr>
  <tr>
    <td><table width="778" border="0" align="center" cellpadding="0" cellspacing="0" height="528">
        <tr>
          <td width="1" height="528" valign="top" rowspan="2"></td>
          <td width="626" valign="top" rowspan="2" height="528"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="24"><div align="right">
                    <p align="left">&nbsp;&nbsp;&nbsp; <img border="0" src="imagens/imperdiveis.gif" align="absbottom"></div></td>
              </tr>
              <tr>
                <td height="391" align="center"><table width="510"  border="0" cellspacing="0" cellpadding="0">
  <tr align="center">
    <td width="100" valign="top">
	<table width="100%"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0; padding-top: 0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
    </table>
	<%recrandom.movenext%>	</td>
    <td align="center" valign="middle" width="100"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
    <td width="100" valign="top">
	<table width="100%"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
    </table>
    <%recrandom.movenext%></td>
    <td align="center" valign="middle" width="110"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
    <td width="100" valign="top">
	<table width="125"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="129"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="129"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="129"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="129"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="129"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
    </table>
    <%recrandom.movenext%></td>
  </tr>
</table>                  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="20" align="center"><img src="imagens/linha_horiz.gif" width="535" height="1"></td>
  </tr>
</table>
<table width="512"  border="0" cellspacing="0" cellpadding="0">
  <tr align="center">
    <td width="107" valign="top">
	<table width="100%"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
      </table>
    <%recrandom.movenext%>    </td>
    <td valign="middle" width="95"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
    <td width="121" valign="top">
	<table width="100%"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
      </table>
    <%recrandom.movenext%></td>
    <td valign="middle" width="92"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
    <td width="130" valign="top">
	<table width="93"  border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="126"><font face="arial" size="2" style="font-variant: small-caps"><b><%=recrandom("categoria")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="126"><img src="<%=recrandom("foto1")%>" width="120" style="border: 3 solid #C0C0C0; padding-top: 0"></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="126"><font face="arial" size="1"><b><%=recrandom("bairro")%></b></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="126"><font face="arial" size="1"><%=recrandom("desc_destaque")%></td>
      </tr>
      <tr>
        <td align="center" bgcolor="#FFFFFF" width="126"><font color="#000000" size="1" face="arial"><strong><a href="<%=local%>mais.asp?categoria=<%=recrandom("categoria")%>&id=<%=recrandom("id")%>">mais</a></strong></font></td>
      </tr>
    </table>    </td>
  </tr>
</table></td>
              </tr>
              <tr>
                <td bgcolor="#EBEBEB">&nbsp;&nbsp; <img border="0" src="imagens/Destaques.gif"></td>
              </tr>
              <tr>
                <td height="186" align="center"><table width="610" border="0" cellspacing="0" cellpadding="0">
                    <tr align="center" valign="middle"> 
                      <td width="146"><strong><font face="Arial" size="1">Casas</font></strong></td>
                      <td width="9"><font face="Arial" size="1">&nbsp;</font></td>
                      <td width="146"><strong><font face="Arial" size="1">Apartamentos</font></strong></td>
                      <td width="8"><font face="Arial" size="1">&nbsp;</font></td>
                      <td width="145"><strong><font face="Arial" size="1">Comerciais</font></strong></td>
                      <td width="8"><font face="Arial" size="1">&nbsp;</font></td>
                      <td width="134"><strong><font face="Arial" size="1">Terrenos</font></strong></td>
                    </tr>
                    <tr align="center" valign="middle"> 
                      <td width="146"><font color="#000000" face="arial" size=1>&nbsp;<strong><%=Ucase(exe_casa("bairro"))%></strong></font></td>
                      <td width="9" rowspan="2"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
                      <td width="146"><font color="#000000" face="arial" size=1>&nbsp;<strong><%=Ucase(exe_apto("edificio"))%></strong></font></td>
                      <td width="8" rowspan="2"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
                      <td width="145"><font color="#000000" face="arial" size=1><strong><%=Ucase(exe_comercial("bairro"))%></strong>&nbsp;</font></td>
                      <td width="8" rowspan="2"><img src="imagens/linha_vert.gif" width="1" height="127"></td>
                      <td width="134"><font color="#000000" face="arial" size=1>&nbsp;<strong><%=Ucase(exe_terreno("bairro"))%></strong></font></td>
                    </tr>
                    <tr align="center" valign="middle"> 
                      <td width="146" height="113"><font color="#000000" size="1" face="arial"><img src="<%=exe_casa("foto1")%>" width="100" style="border: 3 solid #C0C0C0"></font></td>
                      <td width="146"><font color="#000000" size="1" face="arial"><img src="<%=exe_apto("foto1")%>" width="100" style="border: 3 solid #C0C0C0"></font></td>
                      <td width="145"><img src="<%=exe_comercial("foto1")%>" width="100" style="border: 3 solid #C0C0C0"></td>
                      <td width="134"><img src="<%=exe_terreno("foto1")%>" width="100" style="border: 3 solid #C0C0C0"></td>
                    </tr>
                    <tr align="center" valign="middle"> 
                      <td width="146" height="18"><font color="#000000" size="1" face="arial"><strong> 
                        </strong><%=mid(exe_casa("desc_destaque"),1,25)%>... <strong><a href="<%=local%>mais.asp?categoria=casa&id=<%=exe_casa("id")%>">mais</a></strong>&nbsp;</font></td>
                      <td width="9">&nbsp;</td>
                      <td width="146"><font color="#000000" size="1" face="arial"><%=mid(exe_apto("desc_destaque"),1,25)%>... 
                        <strong><a href="<%=local%>mais.asp?categoria=apartamento&id=<%=exe_apto("id")%>">mais</a></strong>&nbsp;</font></td>
                      <td width="8">&nbsp;</td>
                      <td width="145"><font color="#000000" size="1" face="arial">&nbsp;<%=mid(exe_comercial("desc_destaque"),1,25)%>... 
                        <strong> <a href="<%=local%>mais.asp?categoria=comercial&id=<%=exe_comercial("id")%>">mais</a></strong></font></td>
                      <td width="8">&nbsp;</td>
                      <td width="134"><font color="#000000" size="1" face="arial">&nbsp;<%=mid(exe_terreno("desc_destaque"),1,25)%>... 
                        <strong><a href="<%=local%>mais.asp?categoria=terreno&id=<%=exe_terreno("id")%>">mais</a></strong>&nbsp;</font></td>
                    </tr>
                  </table></td>
              </tr>
            </table></td>
          <td width="154" valign="top" height="173" bgcolor="#6699CC"><!--#include file="includes/menuesq.asp"--></td>
        </tr>
        <tr>
          <td width="154" valign="top" height="355" bgcolor="#6699CC"><!--#include file="includes/menudir.asp"--></td>
        </tr>
      </table></td>
  </tr>
  <tr>
    <td height="50" valign="top"><!--#include file="includes/rodape.asp"--></td>
  </tr>
</table>
</body>
<!--#include file="includes/fechabanco.asp"-->

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...