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

Erro

tsarri

Perguntado por tsarri,

 Share

Pergunta

tsarri

tsarri

Postado
Postado

Galera da aparedo este 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.

neste codigo

<!--#include file="config.asp"-->
<html>
<!--#include file="estilo.inc"-->
<body>
<br>
<div align="center">
<!--#include file="conectar.asp"-->
<%
acao = request.querystring("acao")
Select case acao
Case "Enviar"

usuario2 = replace(request.form("nome"), "'", "")
idade = replace(request.form("idade"), "'", "")
estado = request.form("estado")
cidade = replace(request.form("cidade"), "'", "")
mensagem = replace(request.form("comentario"), chr(13), "<br>")
site = request.form("site")

If Len(usuario2) = 0 OR Len(estado) = 0 OR Len(cidade) = 0 OR Len(mensagem) = 0 then
resposta = "Você não preencheu todos os campos obrigatórios"
end if
If idade  = "" then
idade = "--" 
end if
if site = "http://" then
site = "Não possui"
else if site <> "http://" then
site = site
end if
end if

' Checa o dia, mes e ano
' se for menor que 10, adiciona um zero antes da resposta

dia = day(date)
if dia < 10 then
dia = "0" & day(date)
else 
dia = day(date)
end if 
mes = month(date)
if mes < 10 then
mes = "0" & month(date)
else
mes = month(date)
end if
ano = year(date)
if ano < 10 then
ano = "0" & year(date)
else 
ano = year(date)
end if 

' Checa a hora, minuto e segundo
' se for menor que 10, adiciona um zero antes da resposta

hora = hour(now)
min = minute(now)
seg = second(now)

if hora < 10 then
hora = "0" & hour(now)
else
hora = hour(now)
end if

if min < 10 then
min = "0" & minute(now)
else
min = minute(now)
end if

if seg < 10 then
seg = "0" & second(now)
else
seg = second(now)
end if

data = dia &"/"& mes &"/"& ano
horario = hora &":"& min &":"& seg

%>
 <table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td><img src="imagens/topo.jpg" width="600" height="61"></td>
    </tr>
  </table>
  <table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td width="27" background="imagens/lateral_esq.jpg">&nbsp;</td>
      <td width="545"><p align="center">
<% 
if resposta <> "" then
response.write "<br><center><font face=""Verdana"" size=""2"">"& resposta &"</font><br><br><font face='Verdana' size='2'><a href='javascript:history.go(-1)'>Clique aqui para retornar</a></font>"
end if
if resposta = "" then
Set FUNC_INSERE = conexao.execute("Insert Into postagens (usuario, idade, estado, cidade, site, data, hora, mensagem) values ('"& usuario2 & "', '"& idade &"', '"& estado & "', '"& cidade & "', '"& site & "', '"& data &"', '"& horario &"', '"& mensagem & "')")
response.write "<br><center><font face=""Verdana"" size=""2"">Mensagem postada com sucesso!</font><br><font face=""Verdana"" size=""2"">Obrigado pela sua participação "& usuario2 &" !</font><br><br><font face='Verdana' size='2'><a href='default.asp'>Clique aqui para voltar a página inicial</a></font>"
end if
%> 
   <br>
        </p>
<p>&nbsp;</p></td>
      <td width="28" background="imagens/lateral_dir.jpg">&nbsp;</td>
    </tr>
  </table>
</div>
<table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><img src="imagens/baixo.jpg" width="600" height="61" border="0" usemap="#contato"></td>
  </tr>
</table>
<br>
<br>
<BR>
<map name="contato" id="contato">
  <area shape="rect" coords="171,23,415,38" href="mailto:halk@terra.com.br" alt="Contato">
