M_ROOT ist der Dateiname und kann einen relativen Pfad verwenden.
Aufrufen Beispiel:
Response.write (loadFile ("test.htm"))
FunctionloadFile (M_ROOT)
DimFileName, FSO, Hndfile
Dateiname = m_root
IFright (Dateiname, 1) <> "/" undRight (Dateiname, 1) <> "/" thenFileName = Dateiname & "/"
Dateiname = Server.Mappath (Dateiname & M_FileName)
Setfso = createObject ("scripting.filesystemObject")
Ifnotfso.fileExists (Dateiname) ThenshowerRor ("Vorlagendatei" & m_filename & "Nicht existieren!"))
setttHndFile = fso.opentextfile (Dateiname)
LoadFile = hndfile.readall
Setndndfile = nichts
Setfso = nichts
IFLOADFILE = "" ThenhowerRor ("Vorlagendatei kann nicht gelesen werden" & m_filename & "oder die Datei ist leer!")
Endfunktion