zizhong.wang
/
xuanjuAsp


			
				
					
						
						
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217
							<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>网站后台管理登陆</title>
<meta name="Keywords" content="网站后台管理系统，网站内容管理系统，asp网站后台管理系统，西安网站建设，

西安网络公司"  />

<meta name="web designner" content="">
<link rel="stylesheet" type="text/css" href="../bdcommx/css.css">
<style type="text/css">
<!--
.style1 {color: #0000FF}
-->
</style>
</head>
<!--#include file="../bdcommx/connxyz.asp"-->
<!--#include file="../bdcommx/jsall.asp"-->
<%
call log_chk()
%>
<body>
<script language="javascript">
function CheckAll(form)
  {
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.name != 'selectall')
       e.checked = form.selectall.checked;
    }
  }
</script>
<table width="100%" height="42" border="0" cellpadding="0" cellspacing="0"><tr>
        <td width="18" height="42" align="center" background="../images/top_bg2.jpg"><img src="../images/dian.gif" width="10" height="10" /></td>
        <td background="../images/top_bg2.jpg" class="hui12">后台管理：&gt;&gt; 产品管理  &gt;&gt; <%=request("Bname")%>
          <%if request("Sname")<>"" then%>
&gt;&gt; <%=request("Sname")%>
 <%end if%></td>
      </tr>
</table>
      <br />
      <table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" class="tab_bdr">

  <form name="formSearch" method="post" action="Pmag.asp?Bid=<%=request("Bid")%>&Sid=<%=request("Sid")%>&Bname=<%=request("Bname")%>&Sname=<%=request("Sname")%>"><tr>
    <td height="36" align="center" nowrap class="NcB_bg">产品搜索：关键字：
      <input name="Keyword" type="text" id="Keyword" size="18" />
      <input name="submitSearch" type="submit" class="button" value="搜索" /></td>
  </tr></form>
</table>
      <br />
      <table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" class="tab_bdr">
        <form name="myform" method="post" action="Pdel.asp">
          <tr>
            <td height="33" colspan="9" align="center" background="../images/bg2.jpg"><strong>产&nbsp; 品&nbsp; 管&nbsp; 理 </strong></td>
          </tr>
          <tr>
		  <td width="6%" align="center" class="NcB_bg"><strong>编号</strong></td>
            <td width="5%" align="center" class="NcB_bg"><strong>发布</strong></td>
            
            <td width="44%" height="26" align="center" class="NcB_bg"><strong>产品标题</strong></td>
            <td width="11%" align="center" class="NcB_bg"><strong>设置推荐</strong></td>
            <td width="10%" align="center" class="NcB_bg"><strong>发布日期</strong></td>
            <td width="8%" align="center" class="NcB_bg"><strong>点击数</strong></td>
            <td width="5%" align="center" class="NcB_bg"><strong>排序</strong></td>
            <td width="7%" align="center" class="NcB_bg"><strong>修改</strong></td>
            <td width="4%" align="center" class="NcB_bg"><strong>删除</strong></td>
          </tr>
          <%
dim Keyword,CurrentPage,TotalPages,Bid,Sid
MaxPerPage=30
Keyword=request("Keyword")
Bid=request("Bid")
Sid=request("Sid")
Bname=request("Bname")
Sname=request("Sname")
Set rs1= Server.CreateObject ("ADODB.RecordSet")
'--------------------------------------------------此乃呵呵
if Keyword="" then
		if Sid="" then
		sql="select * from bdcp where cb_id="&Bid&" order by cxp_order asc"
		else
		sql="select * from bdcp where cb_id="&Bid&" and cs_id="&Sid&" order by cxp_order asc"
		end if
end if
	
if Keyword<>"" then
		if Sid="" then
		sql="select * from bdcp where (cxp_name like '%"&Keyword&"%') and cb_id="&Bid&"  order by cxp_order asc"
		else
		sql="select * from bdcp where (cxp_name like '%"&Keyword&"%') and cb_id="&Bid&" and cs_id="&Sid&" order by cxp_order asc"
		end if
