J'ai appris à extraire les valeurs de fichiers de FSO et j'ai également appris à saisir des informations dans le fichier. Alors appliquons-le.
Je ne sais pas si vous avez cette habitude: lorsque vous voyez un fichier, vous cliquez inconsciemment avec le bouton droit et choisissez de l'ouvrir avec le bloc-notes. Haha, presque aucun fichier n'est pas possible. Alors maintenant, il peut être défini par défaut que tous les fichiers soient du texte, mais les noms de suffixe sont différents; Autrement dit, les informations de contenu de tout fichier peuvent être extraites maintenant. Ok, imaginez:
1. Extraire le chemin d'accès d'un fichier (utilisez le bouton de fichier pour trouver et localiser)
2. Ouvrez le fichier de chemin et lisez toutes les lignes
3. Afficher les informations de lecture
1. ViewCode.asp
| <% Fonction Showcode (nom de fichier) Set fso = server.createObject ("scripting.filesystemObject") Définir CNRS = FSO.OPENEXTFILE (nom de fichier, 1) Bien que ce ne soit pas CNRS.AtendOfStream rsline = cnrs.readline rsline = server.htmlencode (RSLine) Réponse.write (rsline & "<br>") Se promener fonction finale %> <form action = "ViewCode.asp" méthode = "post"> Entrez le nom de fichier <entrée type = "file" name = "filename"> <input type = "soumi" value = "View Source Program"> </ form> <% file = request.form ("nom de fichier") réponse.write (fichier et "programme source comme suit <hr>") Si Trim (fichier) <> "" alors Appel showcode (fichier) Terminer si %> |
Lorsque vous déboguez le programme ci-dessus, vous pouvez sélectionner les pages HTML et ASP, ou ouvrir n'importe quelle application, etc.
La fonction ShowCode définie est principalement utilisée pour ouvrir, lire et afficher tous les contenus d'informations dans le fichier. Notez que server.htmlencode (RSLine) est ajouté pour les fichiers contenant du code HTML standard.
Toutes les lignes du fichier d'affichage sont affichées dans une boucle conditionnelle.
Bien que ce ne soit pas CNRS.AtendOfStream
...
Se promener
Ensuite, l'exemple suivant implique spécifiquement la méthode ouverte. Souviens-toi? Dans des circonstances normales, ouvrez un fichier à l'aide de fso.opentextfile ("c: /testfile.txt", 1), et la fonction du paramètre 1 est: ouvrez le fichier en mode lecture seule. Ce fichier ne peut pas être écrit. Que dois-je faire si un fichier existe et doit déjà y être ajouté? Simple, le paramètre est 8.
PS: Il existe également un moyen de lire ici.
<% whatfile = server.mappath ("test.txt") Set fso = createObject ("scripting.fileSystemObject") Set txt = fso.OpenTExtFile (quellefile, 1) rline = txt.readall RLINE = remplacer (server.htmlencode (Rline), Chr (13), "<br>") Réponse.WRITE RLINE txt.close %> |
À quoi sert cela? Haha, c'est ainsi que le scénario en ligne d'Amazon: si vous pouvez le faire, vous devez d'abord afficher l'histoire originale, puis ajouter l'histoire pour l'écrire au fichier vous-même. La chose la plus importante à propos de l'écriture de fichiers est d'ajouter des écritures. Il peut donc être réalisé ci-dessous.
2. Story.asp
<% Si non demande.form ("nextline") = "" alors Set fso = server.createObject ("scripting.filesystemObject") textFile1 = server.mappath ("story.txt") Définir CNRS = FSO.OPENEXTFILE (TextFile1,8) cnrs.WriteLine (request.form ("nextline")) CNRS.CLOSE terminer si %> L'histoire est la suivante: <% Set fso = server.createObject ("scripting.filesystemObject") textFile1 = server.mappath ("story.txt") Définir CNRS = FSO.OPENEXTFILE (TextFile1,1) Bien que ce ne soit pas CNRS.AtendOfStream Réponse.write "" & cnrs.readline se promener CNRS.CLOSE %> <hr> <formulaire méthode = "post" action = "story.asp"> Veuillez saisir une nouvelle ligne pour cette histoire: <entrée name = "nextline" type = "text" size = "70"> <input type = "soumi" value = "soumi"> </ form>
|