Schreiben Sie den HTML -Code in die Datei und generieren Sie die Datei im .html -Format
<%
Dateiname = test.htm
Wenn Anfrage (Körper) <> dann
Setzen Sie fso = server.createObject (scripting.FilesystemObject)
Setzen Sie htmlwrite = fso.createTextFile (server.mappath (Dateiname))
htmlwrite.write <html> <kopf> <titels> request.form (title) </title> </head>
htmlwrite.write <body> Ausgangstitel Inhalt: Request.form (Titel) <br/> Ausgangsbörse Inhalt: Request.form (Body) </body> </html>
htmlwrite.close
Fout einstellen = nichts
fso = nichts setzen
Ende wenn
%>
<Formular name = Formmethode = post action =>
<Eingabename = Titelwert = Titelgröße = 26>
<br>
<textarea name = body> body </textArea>
<br>
<br>
<Eingabe type = surugn name = suruging value = generieren html>
</form>
2. Es ist jedoch sehr unpraktisch, die HTML -Datei gemäß der obigen Methode zu generieren. Um die Vorlagenfunktion zu vervollständigen;
Vorlage.htm '// Vorlagendatei
<html>
<kopf>
<title> $ title $ von jzxue.com </title>
</head>
<body>
$ Body $
</body>
</html> testmplate.asp '// HTML generieren
<%
Dim FSO, htmlwrite
Dimer Strtital, StrContent, Strout
'// Erstellen Sie ein Dateisystemobjekt
Setzen Sie fso = server.createObject (scripting.FilesystemObject)
'// Öffnen Sie die Webvorlagendatei und lesen Sie den Vorlageninhalt durch
Setzen Sie htmlwrite = fso.opentextFile (server.mappath (template.htm))
Strout = f.readall
htmlwrite.close
strtital = generierter Webseite Titel
StrContent = generierte Webseite Inhalt
'// Verwenden Sie echte Inhalte, um die Marke in der Vorlage zu ersetzen
Strout = ersetzen (stout, $ title $, strtitle)
Strout = Ersetzen (Strout, $ body $, StrContent)
'// Erstellen Sie eine statische Seite, die generiert werden soll
Setzen Sie htmlwrite = fso.createTextFile (server.mappath (test.htm), true)
'// in den Webinhalt schreiben
htmlwrite.writeLine strout
htmlwrite.close
Response.write generiert einen statischen Seitenerfolg!
'// das Dateisystemobjekt loslassen
Setzen Sie htmlwrite = nichts
fso = nichts setzen
%>