<% Function FormatDate(dteDate) 'Version 1.0 If IsDate(dteDate) = True Then DIM dteDay, dteMonth, dteYear dteDay = Day(dteDate) dteMonth = Month(dteDate) dteYear = Year(dteDate) FormatDate = Right(Cstr(dteDay + 100),2) & _ "/" & Right(Cstr(dteMonth + 100),2) & _ "/" & dteYear Else FormatDate = Null End If End Function %> Admin page

 

 

 

 

 

LOGIN

 

 

 

 

 

ADMIN MAIN EDIT

ADMIN REVIEW EDIT