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

📄 baojin.asp

📁 web进销存m长审核合格后才能开通帐号。如果不想上载源码
💻 ASP
字号:
<%
if session("username")="" then
  response.Redirect "login.asp"
end if
%>
<!-- #include file="conn.asp" -->
<!-- #include file="const.asp" -->

<html>
<head>
<title>库存报警</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style2.css" rel="stylesheet" type="text/css">
</HEAD>

<BODY>
<table width="98%" border="0" cellpadding="0" cellspacing="2" align="center">
  <tr> 
    <td height="21">&nbsp;<img src="Images/ico/ico54.gif" width="32" height="32" hspace="2" vspace="2" align="absmiddle"><font size="+1"><strong> 库存报警</strong></font></td>
  </tr>
</table>
<table width="98%" border="0" cellspacing="1" cellpadding="2" align="center" class="TableMenu">
      <tr class="a1" style="color:#ffffff;font-size:12px;">
	    <th height="30">品名</th>
		<th>货号</th>
		<th>库存数量</th>
      </tr>
<%
sql="select * from produit"
set rs_produit=conn.execute(sql)
nowbaojin=""
do while rs_produit.eof=false
	  sql="select * from produit where huohao='"&rs_produit("huohao")&"'"
	  set rs_shulian=conn.execute(sql)
	  nowshulian=0
	  do while rs_shulian.eof=false
	    nowshulian=nowshulian+rs_shulian("shulian")
	    rs_shulian.movenext
	  loop
	  sql="select * from ku where id="&rs_produit("id_ku")
	  set rs_ku=conn.execute(sql)
	  if nowshulian<rs_produit("baojin") then
	    nowbaojin=nowbaojin&"<tr bgcolor=#ececec onMouseOver=this.bgColor='#ffffff' onMouseOut=this.bgColor='#ececec'><td align=center height=25>"&rs_produit("title")&"</td><td align=center>"&rs_produit("huohao")&"</td><td align=center>共<font color=#ff0000>"&nowshulian&"</font> | "&rs_ku("ku")&"("&rs_produit("shulian")&")</td></tr>"
	  end if
      rs_produit.movenext	   
loop
if nowbaojin="" then
  nowbaojin="<tr bgcolor=#ececec onMouseOver=this.bgColor='#ffffff' onMouseOut=this.bgColor='#ececec'><td align=center height=25><font color='#ff0000'>没有产品报警</font></td></tr>"
end if
%>	  
      <%=nowbaojin%>    
</table>
</body>
</html>

⌨️ 快捷键说明

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