</map>
</body>
</html>
<%
Case else
%>
 <table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td><img src="imagens/topo.jpg" width="600" height="61"></td>
    </tr>
  </table>
  <table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td width="27" background="imagens/lateral_esq.jpg">&nbsp;</td>
      <td width="545"><p align="center">&nbsp;<font face="Verdana, Arial, Helvetica, sans-serif" size="3"><strong>.:Postagem 
          de comentário:.</strong></font><br><font face="Verdana, Arial, Helvetica, sans-serif" size="1">*Campos necessários</font></p>
        <p>
  <form action="postar.asp?acao=Enviar" method="POST" name="Postagem">
  <table width="463" height="130" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> 
            <td width="180" height="22" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3">*<b>N</b>ome:&nbsp;</font></div></td>
  	<td width="283" align="left">&nbsp; 
              <input name="nome" type="text" size="25"></td>
</tr>
    <tr> 
            <td width="180" height="22" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3"><b>I</b>dade:&nbsp;</font></div></td>
  	<td width="283" align="left">&nbsp; 
              <input name="idade" type="text" size="2" maxlength="2"></td>
     </tr><tr>
                 
            <td width="180" height="22" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3">*<b>C</b>idade:&nbsp;</font></div></td>
  	<td width="283" align="left">&nbsp; 
              <input name="cidade" type="text" size="25"></td></tr><tr>
            <td width="180" height="24" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3">*<b>E</b>stado:&nbsp;</font></div></td>
  	<td width="283" align="left">&nbsp; 
              <select size="1" name="estado">
  <option value = "" selected>--</option>
            <option value="AC">AC</option>
            <option value="AL">AL</option>
            <option value="AM">AM</option>
            <option value="AP">AP</option>
            <option value="BA">BA</option>
            <option value="CE">CE</option>
            <option value="DF">DF</option>
            <option value="ES">ES</option>
            <option value="GO">GO</option>
            <option value="MA">MA</option>
            <option value="MT">MT</option>
            <option value="MS">MS</option>
            <option value="MG">MG</option>
            <option value="PA">PA</option>
            <option value="PB">PB</option>
            <option value="PR">PR</option>
            <option value="PE">PE</option>
            <option value="PI">PI</option>
            <option value="RJ">RJ</option>
            <option value="RN">RN</option>
            <option value="RS">RS</option>
            <option value="RO">RO</option>
            <option value="RR">RR</option>
            <option value="SC">SC</option>
            <option value="SP">SP</option>
            <option value="SE">SE</option>
            <option value="TO">TO</option>
  </select></td>
          </tr>
    <tr> 
            <td width="180" height="22" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3"><b>S</b>ite:&nbsp;</font></div></td>
  	<td width="283" align="left">&nbsp; 
              <input name="site" type="text" value="http://" size="25"></td>
          </tr>
    <tr> 
            <td width="180" height="18" align="center"> 
<div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="3">*<b>C</b>omentário:&nbsp;</font></div></td>
  	<td width="180" align="left">&nbsp;</td>
     </tr>
        </table>
  <table width="463" height="70" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
      <td width="65"></td>
            <td width="398" height="70" align="left">&nbsp; 
              <textarea name="comentario" rows="3" cols="35"></textarea>
            </td></tr></table><br>
  	<center><input type="submit" value="Postar">&nbsp;<input type="reset" value="Limpar"></center>
  	</form>
<br>
<font face="Verdana, Arial, Helvetica, sans-serif" size="2"> 
<center> >> <a href="default.asp">Ver postagens</a> << </center> </font> 
        </p>
<p>&nbsp;</p></td>
      <td width="28" background="imagens/lateral_dir.jpg">&nbsp;</td>
    </tr>
  </table>
</div>
<table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><img src="imagens/baixo.jpg" width="600" height="61"></td>
  </tr>
</table>
<br>
<br>
<BR>
</body>
</html>
<% 
end select%>

O codigo eu peguei na net.......falow ph34r.gif

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
dark0

dark0

Postado
Postado

Taí a solução

http://scriptbrasil.com.br/forum/index.php...ndpost&p=148642

Abraços

Link para o comentário
Compartilhar em outros sites

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

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