📄 adinfo.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="adminset.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
response.End
end if
if session("flag")>2 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
if qx12<>1 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
%><html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.style1 {
color: #000000;
font-weight: bold;
}
-->
</style></head>
<body><div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/right_top2.gif">
<tr>
<td width="1%"> </td>
<td width="99%"><table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="30%" style="font-size:14px;color:#ffffff"> <span class="style1">信息管理</span></td>
<td width="70%" align="right"> </td>
</tr>
</table></td>
</tr>
</table>
<p> </p>
<form method="POST" action="delinfo.asp">
<br>
<div align="center">
<table width="90%" border="0" cellpadding="3" cellspacing="1" bgcolor="#9DB2D4">
<tr bgcolor="#C7D3E6">
<td height="23"> 最新信息主题</td>
<td height="23"><div align="center">发布人</div></td>
<td><div align="center">价格</div></td>
<td width="16%" align="center" bgcolor="#C7D3E6">发布时间</td>
<td width="9%" align="center">置顶</td>
<td align="center">推荐</td>
<td align="center">修改</td>
<td width="8%" align="center">删除</td>
</tr>
<%set rs=server.CreateObject("adodb.recordset")
set rs=conn.execute("select*from shop_infomsg ORDER BY id DESC")
page=request("page")
newpage=0
if page="" then page=1
do while newpage<page*31-31
newpage=newpage+1
rs.movenext
loop
do while not rs.eof
i=i+1%>
<tr bgcolor="#F0F3F8">
<td width="30%" height="23" bgcolor="#F0F3F8"> <a href="../Supply/show.asp?n=<%response.write rs(0)%>" target="_black">
<%response.write "[" & (rs(10)) & "]"%>
<%response.write rs(2)%>
</a>
<%if rs(16)<>false then%>
<font color="#FF0000">[推荐]</font>
<%end if%>
<%if rs(17)=0 then%>
<font color="#FF0000">[置顶]</font>
<%end if%></td>
<td width="15%" bgcolor="#F0F3F8"><div align="center">
<%response.write rs(11)%>
</div></td>
<td width="10%" height="23" bgcolor="#F0F3F8"><div align="center"><font color="#FF0000">
<%response.write rs(13)%>
元</font></div></td>
<td width="16%" align="center" bgcolor="#F0F3F8">
<%response.write rs(4)%> </td>
<td width="9%" align="center" bgcolor="#F0F3F8">
<a href="goodinfo.asp?lx=1&id=<%response.write rs(0)%>">
<%if rs("itop")=1 then%>
置顶
<%else%>
取消
<%end if%>
</a> </td>
<td width="6%" align="center" bgcolor="#F0F3F8"><a href="goodinfo.asp?lx=2&id=<%response.write rs(0)%>">
<%if rs("good")=true then%>
撤销
<%else%>
推荐
<%end if%>
</a></td>
<td width="6%" align="center" bgcolor="#F0F3F8"><a href="adinfo2.asp?id=<%=rs("id")%>">修改</a></td>
<td width="8%" align="center" bgcolor="#F0F3F8"> <input type="checkbox" name="de" value="<%response.write rs(0)%>"></td>
</tr>
<%if i=30 then exit do
rs.movenext
loop%>
</table>
<p>
<input type="submit" value="删除" name="B1" class="go-wenbenkuang">
<input type="reset" value="重选" name="B2" class="go-wenbenkuang">
</p>
<p> </div>
</form>
<p align="right">
<%if page=1 then %>
上一页
<%else%>
<a href="admsgd.asp?page=<%=page-1%>">上一页</a>
<%end if%>
<%if i=30 and not rs.eof then %>
<a href="admsgd.asp?page=<%=page+1%>">下一页</a>
<%else%>
下一页
<%end if%>
</div>
<div align="center">
<center>
<%rs.close
conn.close%>
</center>
</div> <br>
<!--#include file="copyright.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -