13/01/2003, 11:19
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: san juan de los morros
Mensajes: 887
Antigüedad: 22 años, 5 meses Puntos: 1 | |
| danielrey es cedula es mi variable pero de ninguna forma funciona por favor esto me esta rompiendo la cabeza :-p
ayuadanme........... el codigo que me pazo bakuzip
es el sigueinete
<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 = & "&cedula &" ; "
SET Obj_RS = Obj_Conn.Execute(strSQL)
IF NOT Obj_RS.EOF THEN
SQL = "update clientes set nombre = '" & nombre & "', apellido = '" & apellido & "' where cedula = "& Obj_RS("cedula") & " ;"
response.write "sql actualiza=" & SQL
Obj_Conn.Execute(SQL)
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>
|