Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

okil

Problema com insercao

Por , em ASP Clássico

Recommended Posts

okil    0

okil
Postado

Ola a todos to como um problema para inserir dados no banco ele da o seguinte Erro

 

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.

/maduro/admin_sites_uteis/incluir_tetes2.asp, line 53

 

 

Codigo

ASP
<html>

<head>

<title>Destaque na Página Inicial</title>

</head>

<body>

<link href="../estilo.css" rel="stylesheet" type="text/css">

<center>

<table width="280" border="0" cellspacing="2" cellpadding="2">

<tr>

<td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="../seta2.gif" width="9" height="7"> <a href="consulta.asp">Consultar</a></font></td>

<td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="../seta2.gif" width="9" height="7"> <a href="incluir.asp">Incluir</a></font></td>

<td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="../seta2.gif" width="9" height="7"> <a href="altera.asp">Alterar</a></font></td>

</tr>

</table>

<b><font face="Verdana, Arial, Helvetica, sans-serif"><br>

Formulário de Inclusão</font></b><font face="Verdana, Arial, Helvetica, sans-serif">

</h2>

</font>

</center>

 

<%

If IsEmpty( Request.Form("submit") ) Then

%>

 

<form method=post action="">

<table border=0 width="80%" align=center>

<tr>

<td width="10%" align=right valign=top><div align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Nome:</font></div></td>

<td width="90%" align=left valign=top>

<input type=text name="Nome" value="" size=25 maxlength=50 style="{<font-family:Arial; font-size:12}">

</td>

</tr>

<tr>

<td align=right valign=top><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Endereço:</font></td>

<td align=left valign=top>

<input type=text name="Endereco" value="" size=25 maxlength=50 style="{<font-family:Arial; font-size:12}">

</td>

</tr>

</table>

<center><input type=submit name=submit value=Incluir style="{<font-family:Arial; font-size:12}"></center>

</form>

 

<%

Else

If Not IsEmpty(Request.Form("submit")) AND Trim(Request.Form("Nome")) <> "" AND Trim(Request.Form("Endereco")) <> "" Then

Set Conexao = Server.CreateObject("ADODB.Connection")

'Conexao.Open "DBQ=c:inetpubwwwrootjrangelabancodestaque.mdb;Driver={Microsoft Access Driver (*.mdb)};"

Conexao.Open "DBQ=C:Inetpubwwwrootmadurobancouteis.mdb;Driver={Microsoft Access Driver (*.mdb)};"

ComandoSQL = "INSERT INTO uteis (Nome,Endereco)"

ComandoSQL = ComandoSQL & " VALUES ("

ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("Nome")) & "',"

ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("Endereco")) & "')"

Set bd = Conexao.Execute(ComandoSQL)

Conexao.Close

Set bd = Nothing

Set Conexao = Nothing

%>

 

<center>

<font size="2"><br>

<font face="Verdana, Arial, Helvetica, sans-serif">Os dados foram enviados com sucesso!

 

<br>

<a href="index.asp"><b>Clique aqui</b></a> para continuar</font></font>

</center>

 

<%

Else

%>

 

<font face="Arial" size="2">

</font>

<center>

<font size="2" face="Verdana, Arial, Helvetica, sans-serif"><br>

Atenção: Alguns dados necessário não foram preenchidos corretamente <br>

<a href="java script:history.go(-1)"><b>Clique aqui</b></a> para voltar

</font><font face="Verdana, Arial, Helvetica, sans-serif"> </font>

</center>

<font face="Verdana, Arial, Helvetica, sans-serif">

<%

End If

End If

%>

</font>

</body>

</html>

 

Obriga a todos

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

Falta permissao de escrita

Compartilhar este post

Link para o post
Compartilhar em outros sites

jrcardozo    4

jrcardozo
Postado

procure no forum usando os parametros da mensagem de erro, encontrará inumeros tópicos com a mesma questão....é falta de permissão de acesso a pasta e ao arquivo mdb

Compartilhar este post

Link para o post
Compartilhar em outros sites

okil    0

okil
Postado

Mais este problema eu devo fazer modificacoes no meu banco para obter permissao he isto

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito