Base de datos u objeto de sólo lectura
Hola:
Estoy haciendo una página ASP, y cuando necesito leer datos no tengo problema, pero si lo tengo cuando pretendo guardar.
El mensaje de error que me da es:
=================================
Microsoft JET Database Engine error '80040e09'
No se puede actualizar. Base de datos u objeto de sólo lectura.
/Fin.asp, line 33
El código de la página que me da el error:
==========================================
<% @LANGUAGE="VBScript" %>
<HTML>
<HEAD>
<TITLE>Resultados</TITLE>
</HEAD>
<BODY>
<!-- #INCLUDE File="ADOVBS.inc" -->
<CENTER>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<H3>LOS DATOS HAN SIDO ALMACENADOS CORRECTAMENTE.</H3>
<BR>
<BR>
</CENTER>
<%
Set cnn = Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
cnn.ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\GIC\Avisos00.mdb"
cnn.Open
rs.Open "Trabajos",cnn,adOpenUnspecified, adLockOptimistic
rs.Addnew
rs("Fecha")=date
rs("Contacto")=Request.Form("txtCon")
rs("Telefono")=Request.Form("txtTel")
rs("Ubicacion")=Request.Form("cmbUbi")
rs("Negociado")=Request.Form("txtNeg")
rs("Peticion")=Request.Form("txtPet")
rs("Asunto")=Request.Form("txtAsu")
rs.Update
rs.Close
cnn.Close
%>
</BODY>
</HTML>
G R A C I A S
nOS VEMOS
Estoy haciendo una página ASP, y cuando necesito leer datos no tengo problema, pero si lo tengo cuando pretendo guardar.
El mensaje de error que me da es:
=================================
Microsoft JET Database Engine error '80040e09'
No se puede actualizar. Base de datos u objeto de sólo lectura.
/Fin.asp, line 33
El código de la página que me da el error:
==========================================
<% @LANGUAGE="VBScript" %>
<HTML>
<HEAD>
<TITLE>Resultados</TITLE>
</HEAD>
<BODY>
<!-- #INCLUDE File="ADOVBS.inc" -->
<CENTER>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<H3>LOS DATOS HAN SIDO ALMACENADOS CORRECTAMENTE.</H3>
<BR>
<BR>
</CENTER>
<%
Set cnn = Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
cnn.ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\GIC\Avisos00.mdb"
cnn.Open
rs.Open "Trabajos",cnn,adOpenUnspecified, adLockOptimistic
rs.Addnew
rs("Fecha")=date
rs("Contacto")=Request.Form("txtCon")
rs("Telefono")=Request.Form("txtTel")
rs("Ubicacion")=Request.Form("cmbUbi")
rs("Negociado")=Request.Form("txtNeg")
rs("Peticion")=Request.Form("txtPet")
rs("Asunto")=Request.Form("txtAsu")
rs.Update
rs.Close
cnn.Close
%>
</BODY>
</HTML>
G R A C I A S
nOS VEMOS
1 respuesta
Respuesta de jado
1