En raison de la <! # IncludeFile = "filenAm.asp" -> Macro Restrictions, le fichier doit exister et sera précompilé (que les conditions aient été appliquées précédemment)
Il y a souvent de telles exigences. Différents fichiers doivent inclure en fonction des différents besoins, tels que différents paramètres de chaque individu, les exigences visent donc à inclure les fichiers dynamiquement.
Le code est le suivant:
La copie de code est la suivante:
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:
La copie de code est la suivante:
inclure ("youinc.asp")