AYUDA URGENTE !!! ESTOY TRANCADO !!!
Publicado por Roberto (9 intervenciones) el 24/07/2003 17:48:14
Tengo el siguiente código:
<%
Dim Nro
Valor=Request.querystring("Valor")
Set Conn = Server.CreateObject("ADODB.Connection")
Set rs= Server.CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("DB/Datos.mdb")
sql ="SELECT * FROM Contactos ORDER BY ID_Contacto ASC"
rs.Open sql, Conn , 2, 3
Conn.execute(sql)
sSQL="DELETE FROM Contactos WHERE ID_Contacto =" &Valor
set rs = Conn.Execute(sSQL)
Conn.Close
%>
La variable VALOR trae el valor "1", y me dá el siguiente error ?????
Microsoft JET Database Engine (0x80004005)
No se pudo eliminar nada en las tablas especificadas.
ALGUIEN ME PUEDE ORIENTAR PORQUE ES QUE ME ESTÁ DANDO ESE ERROR ??
MUCHAS GRACIAS
<%
Dim Nro
Valor=Request.querystring("Valor")
Set Conn = Server.CreateObject("ADODB.Connection")
Set rs= Server.CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("DB/Datos.mdb")
sql ="SELECT * FROM Contactos ORDER BY ID_Contacto ASC"
rs.Open sql, Conn , 2, 3
Conn.execute(sql)
sSQL="DELETE FROM Contactos WHERE ID_Contacto =" &Valor
set rs = Conn.Execute(sSQL)
Conn.Close
%>
La variable VALOR trae el valor "1", y me dá el siguiente error ?????
Microsoft JET Database Engine (0x80004005)
No se pudo eliminar nada en las tablas especificadas.
ALGUIEN ME PUEDE ORIENTAR PORQUE ES QUE ME ESTÁ DANDO ESE ERROR ??
MUCHAS GRACIAS
Valora esta pregunta
0