Actualizar un registro existente con ASP (2)

'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.

Autor: Admin
http://www.lawebera.es/manuales/asp/17.php

Usuarios que han visto este tema también han visto...

- Validar e-mail
- Calculando Fechas y Horas en ASP
- Lectura y Escritura de Archivos
- Proteger páginas con contraseña
- El objeto Drive en ASP

- Versión imprimible de este documento

- Enviar por e-mail este documento