ayuda con problema de conexion a bdd
Publicado por Frank (7 intervenciones) el 28/06/2007 20:43:44
espero esten bien amigo
les escribo porque tengo un problema con la conexin en asp con un bdd en access
este es el error que me da al almacenar un dato
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
/prueba/verificasion.asp, línea 36
esta es la linea de codigo que utilizo para hacer la interconexion
<%
dim nombre,apellido,direccion,telefono1,telefono2,con,rs,sql,x
nombre = Trim(request.form("nombre"))
apellido = Trim(request.form("apellido"))
direccion = Trim(request.form("direccion"))
telefono1= Trim(request.form("telefono1"))
telefono2 = Trim(request.form("telefono2"))
set con = server.CreateObject("ADODB.Connection")
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & server.MapPath("bdempleados.mdb")
set rs = server.CreateObject("ADODB.Recordset")
sql = "Select * From empleados Order By nombre"
rs.open sql,con,1,2
rs.addnew
rs.fields("nombre") = nombre
rs.fields("apellido") = apellido
rs.fields("direccion") = direccion
rs.fields("telefono1") = telefono1
rs.fields("telefono2") = telefono2
rs.update
Proceso Satisfactorio
%>
espero su pronta ayuda, gracias
les escribo porque tengo un problema con la conexin en asp con un bdd en access
este es el error que me da al almacenar un dato
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
/prueba/verificasion.asp, línea 36
esta es la linea de codigo que utilizo para hacer la interconexion
<%
dim nombre,apellido,direccion,telefono1,telefono2,con,rs,sql,x
nombre = Trim(request.form("nombre"))
apellido = Trim(request.form("apellido"))
direccion = Trim(request.form("direccion"))
telefono1= Trim(request.form("telefono1"))
telefono2 = Trim(request.form("telefono2"))
set con = server.CreateObject("ADODB.Connection")
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & server.MapPath("bdempleados.mdb")
set rs = server.CreateObject("ADODB.Recordset")
sql = "Select * From empleados Order By nombre"
rs.open sql,con,1,2
rs.addnew
rs.fields("nombre") = nombre
rs.fields("apellido") = apellido
rs.fields("direccion") = direccion
rs.fields("telefono1") = telefono1
rs.fields("telefono2") = telefono2
rs.update
Proceso Satisfactorio
%>
espero su pronta ayuda, gracias
Valora esta pregunta


0