Supongamos que desea crear un libro de visitas simple donde pueda crear una base de datos donde almacena la información del usuario. Sin embargo, el uso de FSO para almacenar información le ahorrará tiempo y dinero si no se requiere la potencia de la base de datos. Y algunos ISP pueden restringir las aplicaciones de bases de datos en la web.
Supongamos que ha recopilado información sobre el usuario en un formulario, aquí hay un código HTML de formulario simple:
<html>
<Body>
<Form Action = FormHandler.asp Method = Post>
<Input type = text size = 10 name = username>
<Input type = text size = 10 name = HomePage>
<Input type = text size = 10 name = correo electrónico>
</form>
</body>
< /html>
Echemos un vistazo al código que procesa formularios en Formhandler.asp:
< %
'Obtener información de formulario
strname = request.form (username)
strhomepage = request.form (página de inicio)
stremail = request.form (correo electrónico)
'Crea el objeto FSO
Establecer fso = server.createObject (scripting.filesystemObject)
Hasta ahora, nada nuevo no es más que obtener el valor del campo de formulario y asignar valores a variables. Una parte interesante aparece a continuación: escriba un archivo:
ruta = C: EMP est.txt
Forreading = 1, forwriting = 2, Forappending = 3
'Abra el archivo
establecer archivo = fso.opentextfile (ruta, forappending, true)
'Escribe la información al archivo
file.write (strname) y vbcrlf
file.write (strhomepage) y vbcrlf
file.write (stremail) y vbcrlf
'Cerrar y limpiar
File.close
Establecer archivo = nada
Establecer FSO = nada
Recuerde que el método OpenTextFile devuelve un objeto TextStream, que es otro objeto en el modelo FSO. El objeto TextStream revela formas de manipular el contenido del archivo, como escribir, leer y omitir una línea. El VB constante VBCRLF produce un carácter nuevo.
True se define en el parámetro de comando de OpenTextFile, que le dice al sistema que si el archivo no existe, cree. Si el archivo no existe y el parámetro verdadero no está definido, se produce un error.
Ahora vaya al Directorio C: EMP, Open Test.txt, y puede ver la siguiente información:
Nombre del usuario
Página de inicio del usuario
Correo electrónico del usuario
Por supuesto, estas palabras pueden ser reemplazadas por cualquier cosa ingresada en la forma