<% if request("submitted") = 1 then SQL = "sp_UpdateDept" dbstart cmd("@ID") = request("ID") cmd("@DeptName") = request("DeptName") cmd("@Description") = request("Description") cmd("@GifName") = request("Gifname") cmd("@ForumURL") = request("ForumURL") cmd.execute Response.Redirect "dept_admin.asp" end if %> <% SQL = "select * from Departments where ID = " & request("DeptID") dbstart_temp set RS = conn.execute(SQL) id = RS("id") DeptName = RS("DeptName") Gifname = RS("Gifname") Description = RS("Desc") ForumURL = RS("ForumURL") dbclose %>

    D E P T   A D M I N

Site Home Admin Home Dept Admin 

Department		Department Allies
Department Name:		 
Gif Name:		 
Dept Description:	<%=Description%>	Click here to view/edit the current Allies of this Dept
Forum URL:		Or
Dept Overseer:	<% SQL = "select * from MemberInfo where RankID = 2" dbstart_temp set RS = conn.execute(SQL) do while not RS.EOF Callsign = RS("Callsign") DeptID = RS("DepartmentID") %> selected<%end if%>><%=Callsign%> <% RS.movenext loop dbclose %>	Add a new Ally here
	&nbsp;
&nbsp;