Subversion Repositories DevTools

Rev

Rev 13 | Blame | Compare with Previous | Last modification | View Log | RSS feed 

<%
'===================================================================
'                                                       Form Window Common
'===================================================================
%>
<!--#include file="../class/classValidationControl.asp"-->
<!--#include file="../class/classPopupMenuControl.asp"-->
<!--#include file="../controls/ERGFormComponent/classFormComponent.asp"-->
<%
'------------ VARIABLE DEFINITION -------------
Dim objForm
Dim objFormCollector
Dim objFormComponent
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------
Set objPMod = New PersistanceModule
Set objForm = New ValidationControl
Set objFormCollector = CreateObject("Scripting.Dictionary")
Set objFormComponent = New FormComponent
'------------ CONDITIONS ----------------------
'----------------------------------------------
%>
<%
'------------ RUN BEFORE PAGE RENDER ----------
objPMod.PersistInQryString ( aPersistList )
'----------------------------------------------
%>
<%
'-----------------------------------------------------------------------------------------------------------------
'-----------------------------------------------------------------------------------------------------------------
%>