Ограничено <!#Includefile = "filename.asp"-> макрос
Файл должен существовать и будет предварительно скомпилирован (независимо от того, предшествовали ли условия)
Часто есть такие требования, включая различные файлы в соответствии с различными требованиями
Если настройки каждого человека различны, это необходимо для динамического включения файлов.
Код заключается в следующем:
FunctionInclude (имя файла)
Dimre, Content, FSO, F, Aspstart, Aspend
setfso = createObject ("scripting.filesystemobject")
setf = fso.opentextfile (server.mappath (filename))
Контент = F.Readall
F.Close
setf = ничего
setfso = ничего
setre = newRegexp
re.pattern = "^/s*="
Append = 1
aspstart = instr (aspend, content, "<%")+2
DowhileasPstart> Aspend+1
Response.writemid (Содержание, Аспенд, Aspstart-Aspend-2)
aspend = instr (aspstart, content, "%/>")+2
Execute (re.replace (Mid (Content, Aspstart, Aspend-ASPStart-2), "response.write")))
aspstart = instr (aspend, content, "<%")+2
петля
Response.writemid (контент, аспект)
setre = ничего
Конечная функция
Пример использования:
include ("youinc.asp")