<% If GetRequest("view") = "print" Then Response.Write GetPrint(objDate) Else %>

Welcome to the HouseViewOnline Schedule...
checked<% End If %>>Small checked<% End If %>>Med checked<% End If %>>Large
<%= BuildDropDown(objDate,"month") %> <%= BuildDropDown(objDate,"year") %>
<% Response.Write BuildCalendar(objDate,GetRequest("size")) If GetRequest("view") = "yes" Then Response.Write "

" & BuildCalendar(CDate(GetRequest("date")),"view") End If %>

<% End If %>
<% Set objRS = Nothing Set objConn = Nothing Set objCommand = Nothing %>