⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 jg.asp

📁 实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下:管理员通过登录该系统
💻 ASP
字号:
<%dbdns="../../"%>
<!--#include file="../../inc/conn.asp"-->
<!--#include file="../cook.asp"-->
<%if fla16<>1 then
response.write "<script>alert('操作权限出错,您没有权限操作些功能');history.go(-1);</Script>"
Response.End 
end if%>
<%if request("Submit")="删 除" then
id=replace(request("id")," ","")
id=split(id,",")
for i=0 to UBound(id)
conn.execute("delete from SMSJ_jg where id=" & id(i))
next
elseif request("Submit")="审 核" then
id=replace(request("id")," ","")
id=split(id,",")
for i=0 to UBound(id)
conn.execute("update SMSJ_jg set sh=1 where id="&id(i))
next
end if
if request("action")="del" then

Response.write("<script>alert(""免费版未提供这一功能!"");location.href=""jg.asp"";</script>")
Response.end
end if
if request("action")="sh" then 

Response.write("<script>alert(""免费版未提供这一功能!"");location.href=""jg.asp"";</script>")
Response.end
end if
if request("action")="sh1" then 
conn.execute("update SMSJ_jg set sh=0  where id = ("&request("id")&")")
Response.write("<script>alert(""信息已被锁定!"");location.href=""jg.asp"";</script>")
Response.end
end if
if request("action")="tj" then 
conn.execute("update SMSJ_jg set tj=1  where id = ("&request("id")&")")
Response.write("<script>alert(""信息推荐成功!"");location.href=""jg.asp"";</script>")
Response.end
end if
if request("action")="tj1" then 
conn.execute("update SMSJ_jg set tj=0  where id = ("&request("id")&")")
Response.write("<script>alert(""信息已被取消推荐!"");location.href=""jg.asp"";</script>")
Response.end
end if
%>
<script>
function CheckAll(form)  {
  for (var i=0;i<form.elements.length;i++)    {
    var e = form.elements[i];
    if (e.name != 'chkall')       e.checked = form.chkall.checked; 
   }
  }
</script>
<script>
function oa_tool1(){
window.parent.mm.rows="200,10,*";
}
</script>
<%=citycss%>
<body style="margin:5">
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
<form name="form1" method="post" action="job.asp">
<tr align=center bgcolor=#efefef><td height=25 align=center><input type="text" name="word">  <input type="submit" name="Submit" value="价格搜索">
<a href=?>全部</a> <a href=?sh=0>待审</a> <a href=?sh=1>已审</a> <a href=?tj=1>推荐</a></td></tr>
</form>
</table>

<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
<form name="from1" method="post" action="job.asp?word=<%=request("word")%>&zc=<%=request("zc")%>&key1=<%=request("key1")%>&key3=<%=request("key3")%>&close=<%=request("close")%>&gq=<%=request("gq")%>&cq=<%=request("cq")%>">
<tr align=center bgcolor=#efefef>
<%
if request("word")<>"" then
sql="select * from SMSJ_jg where tit like'%"&request("word")&"%' order by tj desc,id desc"
elseif request("sh")<>"" then
sql="select * from SMSJ_jg where sh="&request("sh")&" order by tj desc,id desc"
elseif request("tj")<>"" then
sql="select * from SMSJ_jg where tj=1 order by id desc"
else
sql="select * from SMSJ_jg order by tj desc,id desc"
end if


set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1                     
if rs.eof and rs.bof then                     
	response.write "暂无内容"
else  
'分页的实现 
listnum=24
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum
i=0
nn=request("page")
if nn="" then
n=0
else
nn=nn-1
n=listnum*nn
end if%>
 <td width="4%" height=22>编号</td>
 <td width=*>名称</td>
 <td width="16%">规格</td>
 <td width="10%">添加时间</td>
 <td width="10%">价格</td>
 <td width="5%">状态</td>
 <td width="5%">推荐</td>
 <td width="5%">删除</td>
</tr>
<%do while not rs.eof and i<listnum
n=n+1%>
<tr align=center height=22>
 <td><%=n%></td>
 <td align=left>&nbsp; <%=rs("tit")%></td>
 <td><%=rs("gg")%></td>
 <td><%=rs("time")%></td>
 <td><%=rs("jg")%></td>
 <td><% if rs("sh")<>"1" then%>
          <a href='?action=sh&id=<% =rs("id")%>' onClick="{if(confirm('确定审核此信息吗?')){return true;}return false;}"><font color="#428EFF">未审</font></a>
          <%else%>
         <a href='?action=sh1&id=<% =rs("id")%>' onClick="{if(confirm('确定取消审核吗?')){return true;}return false;}"><font color="#ff0000">已审</font></a>
          <%end if%></td>
 <td><%if rs("tj")<>1 then%>
          <a href='?action=tj&id=<% = rs("id")%>' onClick="{if(confirm('确定把此信息设为推荐吗?')){return true;}return false;}"><font color="#428EFF">否</font></a>
          <%else%>
         <a href='?action=tj1&id=<% = rs("id")%>' onClick="{if(confirm('确定取消对此信息的推荐吗?')){return true;}return false;}"><font color="#ff0000">是</font></a>
          <%end if%></td>
 <td><a href='?action=del&id=<% =rs("id")%>' onClick="{if(confirm('确定删除此信息吗?')){return true;}return false;}"><font color="#428EFF">删除</font></a></td>
</tr>
<%rs.movenext 
i=i+1 
j=j-1
loop%>
<tr>
<%filename="job.asp?word="&request("word")&"&zc="&request("zc")&"&key1="&request("key1")&"&key3="&request("key3")&"&close="&request("close")&"&gq="&request("gq")&"&cq="&request("cq")&""%>
<td colspan=8 align=right bgcolor=#cccccc><%=Rs.recordcount%> 条招聘&nbsp;&nbsp;<%=listnum%> 条招聘/页&nbsp;&nbsp;共 <%=Rs.pagecount%> 页 
      <% if page=1 then %>
      <%else%>
      <a href=<%=filename%>><strong>|<<</strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>><strong><<</strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>><b>[<%=page-1%>]</b></a>&nbsp; 
      <%end if%>
<% if Rs.pagecount=1 then %>
<%else%>
	  <b>[<%=page%>]</b>
<%end if%>
	  <% if Rs.pagecount-page <> 0 then %>
      <a href=<%=filename%>&page=<%=page+1%>><b>[<%=page+1%>]</b></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page+1%>><strong>>></strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=Rs.pagecount%>><strong>>>|</strong></a>&nbsp; 
	  <%end if%> &nbsp;&nbsp;</td>
<%end if%></tr>
</form>
</table>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -