Ejemplos de asp básico - medio

Redireccionar una página con un Timer

Puedes redireccionar una pagina pasado un tiempo con las etiquetas META
Ejemplo:


Página redirecionada a IBM a los 15 segundos

Modificación de un registro en una tabla

Este ejemplo nos permite modificar un registro en una tabla usando el objeto recordset.

Quiero suponer que si estas aquí, ya has leído y entendido el ejemplo anterior.
Paramodificar un registro, lo primero que tenemos que hacer es recuperarlo de la tabla y posicionar en él el cursor (hablando en plata, hacer una select para recuperarlo y movernos por el recordset obtenido hasta situarnos en el).

Una vez situados en el registro a modificar asignaremos los valores que queramos poner en los campos a modificar con sentencias de asignación normales:rs("campo_a_modificar")="Nuevo_Valor"

Una vez asignados los valores, emplearemos el metodo Update de recordset para grabar las modificaciones en la tabla de la Base de Datos.

La tabla que usamos en el ejemplo consta de 2 campos:

TABLA IMPACTOS

codigo Clave principal de la tabla de tipo autonumerico (Nota: los valores a los campos autonumericos los asigna directamente el mismo Gestor de Bases deDatos)
contador Campo numérico



El ejemplo que os muestro realiza una select contra la tabla seleccionando por el campo clave cuyo valor se supone que recibimos desde un formulario (no creo que haga falta decir que los campos clave no se repiten, así que nos seleccionara un solo registro o bien, si ese registro no existe nos devolverá un recordset vació).

En el caso de que encuentre elregistro le sumara 1 al valor que ya existía en el campo "contador" , si no es asi y el registro no existia, creara un nuevo registro asignando el valor 1 al campo "contador" (como ya hemos comentado antes al campo "codigo" no hace falta asignarle ningún valor, se lo asigna directamente el Gestor de B.D.)

Actualizar.asp

Paginación de registros

Este ejemplo nos permite paginar en bloques deregistros el resultado de una select contra una tabla de nuestra base de datos.

Vas a necesitar el archivo de variables Adovbs.inc descárgalo AQUI

Paginando.asp



Paginación de registros

rs.pagecount then
session("pagina")=rs.pagecount 'evitamos el error de reload
end if%>

rs.recordcount then
fin =rs.recordcount
end if
%>
Paginación de registros

Registros
al deun total de

Página
de

Nombre de producto
Cantidad por unidad
Precio por unidad

Compactar una BBDD Access desde ASP
Extraido de XL WebMasters

Utilizando ASP podemos compactar una Base de datos que tengamos en el servidor de manera que esta sea más pequeña y su rendimiento mejor. El problema de las Bases de Datos de Acces es que van creciendo y muchas veces al borrar unregistro este no aparece peró sigue ocupando espacio en la Base de Datos. Al compactar, todos estos espacios ocupados y inservibles són borrados.



Crear, leer y guardar Archivos en el servidor.
Autor Mauro Rondinelli

Hoy vamos a ver como crear, leer y guardar archivos en el servidor utilizando el objeto FileSystemObject. Antes que nada veamos bien para que sirve este objeto, elFileSystemObject nos permite realizar operaciones con archivos, carpetas y unidades del servidor, siempre y cuando este tenga los permisos adecuados, por ejemplo si hay una carpeta o un archivo de solo lectura e intentamos borrarlo nos dara un error, pero lo que hoy nos ocupa son los archivos asi que vamos a ver como se crea este objeto...

Const ForReading = 1' declaramos las constantes
Dim fso,archivo, texto ' declaramos las variables

Set fso = CreateObject("Scripting.FileSystemObject")


Primero declaramos las variables y constantes que utilizamos (mas adelante explicaremos cada una) y despues creamos el objeto 'FileSystemObject' y se lo asigna a la variable 'fso', ahora crearemos un archivo llamado 'prueba.txt'

set archivo = fso.CreateTextFile ("prueba.txt", true)

Con...