asp-classic-unified-framework/core/autoload_core.asp

<!--#include file="../Core/helpers.asp"-->
<!--#include file="../Core/lib.ErrorHandler.asp"-->
<!--#include file="../Core/lib.ControllerRegistry.asp"-->
<!--#include file="../Core/lib.ControllerFactory.asp"-->
<!--#include file="../app/Controllers/autoload_controllers.asp"-->
<!--#include file="../Core/lib.DAL.asp"-->
<!--#include file="../Core/lib.Data.asp"-->
<!--#include file="../Core/lib.Migrations.asp"-->
<% Dim router : Set router = GetObject("script:"& Server.MapPath("../Core/router.wsc") & "") %>
<!--#include file="../Core/lib.collections.asp"-->
<!--#include file="../Core/lib.HTML.asp"-->
<!--#include file="../Core/lib.Routes.asp"-->
<!--#include file="../Core/lib.Flash.asp"-->
<!--#include file="../Core/lib.FormCache.asp"-->
<!--#include file="../Core/lib.HTML.Security.asp"-->
<!--#include file="../Core/lib.AutoMapper.asp"-->
<!--#include file="../Core/lib.CDOEmail.asp"-->
<!--#include file="../Core/lib.Upload.asp"-->
<!--#include file="../Core/lib.json.asp"-->
<!--#include file="../Core/lib.helpers.asp"-->
<!--#include file="../Core/lib.crypto.helper.asp"-->
<!--#include file="../Core/lib.Enumerable.asp"-->
<!--#include file="../Core/lib.ad.auth.asp"-->
<!--#include file="../Core/databaseConnection.asp"-->
<%
' Response cache headers (moved from mvc.asp - now that MVC is a Windows
' Script Component it cannot hold loose top-level ASP statements like this).
Dim cacheYear : cacheYear = GetAppSetting("CacheExpirationYear")
If cacheYear = "nothing" Then cacheYear = "2030"
Response.ExpiresAbsolute = "01/01/" & cacheYear
Response.AddHeader "pragma", "no-cache"
Response.AddHeader "cache-control", "private, no-cache, must-revalidate"

' MVC dispatcher (Windows Script Component). It runs in its own isolated
' script engine, so its dependencies are injected explicitly here rather
' than it reaching into this page's globals itself - see AGENTS.md
' section 69/70 ("Dependencies Must Be Injected").
Dim MVC_Instance
Set MVC_Instance = GetObject("script:" & Server.MapPath("../Core/mvc.wsc") & "")
Set MVC_Instance.Router = router
Set MVC_Instance.ControllerRegistry = ControllerRegistry()
Set MVC_Instance.ControllerFactory = ControllerFactory()
Set MVC_Instance.Routes = Routes()

Function MVC()
    Set MVC = MVC_Instance
End Function
%>