Gérer une Base de données, c'est bien quand on commence à avoir pas mal de données. On peut aussi "jouer" avec des fichiers texte ; ca marche pas trop mal.

Il faut d'abord déclarer un objet de type fichier :

Set FSO = CreateObject("Scripting.FileSystemObject")

Sur un serveur, il est utile de préciser l'emplacement exact du fichier. On utilise alors une commande qui permet de récupérer l'emplacement physique sur le serveur (ex : E:\web\user\repertoire\...)

Server.MapPath("fichier.txt")

Ouverture d'un fichier :

Set FICHIER = FSO.OpenTextFile(Server.MapPath("fichier.txt")[,option]) options : lecture (1), écriture (2), cumul (8)

Balayage :

while not FICHIER.AtEndOfStream    response.write FICHIER.ReadLine wend

Ecriture à la fin d'un fichier :

FICHIER.Append("bla bla bla")

Ecriture dans un fichier (qui vient d'être créé) :

FICHIER.WriteLine("bla bla bla")

Pensez à fermer le fichier à la fin :

FICHIER.Close

Pensez à détruire l'objet :

Set FSO = nothing

Gestion des fichiers (après une déclaration du FSO) :

Création :

Set FICHIER = FSO.CreateTextFile(server.mappath("fichier.txt"))

Suppression :

FSO.DeleteFile(Server.MapPath("fichier.txt"))

Copie :

FSO.CopyFile server.mappath("fichier1.txt"),server.mappath("fichier2.txt")

Gestion des répertoires (après une déclaration du FSO) :

Vous pouvez également gérer les fichiers qui se trouvent dans un répertoire

Set REPERTOIRE = FSO.GetFolder(Server.MapPath("/repertoire/")) For Each Item In REPERTOIRE.Files    nb = nb +1    response.write Item.Name ' nom de fichier    response.write Item.dateCreated ' date de creation next set REPERTOIRE = nothing