Ich möchte jemals wissen, wie Sie den Inhalt eines Textdokuments mit ASP anstellen. Hier ist eine einfache Möglichkeit zum Lesen
aus einer Textdatei
<!-Start des ASP-Code ---->
<%
'von James Seymour, http://jamesdot.org
Dim schreiben
Dim Filesysobj, TF, lesen
'Lesen Sie den read.txt
Speichern Sie den Dateinamen, bei dem die Informationen in einer Variablen mit dem Namen Read gespeichert sind
read = read.txt
»Rufen Sie den vollständigen Pfad der Lesedatei ab
read = links (server.mappath (request.servervariables (path_info)), Instrrev (server.mappath
(Request.Servervariables (path_info)), /)) & lesen
'Erstellen Sie eine Instanz des Dateisystemobjekts und speichern Sie sie in eine Variable namens DateiSysObj
Setzen Sie FilesysObj = createObject (scripting.filesystemObject)
»Überprüfen Sie, ob die Lesedatei vorliegt
If (filesysobj.fileExists (lesen)) dann
Wenn die Datei existiert, öffnen Sie sie zum Lesen
Setzen Sie tf = filesysobj.opentextfile (lesen, 1)
read = tf.readline
tf.close
ANDERS
Wenn Sie nicht read.text finden können, zeigen Sie die Standardnachricht an
Read = Ich kann die Datei nicht finden. Read.txt! Das ist also meine Standardnachricht.
Ende wenn
%>
'Tabelle die Anzeige der Datei read.txt
<div ausalign = center>
<Center>
<Tabellenrand = 0 Breite = 40% Zellspazierungen = 0 Cellpadding = 0>
<tr>
<td width = 100%bgcolor =#eeeecc> <b> <%= read%> </b>
</td>
</tr>
<tr>
<td width = 100%>
<!-Ende des ASP->
Verwenden Sie den obigen Code, klicken Sie und ziehen Sie Ihre Maus über den Code, um ihn hervorzuheben. Dann klicken Sie mit der rechten Maustaste auf die
Markieren Sie den Code und klicken Sie auf Kopieren. Jetzt können Sie es in Ihren Code -Editor einfügen.