end if
'--------------------------------------------------此乃呵呵
rs1.open sql,conn,1,3
if rs1.eof then
response.Write("<tr><td></td><td></td><td height=30 class='Fnt_red'>暂无信息！</td><td></td><td></td><td></td><td></td><td></td></tr>")
Tlock=1
else
rs1.pagesize=MaxPerPage'定义每页记录数
'howmanyfields=rs.Fields.Count-1
If trim(Request("Page"))<>"" then
CurrentPage= CLng(request("Page"))
If CurrentPage> rs1.PageCount then
CurrentPage = rs1.PageCount
End If
Else
CurrentPage= 1
End If
totalPut=rs1.recordcount 
if CurrentPage<>1 then
if (currentPage-1)*MaxPerPage < totalPut then
rs1.move(currentPage-1)*MaxPerPage
end if
end if%>
          <input name="Keyword" type="hidden" id="mykey" value="<%=Keyword%>" />
          <input name="Bid" type="hidden" value="<%=Bid%>"/>
          <input name="Sid" type="hidden" value="<%=Sid%>"/>
          <input name="Bname" type="hidden"  value="<%=Bname%>"/>
          <input name="Sname" type="hidden" value="<%=Sname%>"/>
          <%do while not rs1.eof and mynum<30%>
          <tr>
		              <td height="26" align="center" class="NcB_bg"><%=rs1("cxp_id")%></td>
            <td height="26" align="center" class="NcB_bg"><%if rs1("cxp_stop")=1 then%>
                <a href="pstop.asp?thex=<%=rs1("cxp_id")%>&act=stop&Bid=<%=Bid%>&Sid=<%=Sid%>&Keyword=<%=Keyword%>" class="redlink">√</a>
                <%else%>
                <a href="pstop.asp?thex=<%=rs1("cxp_id")%>&act=rstop&Bid=<%=Bid%>&Sid=<%=Sid%>&Keyword=<%=Keyword%>" class="redlink">×</a>
                <%end if%></td>

            <td height="26" class="NcB_bg"><%=left(rs1("cxp_name"),25)%></td>
            <td height="26" align="center" class="NcB_bg">
                <%if rs1("cxp_tj")=1 then%>
                <a href="ptj.asp?thex=<%=rs1("cxp_id")%>&act=stop&Bid=<%=Bid%>&Sid=<%=Sid%>&Keyword=<%=Keyword%>" class="redlink"><span class="Fnt_red">[已推荐]</span></a>
				<%else%>
				<a href="ptj.asp?thex=<%=rs1("cxp_id")%>&act=rstop&Bid=<%=Bid%>&Sid=<%=Sid%>&Keyword=<%=Keyword%>" class="redlink"><span class="Fnt_red">[未推荐]</span></a>
                <%end if%></td>
            <td align="center" class="NcB_bg"><%=rs1("cxp_time")%></td>
            <td align="center" class="NcB_bg"><%=rs1("cxp_click")%></td>
            <td align="center" class="NcB_bg"><%=rs1("cxp_order")%></td>
            <td align="center" class="NcB_bg"><a href="Pmod.asp?thex=<%=rs1("cxp_id")%>&Bname=<%=Bname%>&Sname=<%=Sname%>"><font color="#009999">[修改]</font></a></td>
            <td align="center" class="NcB_bg"><!--<input type="hidden" name="Fname" value="<%'=rs1("Fileurl")%>"/>-->
                <input name="idgroup" type="checkbox" id="idgroup" value="<%=rs1("cxp_id")%>" /></td>
          </tr>
          <%mynum=mynum+1
rs1.movenext 
loop 
rs1.close 
set rs1=nothing
end if 
%>
          <tr>
            <td height="34" colspan="7" align="center" bgcolor="#FAFAFA" class="NcB_bg"><strong>把选择的产品转移至：</strong><%=npdclassY(1)%>
                <input type="submit" name="Submit" value="转移所选信息" onclick="document.myform.action='Pdatechg.asp';document.myform.submit();"  <%if Tlock=1 then%>onmouseover="Btn_lock();"<%end if%>/>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <input type="submit" name="Submit22" value="删除所选信息" onclick="return DelNews();"  <%if Tlock=1 then%>onmouseover="Btn_lock();"<%end if%>/></td>
            <td colspan="2" align="center" bgcolor="#FAFAFA" class="NcB_bg"><strong>全选</strong>              <input name="selectall" type="checkbox" id="selectall" value="on" onclick="CheckAll(this.form)" /></td>
          </tr>
        </form>
      </table>
      <table width="95%" height="32"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="32" class="hui12">&nbsp;</td>
        </tr>
      </table>
      <table width="95%" height="2"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="2" background="../images/left_bg.jpg"></td>
        </tr>
      </table>
      <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<form name="formgo" method="post" action="">
          <tr>
            <td height="43" align="center">
			<input name="Keyword" type="hidden" id="mykey" value="<%=Keyword%>" />
<input name="Bid" type="hidden" value="<%=Bid%>"/>
<input name="Sid" type="hidden" value="<%=Sid%>"/>
<input name="Bname" type="hidden"  value="<%=Bname%>"/>
<input name="Sname" type="hidden" value="<%=Sname%>"/><%
'------------------------------------------------------页面跳转
dim n,k
if (totalPut mod MaxPerPage)=0 then  'n表示总页数
n= totalPut \ MaxPerPage
else
n= totalPut \ MaxPerPage + 1
end if
k=currentPage
k=currentPage
if k<>1 then
response.write "["+"<a href=?page=1&Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"&Bname="&Bname&"&Sname="&Sname&">第一页</a></b>] "
response.write "["+"<a href=?page="+cstr(k-1)+"&Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"&Bname="&Bname&"&Sname="&Sname&">上一页</a>] "
else
Response.Write "[第一页] [上一页]"
end if
if k<>n then
response.write "["+"<a href=?page="+cstr(k+1)+"&Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"&Bname="&Bname&"&Sname="&Sname&">下一页</a>] "
response.write "["+"<a href=?page="+cstr(n)+"&Keyword="&Keyword&"&Bid="&Bid&"&Sid="&Sid&"&Bname="&Bname&"&Sname="&Sname&">最后一页</a>] "
else
Response.Write "[下一页] [最后一页]"
end if
'------------------------------------------------------页面跳转msmsms有点小毛病！就是转页没有连带搜索和类别
response.Write("<font color='red'> | </font>共"&n&"页 / "&totalPut&"条产品 / ")
response.Write("当前第"&k&"页")
response.Write(" <select name='page'>")
for myi=1 to n
response.Write("<option value='"&myi&"'>"&myi&"</option>")
next
response.Write("</select>")
response.Write(" <input type=submit name=Submit4 value=跳到 />")%></td>
          </tr>
</form>
</table>
<br />
<br />
</body>
</html>