Foros del Web » Programando para Internet » ASP Clásico »

Conexion e insercion en Access

Estas en el tema de Conexion e insercion en Access en el foro de ASP Clásico en Foros del Web. Este es el segundo mensaje, si alguien me puede ayudar. Sucede que me conecto a la BD pero cuando inserto el registro me sale un ...
  #1 (permalink)  
Antiguo 22/03/2003, 18:41
 
Fecha de Ingreso: marzo-2003
Ubicación: Santa Marta
Mensajes: 30
Antigüedad: 22 años, 1 mes
Puntos: 0
Conexion e insercion en Access

Este es el segundo mensaje, si alguien me puede ayudar. Sucede que me conecto a la BD pero cuando inserto el registro me sale un error que el objeto no esta abierto... Eso es falso porque esa misma conexion la utilzo para una consulta, y muestro todos los registros, o hay que abrir la BD de otra forma cuando es insercion...?
  #2 (permalink)  
Antiguo 22/03/2003, 19:50
Avatar de carlunchos  
Fecha de Ingreso: enero-2002
Ubicación: no tengo, soy un desubicado?.
Mensajes: 438
Antigüedad: 23 años, 3 meses
Puntos: 1
Hola Gennys, seria bueno que pongas el codigo para ver como funciona.

Saludos.

__________________
Carlunchos
  #3 (permalink)  
Antiguo 24/03/2003, 09:55
 
Fecha de Ingreso: marzo-2003
Ubicación: Santa Marta
Mensajes: 30
Antigüedad: 22 años, 1 mes
Puntos: 0
Hola Carlunchos. Este es el codigo ASP, lo hago atraves de ODBC y directo, pero no puedo insertar, me dice que el objeto no esta abierto. revisa a ver que ves de malo:

<%
on error resume next

Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("./BDGennys.mdb")

'Aqui lo hago con DSN e igual, o inserta.
' Set conexion = Server.CreateObject("ADODB.Connection")
' conexion.ConnectionString = "DSN=Gennys1"
' conexion.Open

textoSql = "insert into Clntes(nombre, edad,direccion,telefono) values('" & Request.Form("t1") & "','" & Request.Form("t2") & "','" & Request.Form("text1") & "','" & Request.Form("text2") & "')"

conexion.Execute(textoSql)

response.write err.number
if err.number<>0 then
response.Write "Error en la Base de Datos, tipo de Eror: "& err.description & " "
else
response.write "Todo Ok"
end if

' MiConexion.Close
Conexion.Close
set conexion = nothing

Response.write("GrbarBDATOS")
%>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:05.