Få udskrevet alle oplysninger i tabellen

Jeg har en tabel med følgende kolonner:

BrugerID  SkoleKom-navn  Brugertype  Klasse

Brugeren logger sig ind via en form og login.asp, som ser sådan ud

<%
'asp herfra------------------------

  ' bruges til at tjekke om brugeren finde i db ved login
' Sender resultaterne fra tilføj links til databasen

strBrugerID = Trim(Replace(Request.Form("BrugerID"),"'",""))
strSQL ="SELECT * FROM bhklasse WHERE UCase(BrugerID) = '" & UCase(strBrugerID) & "'"
set rs = Conn.execute(strSQL)
if not rs.EOF then
response.write rs("BrugerID")

end if
'først tjekke om brugeren findes ved at tjekke om recordsetet er tomt.
if not rs.EOF then
  if LCase(rs("BrugerID")) = LCase(strBrugerID) then
    'LOGIN OK
    session("BrugerID") = rs("BrugerID")
   

  Response.Redirect("elevside.asp")
  else
    'INGEN BRUGER FUNDET
    'Eller en blev fundet men databasen bruger navn passer ikke med det
    'indtastede brugernavn
  end if
else
'brugeren ikke fundet lave det som skal ske hvis brugeren ikke er fundet her
response.write "<p align=center><font color=black  face=verdana size=3><b>Forkert brugernavn eller password.<br> Prøv igen.</b></p><br>"
end if
Conn.Close
Set Conn = Nothing
%>

Hvis brugeren godkendes, bliver han altså dirigeret til elevside.asp. Her vil jeg gerne have udskrevet alle de oplysninger om brugeren, som står i tabellen. Jeg kan godt få udskrevet BrugerID ved hjælp af Session("BrugerID"), men hvordan får jeg udskrevet SkoleKom-navn, Brugertype og Klasse?