10/01/2003, 09:04
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: san juan de los morros
Mensajes: 887
Antigüedad: 22 años, 6 meses Puntos: 1 | |
| Ayuda con este codigo
Hola amigos del foro........
Tengo un pequeño problema con este codigo, el cual hace lo que se le pide que es MODIFICAR DATOS, lo unico que no hace es decirme que los datos esta correctamente modificado? creo que es un problema de reponse.write o el body de la pagina????
por favor ayudeme?????
1000 gracias miguel Este es el codigo:
<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&"%'"
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> |