OJO..Borrar datos en ventana formulario

8461277 · #1 (**permalink**) 10/01/2003, 11:31

Que pregunta..........
Lo que pasa es que necesito saber como puedo borrar las datos que introduscan dentro de un formulario, ya se para consultar, modificar, borrar e insertar. Esto debido a que los diferentes usuarios tienen su propio registro y cuando uno de ellos accede al formulario se visualiza el Nº de registro de otro usuario que empiece con el mismo numero y yo no quiero que se vea, ya que son datos personales y no para que entre ellos se observen........
Espero que me halla explicado bien.............

gracias

Miguel...

ulis2000 · #2 (**permalink**) 10/01/2003, 12:19

Cita:

Mensaje Original por 8461277
Que pregunta..........
Lo que pasa es que necesito saber como puedo borrar las datos que introduscan dentro de un formulario, ya se para consultar, modificar, borrar e insertar. Esto debido a que los diferentes usuarios tienen su propio registro y cuando uno de ellos accede al formulario se visualiza el Nº de registro de otro usuario que empiece con el mismo numero y yo no quiero que se vea, ya que son datos personales y no para que entre ellos se observen........
Espero que me halla explicado bien.............

gracias Miguel...

estas hablando de formularios en web, si es así checa como esta abriendo tu base de datos

8461277 · #3 (**permalink**) 13/01/2003, 09:22

Abre de la siguiente manera, y si es un formulario html:

<html>
<body>
<%
'Declaracion de variables
Dim Obj_Conn
Dim Obj_RS
Dim Cedula
Dim Nombre
Dim Apellido
Dim strSQL

'Fin declaracion de variables

cedula = Request.Form ("cedula")
nombre = Request.Form ("nombre")
apellido = Request.Form ("apellido")

SET Obj_Conn = Server.CreateObject("ADODB.Connection")

Obj_Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\inetpub\asp\cliente.mdb;"

'Suponiendo que la Tabla se llamada clientes y el campo cedula, comprobamos que la persona existe.
strSQL = "select cedula, nombre, apellido from clientes where cedula like '%"&ccedula&"%'"

SET Obj_RS = Obj_Conn.Execute(strSQL)

IF NOT Obj_RS.EOF THEN
' Usuario correcto, actualizar datos.
'strSQL = "update clientes set nombre = '" & nombre & "', apellido = '" & apellido & "' where cedula like '%"&ccedula&"%'"
strSQL = "update clientes set nombre = '" & nombre & "', apellido = '" & apellido & "' where cedula = "& ccedula & " ;"
response.write strSQL

Obj_Conn.Execute(strSQL)

response.write "Los datos del alumno se han actualizado correctamente"

ELSE

response.write "El usuario no existe en la base de datos"

END IF

Obj_RS.Close
Obj_Conn.Close
SET Obj_RS = Nothing
SET Obj_Conn = Nothing

%>

</body>
</html>

Lo que quiero es que dentro del formulario, cada vez que se introduzca la cedula(campo numerico) se borre automaticamente cuando otro usuario ingrese su cedula y no vea el del anterior

Gracias Miguel