Tutoriales Varios

17. Actualización de un registro existente

diginota
1 minuto para leer

17. Actualización de un registro existente
Para mostrar cómo se actualiza un registro presente en nuestra base de datos, vamos a hacerlo a partir de un caso un poco más complejo para que empecemos a familiarizarnos con estas operaciones. Realizaremos un par de scripts que permitan cambiar el numero de teléfono de las distintas personas presentes en nuestra base. El nombre de estas personas, así como el nuevo numero de teléfono, serán recogidos por medio de un formulario.

El archivo del formulario va a ser esta vez un script ASP en el que efectuaremos una llamada a nuestra base de datos para construir un menú desplegable donde aparezcan todos los nombres. La cosa quedaría así: 

<HTML>

<HEAD>

<TITLE>Actualizar1.asp</TITLE>

</HEAD>

<BODY>

<div align="center">

<h1>Actualizar un registro</h1>

<br>

<%

‘Instanciamos y abrimos nuestro objeto conexion

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open "Mibase"

%>

<FORM METHOD="POST" ACTION="actualizar2.asp">

Nombre<br>

<%

‘Creamos la sentencia SQL y la ejecutamos

sSQL="Select nombre From clientes Order By nombre"

set RS = Conn.Execute(sSQL)

%>

<select name="nombre">

<%

‘Generamos el menu desplegable

Do While not RS.eof%>

   <option><%=RS("nombre")%>

   <%RS.movenext

Loop

%>

</select>

<br>

Teléfono<br>

<INPUT TYPE="TEXT" NAME="telefono"><br>

<INPUT TYPE="SUBMIT" value="Actualizar">

</FORM>

</div>

</BODY>

</HTML>

La manera de operar para construir el menú desplegable es la misma que para visualizar la tabla. De nuevo empleamos un bucle Do While que nos permite mostrar cada una de las opciones.

El script de actualización será muy parecido al de inserción:


<TITLE>Actualizar2.asp</TITLE>

</HEAD>

<BODY>

<%

‘Recogemos los valores del formulario

nombre=Request.Form("nombre")

telefono= Request.Form("telefono")

‘Instanciamos y abrimos nuestro objeto conexion

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open "Mibase"

‘Ahora creamos la sentencia SQL

sSQL="Update Clientes Set telefono=’" & telefono & "’ Where nombre=’" &
nombre & "’"

‘Ejecutamos la orden

set RS = Conn.Execute(sSQL)

%>

<h1><div align="center">Registro Actualizado</div></h1>

<div align="center"><a href="lectura.asp">Visualizar el contenido de la
base</a></div>

<%

‘Cerramos el sistema de conexion

Conn.Close

%>

</BODY>

</HTML>

Nada que comentar al respecto salvo la estructura de la sentencia SQL que en este caso realiza un Update en lugar de un Insert. Aconsejamos, como para el caso precedente imprimir el valor de sSQL de manera a ver cómo queda la sentencia una vez construida.

Indaya.com – http://www.gnu.org/copyleft/fdl.es.html
Close

Ops! Adblock detectado!!

Hemos detectado que está utilizando AdBlock Plus o algún otro software de bloqueo que impide que la página se cargue completamente. En mi blog no hay ningún banner, Flash, animación, sonido desagradable o anuncio emergente. Te aseguro que no encontrarás estos tipos de anuncios molestos. Solo publicidad de Google, libre de malware. Estos anuncios son el único ingreso de dinero para llevar adelante el sitio, por lo que te pido tu ayuda haciendo lo siguiente: Considera agregarnos a tu lista blanca de bloqueo de anuncios o deshabilita tu software de bloqueo para seguir disfrutando sin limitaciones del blog. Gracias por entender y ayudar a continuar con el trabajo.