Classic ASP BodyContainer Component

BodyContainer.asp

<%
Class BodyContainer
  Public Function Render
    Dim filename : filename = Server.MapPath("/components/BodyContainer/Template.html")
    Dim fso : Set fso = CreateObject("Scripting.FileSystemObject")
    Dim fs : Set fs = fso.OpenTextFile(filename, 1)
    If Not fs.AtEndOfStream Then Render = fs.ReadAll
    Set fs = Nothing
    Set fso = Nothing
  End Function
End Class
%>

Template.html

<h2>Body Container</h2>