yo hago esto:
Código:
Set db = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
con="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/riojavina/data/bbddRiojavina.mdb")
db.open con
sql="select * from Productos"
rs.open sql,db
rs.addnew
rs.fields("NomMarca")=request.Form("Marca")
rs("NomVariedad")=request.Form("NomVariedad")
rs("NomProducto")=request.Form("NomProducto")
rs("EAN1")=request.Form("EAN1")
rs("EAN2")=request.Form("EAN2")
rs("Formato1")=request.Form("Formato1")
rs("Formato2")=request.Form("Formato2")
rs("BotPack")=request.Form("BotPack")
rs("BotCaja")=request.Form("BotCaja")
rs("Paletizacion")=request.Form("palet")
rs("Acidez")=request.Form("acidez")
rs("Descripcion")=request.Form("Descripcion")
rs("Sello")=request.Form("Sello")
rs("URLImagen")=request.Form("URLImagen")
rs("URLImgPeke")=request.Form("URLImgPeke")
rs("Criterio")=request.Form("Criterio")
rs("Otros Datos")=request.Form("Otros")
rs.update
response.write("<table style='margin-left:20' cellpadding='0' cellspacing='0' border='0'><tr><td class='Titulo3' width='746'>Alta de Productos<tr><td colspan='3'><hr color='#FF0000'><tr><td width='257' class='titulo'>Producto Añadido correctamente")
response.Write("<tr><td><br>")
Y me sale este mensaje:
Cita: ADODB.Recordset error '800a0cb3'
El Recordset actual no admite actualizaciones. Puede ser una limitación del proveedor o del tipo de bloqueo seleccionado.
/riojavina/admin/ALTA_FINAL_productos.asp, line 24
La linea 24 es la de color, ke esta mal???
Gracias