Il y a souvent de telles exigences. , l'exigence que le fichier dynamique inclut est soumis à la <! #include file = filename.asp -> Macro Restrictions
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:
| La fonction inclut (nom de fichier) Dim re, contenu, fso, f, aspstart, aspend set fso = createObject (scripting.fileSystemObject) set f = fso.OpenTExtFile (server.mappath (nom de fichier)) Contenu = F.Readall f.close Définir F = rien Définir FSO = rien Définir Re = nouveau regexp re.Pattern = ^ / s * = AsPend = 1 aspstart = instlit (aspender, contenu, <%) + 2 faire en aspstart> aspender + 1 Response.Write mid (Content, Aspennd, aspstart-assend-2) asPend = instr (aspstart, contenu,% />) + 2 Exécuter (re.replace (mid (contenu, aspstart, aspend-asstart-2), réponse.write)) aspstart = instlit (aspender, contenu, <%) + 2 boucle Response.write mid (contenu, aspendud) Définir RE = rien Fonction finale |
Exemple d'utilisation:
inclure (youinc.asp) |