How does one dynamically add an inclue file on an ASP page?

Accept <! # Include file = "filename. asp" --> macro Restriction
This file must exist and be pre-compiled (no matter whether the preceding conditions are met)

This is often the case where different files are included according to different requirements.
If you have different settings, you must dynamically include files.

CodeAs follows:

Function include (filename)
Dim re, content, FSO, F, aspstart, aspend
Set FSO = Createobject ("scripting. FileSystemObject ")
Set F = FSO. opentextfile (server. mappath (filename ))
Content = f. readall
F. Close
Set F = nothing
Set FSO = nothing

Set Re = new Regexp
Re. pattern = "^ \ s * ="
Aspend = 1
Aspstart = instr (aspend, content, "<%") + 2
Do While aspstart> aspend + 1
Response. Write mid (content, aspend, aspStart-aspEnd-2)
Aspend = instr (aspstart, content, "% \>") + 2
Execute (Re. Replace (mid (content, aspstart, aspEnd-aspStart-2), "response. Write "))
Aspstart = instr (aspend, content, "<%") + 2
Loop
Response. Write mid (content, aspend)
Set Re = nothing
End Function

Example:

Include ("youinc. asp ")