hace dos dias estoy tratando con este codigo pero no se que le pasa... tengo varios similares pero con este me doy no se que le pasa...
el error:
ADODB.Recordset error '800a0cb3'
El Recordset actual no admite actualizaciones. Puede ser una limitación del proveedor o del tipo de bloqueo seleccionado.
/descargas2.asp, line 35
el Codigo:
<%option Explicit %>
<%
Response.Buffer = true
Dim Con,tabla,sql
Set Con = Server.CreateObject("ADODB.Connection")
set tabla = Server.CreateObject("ADODB.RecordSet")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("./dea.mdb")&";"
'con.open "profesores"
sql= "SELECT * FROM Tabla1"
tabla.Open sql,con
cok=request.cookies("usuario")
'Recogemos los datos y validamos que no haya ningun campo vacio
dim materia, archivo, titulo, Texto, Formato, fecha, cok,error
materia = Request.Form("materia")
archivo = Request.Form("archivo")
Titulo = Request.form ("titulo")
Texto = request.form("texto")
Formato =request.form("formato")
fecha = date()
'if Titulo ="" or archivo ="" or materia ="" or Texto="" or formato="" then
'error = "Debe completar todos los datos."
'Response.Write error
'Response.End
'end if
'Si está todo correcto, procedemos a ingresar los datos a la base de datos
tabla.AddNew esta es la linea 35
tabla("texto") = texto
tabla("materia") = materia
tabla("fecha") = fecha
tabla("formato") = formato
tabla("archivo") = archivo
tabla("usuario") = cok
tabla("titulo") = Titulo
tabla.update
'Terminamos e imprimimos un mensaje
Response.Write "Se ha ingresado con exito"
%>
Ayuda porfa