<% Class HomeController_Class Public Title Public useLayout Private Sub Class_Initialize() Title = "PostcardMojo Logo Files" useLayout = False End Sub Public Sub Index() %> <% End Sub End Class Dim HomeController_Class__Singleton Function HomeController() If IsEmpty(HomeController_Class__Singleton) Then Set HomeController_Class__Singleton = New HomeController_Class End If Set HomeController = HomeController_Class__Singleton End Function %>