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

📄 manufacture.asp

📁 这是一本关于高级软件工程的书籍
💻 ASP
字号:
<!-- #include file="../inc/conn.asp" -->
<!-- #include file="../inc/function.asp" -->
<%
	if session("Sname") = "" then
%>
	<SCRIPT language="javascript">
	 
	 {
	   window.alert("您还没有登陆系统!");
	   window.location="default.asp";
	 }
	
	</SCRIPT>
<%
		response.end
	end if
%>
<html>
<head>
<title>订单处理流程</title>
<LINK href="../inc/newdef.css" rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor=#6696bc link=#000000 vlink=#000000 text=#000000 leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<!-- #include file="../inc/head.asp" -->
<hr>
<h3 align='center'>产品管理</h3> 
<form name ='country' action = 'manufacture.asp' method='post'>
  <div align='center'>
    <table width="632" border="0">
      <tr>
        <td><div align="right"><a href="manufacture_info_operateadd.asp">添加新商品</a></div></td>
      </tr>
    </table>
   <table width="632" border="1" align="center">
      <tr>
        <td>编号</td>
        <td><div align="center"> 产品编号 </div></td>
        <td><div align="center"> 产品名称 </div></td>
        <td><div align="center">产品单价</div></td>
        <td><div align="center">上架日期</div></td>
        <td> <div align="center">是否推荐</div></td>
        <td><div align="center"> 是否有效  </div></td>
        <td><div align="center">操作</div></td>
      </tr>
		<%
			sql = "SELECT id, pid, pname, price, ppic, remark, datetime, iscommend, isopen FROM goods order by id"
			rs.CursorType =3
			rs.open sql,conn,1,1 
			if not rs.eof then
				rs.PageSize=20'每页显示条数
				page=clng(Request("page"))
				if page<1 then page=1
				if page>rs.PageCount then page=rs.PageCount 
				rs.AbsolutePage=page
				
				for ipage=1 to rs.PageSize 
					recno= (page-1)* rs.PageSize +ipage
				
					datetime = mid(rs("datetime"),1,10)
					if rs("iscommend") = 0 then
						iscommend = "不推荐"
					else
						iscommend = "推荐"
					end if
					if rs("isopen") = 0 then
						isopen = "未开启"
					else
						isopen = "已开启"
					end if
		%>
      <tr>
        <td><%=rs("id")%></td>
        <td><div align="center"><%=rs("pid")%></div></td>
        <td><div align="center"><%=rs("pname")%></div></td>
        <td><div align="center"><%=rs("price")%></div></td>
        <td><div align="center"><%=datetime%></div></td>
        <td><div align="center"><%=iscommend%></div></td>
        <td><div align="center"><%=isopen%></div></td>
        <td><div align="center"><a href="manufacture_info_operateup.asp?pid=<%=rs("pid")%>">修改</a></div></td>
      </tr>
	  <%
					rs.MoveNext 
				if rs.EOF then exit for
				next
			end if
	  %>
	  
	  <tr>
        <td colspan="8">
		<div align="right">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;第<b><font class="px14" color="#cc0000"><%=page%></font></b>页&nbsp;&nbsp; 
                                &nbsp; &nbsp; &nbsp; &nbsp; 
   <%
	Response.Write "<a href='manufacture.asp?stat="&stat&"&page=1'>[首页]</a>&nbsp;&nbsp;"

	if page=1 then
   		Response.Write "上一页&nbsp;&nbsp;"
	else
   		Response.Write "<a href='manufacture.asp?stat="&stat&"&page="&(page-1)&"'>[上一页]</a>&nbsp;&nbsp;"
	end if
	if rs.PageCount-page=0 then
   		Response.Write "下一页&nbsp;&nbsp;"
	else     
   		Response.Write "<a href='manufacture.asp?stat="&stat&"&page="&(page+1)&"'>[下一页]</a>&nbsp;&nbsp;"
	end if

	Response.Write "<a href='manufacture.asp?stat="&stat&"&page="&rs.PageCount&"'>[末页]</a>&nbsp;&nbsp;"
	rs.close
	conn.close
	%>
		</div></td>
        </tr>
    </table>
   </div> 
</form>  
</body>

⌨️ 快捷键说明

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