Restreint par <! # IncludeFile = "filenAm.asp" -> macro
Le fichier doit exister et sera précompilé (que les conditions aient été précédées)
Il existe souvent de telles exigences, y compris différents fichiers en fonction de différentes exigences
Si les paramètres de chaque individu sont différents, il est nécessaire d'inclure dynamiquement des fichiers.
Le code est le suivant:
FonctionNinde (nom de fichier)
Dimre, contenu, fso, f, aspstart, aspend
setfso = createObject ("scripting.fileSystemObject")
setf = fso.OpenTExtFile (server.mappath (nom de fichier))
Contenu = F.Readall
f.close
setf = rien
setfso = rien
setRe = newRegexp
re.Pattern = "^ / s * ="
AsPend = 1
aspstart = instlin (aspended, contenu, "<%") + 2
DowHileaspstart> Aspennd + 1
Response.WriteMID (Contenu, Aspennd, AspStart-Aspend-2)
asPend = instr (aspstart, contenu, "% />") + 2
Exécuter (re.replace (mid (contenu, aspstart, aspennd-asstart-2), "réponse.write"))
aspstart = instlin (aspended, contenu, "<%") + 2
boucle
Response.WriteMID (Contenu, AsPend)
Setdre = rien
Finition de fin
Exemple d'utilisation:
inclure ("youinc.asp")