Tutoriales Varios

16. Creación de un nuevo registro

16. Creación de un nuevo registro

En este caso lo que buscamos es crear, a partir de los datos recibidos de un formulario, un nuevo registro en nuestra tabla clientes. Tendremos pues dos archivos diferentes, uno que podría ser un HTML puro en el que introducimos el formulario a rellenar y que nos envía al
segundo, un script muy parecido al previamente visto para realizar una selección. He aquí los dos scripts:

<HTML>

<HEAD>

<TITLE>Insertar.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="Insert Into Clientes (nombre,telefono) values (‘" & nombre & "’,’"
& telefono & "’)"

‘Ejecutamos la orden

set RS = Conn.Execute(sSQL)

%>

<h1><div align="center">Registro Insertado</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>

Como puede verse, la forma de operar es idéntica a la vista anteriormente para el display de una tabla. En este caso hemos introducido un enlace a este primer script de lectura para ver cómo los cambios se han hecho efectivos.

La construcción de la sentencia SQL se hace por fusión de los distintos elementos constitutivos. La forma de fusionarlos mediante el símbolo &. Todo lo que sea texto tiene que ir entre comillas. Sería interesante introducir una línea suplementaria en vuestro código para imprimir la sSQL formada. La línea sería del siguiente tipo:

Response.Write sSQL

Esta línea iría situada evidentemente después de haber construido la sentencia.

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