<% 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)%>
<% SQL = "SELECT * FROM tblInstructors WHERE ID = '" & Trim(Request("ID")) & "' " Set rs = Server.CreateObject("ADODB.Recordset") rs.open sql, conn, 3, 3 varID = Trim(rs("ID")) varFirstName = Trim(rs("FirstName")) varLastName = Trim(rs("LastName")) varTitle = Trim(rs("Title")) varDan = Trim(rs("Dan")) varGup = Trim(rs("Gup")) varBio = Trim(rs("Bio")) %> Instructors - Edit Instructor

First Name
Last Name
Title
Dan
Gup
Bio