D E P T A L L I E S  |
<%=request("dept")%> Department
<%
SQL = "sp_getAllAllies"
dbstart
cmd.Parameters.Append cmd.CreateParameter("@deptname", adVarChar, adParamInput, 40, Mid(request("dept"), 1, 40))
set RS = cmd.execute
i = 1
if RS.EOF then
response.write "This department currently has no allies."
end if
do while not RS.EOF
ClanID = RS("ClanID")
ClanName = RS("ClanName")
ClanLogo = RS("ClanLogo")
ClanDescription = RS("ClanDesc")
ClanURL = RS("ClanURL")
%>
 |
| |
|
| Clan: |
|
<%=ClanName%> |
| Website: |
|
<%=ClanURL%> |
| Description: |
|
<%=ClanDesc%> |
<%
i = i + 1
RS.movenext
loop
dbclose
%>