📄 waiqian.asp
字号:
<!--#include file=conn.asp-->
<!--#include file=cookies.asp-->
<html><head><link href="css.css" rel="stylesheet" type="text/css">
<title>三角进销存-未付货款记录</title>
</head>
<body>
<table width="100%" class="inputb"><tr><td align=center>未付货款记录</td></tr></table>
<center><form name="form1" action="Change_WaiQian.asp" method="post">
<%
key="未支付"
Set Rs=Server.Createobject("adodb.recordset")
Sql="select * from JinKu where fukuan='"&key&"'"
Rs.open sql,conn,1,1
response.write"<table width=100% border=1 cellpadding=0 cellspacing=0 bordercolorlight=#cccccc bordercolordark=#ffffff><tr bgcolor=#cccfff><td align=center>编号</td><td align=center>入库商品</td><td align=center>商品数量</td><td align=center>商品单价</td><td align=center>商品总额</td><td align=center>入库日期</td><td align=center>选择</td></tr>"
if rs.eof then
response.write"<tr bgcolor=#f1f1f1><td align=center>暂无未付货款记录</td></tr></table>"
response.end
else
while not rs.eof
response.write"<tr bgcolor=#f1f1f1><td align=center>"&rs("id")&"</td>"
response.write"<td align=center>"&rs("pinpai")&"-"&rs("guige")&"-"&rs("xinghao")&"</td>"
response.write"<td align=center>"&rs("shuliang")&"</td>"
response.write"<td align=center>"&rs("danjia")&"</td>"
response.write"<td align=center>"&rs("summoney")&"</td>"
response.write"<td align=center>"&rs("intime")&"</td>"
response.write"<td align=center><input name=id type=checkbox value="&rs("id")&"></td></tr>"
rs.movenext
wend
rs.close
response.write"<tr bgcolor=#f1f1f1><td colspan=7 align=center><input name=submit type=submit class=inputb value=现在结算选中的记录></td></tr>"
response.write"</table>"
end if
response.write"</form></center>"
sqlstr="select sum(summoney) from Jinku where fukuan='"&key&"'"
rs.open sqlstr,conn,1,1
response.write"<center><font color=red>所有未付货款记录的总额为："&rs(0)&"元"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -