Restrito por <!#Incluirfile = "filename.asp"-> macro
O arquivo deve existir e será pré -compilado (independentemente de as condições terem sido precedidas)
Geralmente, existem esses requisitos, incluindo diferentes arquivos de acordo com requisitos diferentes
Se as configurações de cada indivíduo forem diferentes, é necessário incluir dinamicamente arquivos.
O código é o seguinte:
Functioninclude (nome do arquivo)
Dimre, Content, FSO, F, Aspstart, Aspend
setfso = createObject ("script.filesystemoBject")
setf = fso.opentExtFile (Server.mappath (nome do arquivo))
content = f.readall
F.Close
setf = nada
setfso = nada
setre = newRegexp
re.pattern = "^/s*="
aspend = 1
aspstart = instrum (aspend, conteúdo, "<%")+2
Dowhileaspstart> Aspend+1
Response.Writemid (Conteúdo, Aspend, Aspstart-aspend-2)
aspend = Instr (Aspstart, conteúdo, "%/>")+2
Execute (re.Replace (MID (Content, Aspstart, Aspend-aspstart-2), "Response.Write")))
aspstart = instrum (aspend, conteúdo, "<%")+2
laço
Response.Writemid (Conteúdo, Aspend)
setre = nada
Função final
Exemplo de uso:
incluir ("youinc.asp")