Je veux toujours savoir comment afficher le contenu d'un document texte à l'aide d'ASP. Voici un moyen facile de lire
à partir d'un fichier texte
<! - Début du code ASP ---->
<%
'par James Seymour, http://jamesdot.org
Tamiser l'écriture
Dim FilesysObj, TF, Read
'Lire la lecture.txt
«Stockez le nom du fichier où les informations sont stockées dans une variable appelée lecture
read = read.txt
'Récupérer le FullPath du fichier de lecture
read = Left (server.mappath (request.servervariables (path_info)), instrrev (server.mappath
(Request.servervariables (path_info)), /)) et lire
'Créez une instance de l'objet de fichier Système et stockez-la dans une variable appelée filesysObj
Set fileSysObj = createObject (scripting.filesystemObject)
'Vérifiez si le fichier de lecture existe
If (filesysoBj.fileExists (lire)) alors
'Si le fichier existe, alors ouvrez-le pour la lecture
Set tf = filesysoBj.OpenTextFile (lire, 1)
lire = tf.readline
tf.close
AUTRE
'Si vous ne trouvez pas Read.Text, affichez le message par défaut
read = je ne trouve pas le fichier lecture.txt! C'est donc mon message par défaut.
Terminer si
%>
'table l'affichage du fichier read.txt
<div align = Center>
<Nenter>
<Table Border = 0 Width = 40% CellSpacing = 0 CellPadding = 0>
<tr>
<td width = 100% bgcolor = # eeeecc> <b> <% = read %> </b>
</td>
</tr>
<tr>
<td width = 100%>
<! - Fin de l'ASP ->
Utilisez le code ci-dessus, cliquez et faites glisser votre souris sur le code pour le mettre en surbrillance. Puis cliquez avec le bouton droit sur le
Code mis en surbrillance et cliquez sur Copier. Vous pouvez maintenant le coller dans votre éditeur de code.