<% SQL = "sp_selectsingleMember" dbstart cmd.Parameters.Append cmd.CreateParameter("ID", adInteger,adParamInput , , request("ID")) set RS = cmd.execute id = RS("id") UserName = RS("UserName") password = RS("password") CallSign = RS("CallSign") Rank = RS("RankID") RankName = RS("RankName") DateAdded = RS("DateAdded") Department = RS("DepartmentID") Division = RS("DivisionID") Name = RS("Name") Age = RS("Age") if Age = 0 then Age = "" end if Gender = RS("Gender") HomePage = RS("HomePage") Email = RS("Email") ICQ = RS("ICQ") if ICQ = -1 then ICQ = "unavailable" end if PicURL = RS("PicURL") GamingExperience = RS("GamingExperience") Comments = RS("Comments") AdminTeam = RS("AdminTeam") dbclose %>

M E M B E R   I N F O R M A T I O N

General Info   Callsign:     Added:   <%=DateAdded%>    MemID: <%=ID%>   Rank:   <% SQL = "sp_selectrank" dbstart set RS = cmd.Execute do while not RS.EOF Response.Write "" & RS("RankName") & "" RS.movenext loop Conn.close%>     Admin Team: >   Departments:   <% SQL = "sp_selectDepts" dbstart set RS = cmd.execute do while not RS.EOF %> " <%if Department = RS("ID") then%>selected<%end if%>><%=RS("DepartmentName")%> <% RS.movenext loop dbclose %>   Division:   <% SQL = "sp_selectDivision" dbstart set RS = cmd.execute do while not RS.EOF %> " <%if Division = RS("ID") then%>selected<%end if%>><%=RS("DivisionName")%> <% RS.movenext loop dbclose %>   Real Name:     Age:     Gender:   selected<%end if%>>Male selected<%end if%>>Female   Home Page:     E-mail:     ICQ Number:     UserName:     Password: