admin_friendsitemana.asp

庐江二中

<%PageName="admin_FriendSiteMana"%>
<!--#include file="session.asp"-->
<%checkAdmin2%>
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<!--#include file="top.asp"--><br>
<table border="1" width="90%" cellspacing="0" cellpadding="1" bgcolor="<%=MainBgColor%>">
<tr>
<td align=center valign=top>
<%

sql="select * from FriendSite order by id desc"
rs.open sql,conn,1,1
%>
<table border="1" width="100%" cellspacing="0" cellpadding="0" Class="TableLine" bordercolorlight="<%=MainBColor%>" bgcolor="<%=MainCColor%>">
<form method="POST" action="admin_FriendSiteSave.asp?act=set">
<tr>
<td width="100%" height="20" colspan=10 bgcolor="<%=MainTColor%>" align=center background="images/admin/b3.gif"><b>友 情 站 点 管 理</b></td>
</tr>
<tr>
<td width="5%" align="center">选择</td>
<td width="5%" align="center">ID</td>
<td width="10%" align="center">站名</td>
<td width="10%" align="center">地址</td>
<td width="10%" align="center">简介</td>
<td width="20%" align="center">网站Logo</td>
<td width="10%" align="center">站长</td>
<td width="5%" align="center">推荐</td>
<td width="5%" align="center">修改</td>
<td width="5%" align="center">删除</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td width="5%" align="center"><input type="checkbox" name="checked" value="<%=rs("ID")%>"<%if rs("IsOK")=true then%> checked<%end if%>></td>
<td width="5%" align="center"><%=rs("ID")%></td>
<td width="10%" align="center"><%=rs("SiteName")%></td>
<td width="10%" align=center><a href="<%=rs("SiteUrl")%>" target="_blank" title="<%=rs("SiteUrl")%>">网站地址</a></td>
<td width="10%" align=center><a style="cursor:hand" title="<%if rs("SiteIntro")="" or isnull(rs("SiteIntro")) then%>无<%else%><%=rs("SiteIntro")%><%end if%>">网站简介</td>
<td width="20%" align=center><%if not isNull(rs("LogoUrl")) then%><img src="<%=rs("LogoUrl")%>" width=88 height=31 border=0 alt="<%=rs("LogoUrl")%>"><%end if%></td>
<td width="10%" align="center"><%=rs("SiteAdmin")%></td>
<td width="5%" align="center"><input onclick="javascript:window.open('admin_FriendSiteSave.asp?act=SetIsGood&id=<%=rs("ID")%>','_self','')" type="button" value="<%if rs("IsGood")=true then%>取消<%else%>推荐<%end if%>" name="button1"></td>
<td width="5%" align="center"><input onclick="javascript:window.open('admin_FriendSiteModify.asp?id=<%=rs("ID")%>','_self','')" type="button" value="修改" name="button2"></td>
<td width="5%" align="center"><input onclick="javascript:window.open('admin_FriendSiteSave.asp?act=del&id=<%=rs("ID")%>','_self','')" type="button" value="删除" name="button3"></td>
</tr>
<%
rs.movenext
loop
rs.Close
%>
<tr>
<td colspan=10 align=center><input type="submit" value="选定" name="submit"> <input onclick="javascript:window.open('admin_FriendSiteAdd.asp','_self','')" type="button" value="添加新网站" name="button"></td>
</tr>
</form>
</table>
      <p>注：推荐网站请在此选定</p>
    </td>
</tr>
</table>

<%set rs=nothing%>