get_included_files в классическом ASP?

Question

Есть ли эквивалент PHP's get_included_files в классическом ASP?

Answer 1

Нет, нет.

Answer 2

Не так, но я смутно помню, как инструмент или два плавающих вокруг, что даст вам эквивалентный отчет. Возможно, это было в Code Project или где-то подобное ... это было долгое время с тех пор, как я натолкнулся на него.

Answer 3

Очень некрасиво функция для этого:

<!--#include file="include/common.asp"-->  

<% 
Function GetIncludedFiles() 
    Dim Url 
    Dim Fso 
    Dim Fs 
    Dim Src 
    Dim Arr 
    Dim Ret 
    Dim i 

    Set Fso = Server.CreateObject("Scripting.FileSystemObject") 

    ReDim Ret(-1) 

    Url = Request.ServerVariables("URL") 
    Set Fs = Fso.OpenTextFile(Server.MapPath(Url)) 

    Src = Fs.Readall() 

    Fs.Close 
    Set Fs = Nothing 
    Set Fso = Nothing 

    Arr = Split(Src, "<" & "!--#include file=") 

    For i = 0 To UBound(Arr) 
     Arr(i) = Left(Arr(i), InStr(Arr(i), "-->")) 
     Arr(i) = Replace(Arr(i), "-", "") 
     Arr(i) = Replace(Arr(i), "'", "") 
     Arr(i) = Trim(Replace(Arr(i), """", "")) 

     If Arr(i) <> "" Then 
      ReDim Preserve Ret(UBound(Ret) + 1) 
      Ret(UBound(Ret)) = Arr(i) 
     End If 
    Next 

    GetIncludedFiles = Ret 
End Function 

Dim File 

For Each File In GetIncludedFiles() 
    Response.Write File & "<br />" 
Next 
%> 

Answer 4

Простой способ заключается в создании основного файла в определенном каталоге (например, /include/mainfile.asp), а затем включить все остальные файлы в этой файл. Что-то вроде:

<!#include File="[your directory here/file1.asp]"--> 
<!#include File="[your directory here/file2.asp]"--> 
<!#include File="[your directory here/file3.asp]"--> 

Затем, Вы можете включить свой основной файл с помощью «виртуального» для остальной части ваших страниц, которые вы хотите получить доступ к тем, другие включенные файлы.

<!#include Virtual="/include/mainfile.asp"-->