<% DIM sqlString DIM strLastName, strFirstName DIM strMajor, strYear DIM recID recID = Request.Form("StudentID") Response.Write recID strLastName = Request.Form("LastName") strFirstName = Request.Form("FirstName") strMajor = Request.Form("Major") strYear = Request.Form("Year") oConn.Open(sConnString) 'This opens the database. Set rConn = oConn.Execute("SELECT * FROM Table1 WHERE StudentID = '"& recID &"'") %>

Student ID:
Last Name:
First Name:

Major: <%=rConn.Fields("Major").Value%> ==> <% if rConn.Fields("Major").Value = "IT" Then %> IT <%else%> IT <%end if%> <% if rConn.Fields("Major").Value = "BS" Then %> BS <%else%> BS <%end if%> <% if rConn.Fields("Major").Value = "ED" Then %> ED <%else%> ED <%end if%> <% if rConn.Fields("Major").Value = "UD" Then %> UD <%else%> UD <%end if%>
Year: <%=rConn.Fields("Year").Value%> ==> <% if rConn.Fields("Year").Value = "Freshman" Then %> Freshman <%else%> Freshmen <%end if%> <% if rConn.Fields("Year").Value = "Sophmore" Then %> Sophomore <%else%> Sophomore <%end if%> <% if rConn.Fields("Year").Value = "Junior" Then %> Junior <%else%> Junior <%end if%> <% if rConn.Fields("Year").Value = "Senior" Then %> Senior <%else%> Senior <%end if%>

<%=rConn.Fields("StudentID").Value%>

<%=rConn.Fields("LastName").Value%>

<%=rConn.Fields("FirstName").Value%>

<%=rConn.Fields("Major").Value%>

<%=rConn.Fields("Year").Value%>

<% 'Destroy the connections oConn.Close set oConn = Nothing %>