Ver Mensaje Individual
  #8 (permalink)  
Antiguo 26/09/2006, 09:34
jbco
 
Fecha de Ingreso: junio-2006
Mensajes: 104
Antigüedad: 17 años, 10 meses
Puntos: 1
Pantalla sin datos, ni campos en el formulario.
<%
'Conectamos a la BD.
Dim oConn,strSQL
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./usuario.mdb"))
strSQL = "insert into Venta_usuarios(Producto, Tipo_Producto, Cantidad, Precio, Sub_Total) values ('" & Request.Form("Productos") & "','" & Request.Form("subcatagory") & "', '" & Request.Form("Cantidad") &"', '" & Request.Form("precio") & "', '" & Request.Form("T1") & "')"
response.write (strSQL)
response.end
oConn.Execute(strSQL)


oConn.Close
set oConn = nothing %>
************************************************** **********************
Pantalla con error
<%
'Conectamos a la BD.
Dim oConn,strSQL
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./usuario.mdb"))
strSQL = "insert into Venta_usuarios(Producto, Tipo_Producto, Cantidad, Precio, Sub_Total) values ('" & Request.Form("Productos") & "','" & Request.Form("subcatagory") & "', '" & Request.Form("Cantidad") &"', '" & Request.Form("precio") & "', '" & Request.Form("T1") & "')"
response.write (strSQL)
oConn.Execute(strSQL)
response.end

oConn.Close
set oConn = nothing %>

Error generado:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] No se puede agregar o cambiar el registro porque se necesita un registro relacionado en la tabla 'usuarios_autentificacion'.
/Funciones.asp, línea 77
oConn.Execute(strSQL)