<!--#include file="chkpass.asp" -->
<!-- #Include File=Conn.asp -->
<!-- #Include File=setup.asp -->
<!-- #Include File=inc/prompt.inc -->
<!-- #Include File=top2.asp -->
<%
dim rs,sql
Set rs= Server.CreateObject ("ADODB.RecordSet")
sql = "select * from linktype"
rs.open sql, conn,1,3


'----------------------------------空记录
if not rs.eof then
rs.MoveFirst  
state="武宁之窗友情链接
call top2()
%>
<p align="center"><b>武宁之窗友情链接分类管理</b></p>
<table border=1 cellpadding=0 cellspacing=0 width=500 align="center" bordercolor="#0099cc">
  <tr align="center"> 
    <td class=td height=15 width=59><font
color=#ff0000>序号</font></td>
    <td class=td height=20 width=183>
      <div align="center"><font
color=#ff0000>分类</font></div>
    </td>
    <td class=td height=15 width=76><font color="#FF0000">编辑分类</font></td>
    <td class=td height=15 width=78><font
color=#ff0000>删除</font></td>
  </tr>
  <%
do while not rs.eof
Response.Write "<TR>"
response.write "<td class=td1 align='center'>"&rs("typeid")&" <img  border=0 src=image/nav.gif></td>"
response.write "<td class=td2 align='center'><a href=ad_changetype.asp?action=type&typeid="&rs("typeid")&" >" &rs("type")& "</a></td>"
response.write "<td class=td1 align='center'><a href=ad_changetype.asp?action=type&typeid="&rs("typeid")&" ><img  border=0 src=image/edit.gif></a></td>"
response.write "<td class=td1 align='center'><a href=ad_operate.asp?action=deltype&typeid="&rs("typeid")&" ><img  border=0 src=image/del.gif></a></td>"

Response.Write "</TR>"
rs.movenext
loop

Rs.Close
Conn.Close
Set Rs=Nothing
Set Conn=Nothing

%> 
</table>
<table border=0 cellpadding=0 cellspacing=0 width=500 align="center" bordercolor="0">
  <tr align="center"> 
    <td >
      <div align="left"> 
        <p>1.点击分类名称更改类型名。<br>
          <br>
          4.删除分类将连同此栏目下内容一同删除,删除后不可恢复。 </p>
      </div>
    </td>
  </tr>
  
</table>

<% end if %>
<br>
<br>
<form method="post" action="ad_operate.asp">
  <table border=1 cellpadding=0 cellspacing=0 width=500 align="center" bordercolor="#0099cc">
    <tr align="center" valign="middle"> 
      <td class=td2  height=15 width=154>添加新类别</td>
      <td class=td2  height=15 width=340> 
        <input type="hidden" name="action" value="add">
        <input type="text" name="newtype" maxlength="20" size="20">
        <input type="submit" name="Submit" value="添加">
      </td>
    </tr>
    
  </table>
  </form>
<p align="center">　</p>
</html>
<!-- #Include File=foot.inc -->