b2b_wordlinks.asp

小型网上购物网站

<!--#include file="conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
if session("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
else
if request.cookies("Buy2Buy")("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
end if
end if
'所有无权限
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('您的管理权限未达到此操作等级!');history.go(-1);</script>"
response.End
end if
%>
<style type="text/css">
<!--
.STYLE1 {color: #000000;
	font-weight: bold;
}
.style4 {color: #FF0000}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
  <tr> 
    <td background="images/topbg.gif"><span class="STYLE1"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是： <a href="adminhelp.asp">管理首页</a> -&gt; <span class="style4">友情链接管理</span></span></td>
  </tr>
  <tr> 
    <td height="99" valign="top" bgcolor="#FFFFFF"><br> 
      <%set rs=server.CreateObject("adodb.recordset")
		rs.open "select * from links order by linkorder",conn,1,1
		dim i
		i=rs.recordcount%>
      <table width="80%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
        <tr height="20" bgcolor="#F7F7F7" align="center"> 
          <td width="26%" height="25" background="images/topbg.gif"><strong>网站名称</strong></td>
          <td width="42%" height="25" background="images/topbg.gif"><strong>网站地址</strong></td>
          <td width="9%" height="25" background="images/topbg.gif"><strong>排 序</strong></td>
          <td width="23%" height="25" background="images/topbg.gif"><strong>操 作</strong></td>
        </tr>
        <%if rs.eof and rs.bof then
		  response.write "还没有数据，请添加！"
		  else
		  do while not rs.eof%>
        <tr height="35" bgcolor="#FFFFFF" align="center"> 
          <form name="form1" method="post" action="b2b_saveweblinks.asp?action=edit&id=<%=rs("linkid")%>">
            <td height="25"><input name="linkname" type="text" class="input_sr" id="linkname" value="<%=trim(rs("linkname"))%>" size="20"></td>
            <td height="25"><input name="linkurl" type="text" class="input_sr" id="linkurl" value="<%=trim(rs("linkurl"))%>" size="36"></td>
            <td height="25"><input name="linkorder" type="text" class="input_sr" id="linkorder" value=<%=rs("linkorder")%> size="3"></td>
            <td height="25"><input name="Submit" type="submit" class="input_bot" value="修 改">
                &nbsp;&nbsp;<a href=b2b_saveweblinks.asp?action=del&id=<%=rs("linkid")%>><font color="#FF6600">删除</font></a>            </td>
          </form>
        </tr>
        <%rs.movenext
		  loop
		  end if
		  rs.close
		  set rs=nothing%>
      </table></td>
  </tr>
</table>
<br>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
  <tr> 
    <td background="images/topbg.gif"><span class="STYLE1"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是： <a href="adminhelp.asp">管理首页</a> -&gt; <span class="style4">友情链接添加</span></span></td>
  </tr>
  <tr> 
    <form name="form2" method="post" action="b2b_saveweblinks.asp?action=add">
      <td height="98" bgcolor="#FFFFFF"> 
	  <table width="80%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
          <tr height="20" bgcolor="#F7F7F7" align="center"> 
            <td height="25" background="images/topbg.gif"><strong>网站名称</strong></td>
            <td height="25" background="images/topbg.gif"><strong>网站地址</strong></td>
            <td height="25" background="images/topbg.gif"><strong> 排 序</strong></td>
            <td height="25" background="images/topbg.gif"><strong>操 作</strong></td>
          </tr>
          <tr height="20" bgcolor="#FFFFFF" align="center"> 
            <td height="25"><input name="linkname1" type="text" class="input_sr" id="linkname12" size="20"></td>
            <td height="25"><input name="linkurl1" type="text" class="input_sr" id="linkurl12" size="36"></td>
            <td height="25"><input name="linkorder1" type="text" class="input_sr" id="linkorder12" value=<%=i+1%> size="3"></td>
            <td height="25"><input name="Submit2" type="submit" class="input_bot" value="添 加"></td>
          </tr>
        </table></td>
    </form>
  </tr>
</table>