 |
|
|
|
|
|
Portada | Monotemáticos | Secciones | Desarrolladores | Comunidad | Servicios | Servicios profesionales | RSS | |
||
|
||||
|
|
|||
 |
|
 |
||
|
||||
Script para insertar los datos
Vemos el script ASP necesario para recoger los datos del formulario e insertarlos en la base de datos.
22/2/02 - La página ingreso.asp es la encargada de introducir los datos que nos llegan desde el formulario de inserción en la base de datos. Vemos su código a continuación.
Página ingreso.asp
'definimos el lenguaje a utilizar
<%@ Language="VBScript" %>
<html>
<head>
<title>Ingreso de Datos</title>
</head>
'comienza el script
<%
'definimos la variable de conexion
Dim Conexion,Tabla
Set Conexion = Server.CreateObject("ADODB.Connection")
Set Tabla = Server.CreateObject("ADODB.Recordset")
'conectamos a la base de datos mediante OLE ODBC dando el Driver
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("base.mdb")
'definimos la variable de carga de datos
Dim Temp
'buscamos los datos
Temp="Select * From Tabla1 Where UCase(Nombre)='" & UCase(Request("Dato1")) & "' And UCase(Des)='" & UCase(Request("Dato2")) & "' And UCase(Url)='" & UCase(Request("Dato3")) & "' And UCase(Categoria)='" & UCase(Request("Dato4")) & "' And UCase(Pal)='" & UCase(Request("Dato5")) &"'"
Tabla.Open Temp,Conexion,2,3,1
'si no se repiten agregamos los datos a nuestro buscador
If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla("Nombre") = Request("Dato1")
Tabla("des") = Request("Dato2")
Tabla("Url") = Request("Dato3")
Tabla("Categoria") = Request("Dato4")
Tabla("Pal") = Request("Dato5")
Tabla.Update
'fin del Script
%>
<font face="Tahoma" size="2"><b><i>Ingreso de datos completado</i></b></font></p>
<%
'si el campo ya existe para no hacer dobles nos da este mensaje
Else
Response.Write "El registro ya existe"
End If
'cerramos la conexion
Tabla.Close
Conexion.Close
%>
<p align="center"><font face="Tahoma" size="2"><b><i>Buscador Web 2002</i></b></font></p>
<p align="center"><font face="Tahoma" size="2"><b><i><a href="cargar.htm" target="_top">Ingresar
Nuevo</a></i></b></font></p>
</body>
</html>
Observemos bien el script, y centrémonos en la carga de datos, hace un REQUEST de los datos que ingresamos en el formulario, y comprueba que no exista una igualdad en los datos, una vez hecho esto agrega con la sentencia ADDNEW una nueva fila a nuestra base de datos.
| Colocación de la base de datos: En este ejemplo se accede a la base de datos sin crear un DSN en el sistema del servidor. Para que funcione debemos colocar la base de datos en el mismo directorio que la página ASP. |
Cómo guardar las URL
Tenemos que recordar que en el formulario en el campo URL debemos ingresar la url de la Web a la cual queremos vincular, que puede estar dentro o fuera de nuestro sitio.
Si esta dentro de nuestra web, en principio no deberíamos incluir el "http://" al principio del enlace, pero nosotros recomendamos hacerlo, para guardar todas las URL con un formato idéntico y no tener problemas luego a la hora de crear los enlaces.
Así pues, todas las URL que introducamos deberían ser absolutas, estén o no dentro de nuestro sitio.
+ 1 categoria relacionada
+ 2 comentarios (Añadir)
+ 1 comentario no revisado
| Autoría, licencia y acciones sobre este artículo | ||||||
|
Informe de Mario Matías Sebely*
WebMaster ConozcaMisiones.com URL: http://www.conozcamisiones.com Atención: Copyright. Este artículo no se puede reproducir sin la autorización expresa del autor. * Para consultas técnicas utilizar la lista de correo.
|
| Los comentarios de los visitantes son para ampliar la información del artículo. Cualquiera puede participar. |
| Se muestran 2 comentarios revisados |
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/1/ingreso.asp, línea 19
la linea 19 contiene la linea de codigo siguiente
Tabla.Open Temp,Conexion,2,3,1
Cual sería el problema si he copiado el mismo codigo de esta pagina???
Bueno seguiremos mirando esto, de momento tiene buena pinta, y ejecuta la funcion de buscar.
Un saludo
 | Añadir un comentario del artículo |
| Comentarios sin revisar |
| Entre los comentarios no revisados puede haber algunos interesantes que se hayan enviado recientemente. |
 | Ver los comentarios no revisados |
| Añadir un comentario del artículo |
| Enlaces: |
| Maestrosdelweb |
Ir arriba
Lectura recomendada  Compra este libro en Agapea, la librería urgente a domicilio. |
||||||||
Tienda DesarrolloWeb
