<% Set conn = Server.CreateObject("ADODB.Connection") conn.open "umacus","","" Set Session("umacus_conn") = conn %> <% IF Session("UserLoggedIn") <> "True" then response.Redirect "default.php" End If %> Control Panel
Currently Logged In as:
<%=Session("UserFirstName") & " " & Session("UserLastName")%>
Access Level: <%=Session("AccessLevel")%>

Today Is:
<%=FormatDateTime(Date, 1)%>
Calendar - Edit Event

Date    
Title
Description