Code ASP pour lire les modèles en utilisant FSO

M_ROOT est le nom de fichier et peut utiliser un chemin relatif.

Exemple d'appel:

Réponse.write (loadfile ("test.htm"))

FunctionLoadFile (M_ROOT)

Dimfilename, fso, hndfile

FileName = M_ROOT

Ifright (nom de fichier, 1) <> "/" AndRight (nom de fichier, 1) <> "/" thenFileName = filename & "/"

Filename = server.mappath (filename & m_filename)

Setfso = createObject ("scripting.fileSystemObject")

Ifnotfso.fileexists (nom de fichier) thenshowerror ("Fichier de modèle" & m_filename & "Don't existe!")

setThndFile = fso.OpenTextFile (nom de fichier)

Loadfile = hndfile.readall

Sethndfile = rien

Setfso = rien

IfloadFile = "" thenshowerror ("Le fichier de modèle ne peut pas être lu" & m_filename & "ou le fichier est vide!")

Finition de fin

Articles qui peuvent vous intéresser:

Résumé de l'algorithme de module de puissance rapide du module JS du langage C (Rechercher) Intercepter la chaîne PHP à changement de couleur entrelacé Intercept chinois Intercept 2, le mode d'interception à un octet La stratégie d'audit dans la stratégie de groupe invite les fenêtres non lis algorithme. Algorithme de tri