📄 khsktj.asp
字号:
<!--#include file="../../include/Pubconn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>商品销售查询</title><link href="../../cread.css" rel="stylesheet" type="text/css">
<%
khxh=request("khxh")
if request("currentpage")<>"" then
currentpage=cint(request("currentpage"))
else
currentpage=1
end if
%>
</head>
<body bgcolor="#FFFFFF">
<form method="post" action="khsktj.asp" name=myform>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%"><b><font size="3"><img border="0" src="../../pic/it_22.gif">
</font><font size="2">客户信用明细</font></b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<input type=hidden name=khxh value="<%=khxh%>">
<%
set rs=server.createobject("adodb.recordset")
rs.CursorLocation=3
rs.CursorType = adOpenStatic
sql="select * from viewpayment where clientnum='"&khxh&"'"
'response.write sql
' response.end
rs.open sql,pubconn,1,3
if rs.recordcount>=1 then
rs.pagesize=5
if currentpage>=rs.pagecount then
currentpage=rs.pagecount
else
if currentpage<1 then
currentpage=1
end if
end if
rs.absolutepage=currentpage
pagenum=rs.pagecount
if pagenum<1 then
pagenum=1
end if
%>
客户名称：<%=rs("clientname")%>
<div align="center">
<center>
<table border="1" cellspacing="0" width="100%" height="38" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0">
<tr>
<td width="27%" height="25" align="center" bgcolor="#DDD2C4"><font size="2">结算单号</font></td>
<td width="27%" height="25" align="center" bgcolor="#DDD2C4"><font size="2">结算时间</font></td>
<td width="27%" height="25" align="center" bgcolor="#DDD2C4"><font size="2">结算金额(元)</font></td>
<td width="30%" height="25" align="center" bgcolor="#DDD2C4"><font size="2">收款情况</font></td>
</tr>
<%
for i=1 to rs.pagesize
if i mod 2=1 then%>
<tr bgcolor="#f7f7f7" >
<%else%>
<tr bgcolor="#EDEBEC" >
<%end if%>
<td width="27%" height="20" >
<p align="center"><font size="2"><%=rs("balnum")%></font></p></td>
<td width="27%" height="20" >
<p align="center"><font size="2"><%=rs("gattime")%></font></p></td>
<td width="27%" height="20" >
<p align="center"><font size="2"><%=rs("balmoney")%></font></p></td>
<td width="30%" height="20" >
<p align="center"><font size="2"><%=rs("skqk")%></font></p>
</td>
</tr>
<%
rs.MoveNext
if rs.EOF then
exit for
end if
next %>
</table> </center>
</div>
<br>
共<%=rs.pagecount%>页
<a href="khsktj.asp?currentPage=1&khxh=<%=khxh%>">首 页</a>
<%
if currentPage<pagenum then%>
<a href="khsktj.asp?currentPage=<%=currentpage+1%>&khxh=<%=khxh%>">下一页</a>
<% else%>
下一页 <%
end if
if currentPage>1 then
%> <a href="khsktj.asp?currentPage=<%=currentpage-1%>&khxh=<%=khxh%>">上一页</a>
<% else%>
上一页 <%
end if
%>
<a href="khsktj.asp?currentPage=<%=rs.pagecount%>&khxh=<%=khxh%>">尾 页</a>
<select name="currentpage" >
<%
for j=1 to rs.pagecount%>
<option value=<%=j%>><%=j%>
<%next%>
</select>
<input type="submit" value="Go" name="page" style="background-color: #D1D1D1; border-style: solid; border-width: 1">
<a href="#" onclick="window.print()" >打印</a>
<%else%>
<p align="center">
<font size="2">
经查询，没有记录显示!
<%end if
%> </font><font size="2">
<a href="../d_khindexsubfrm.asp?lookup=Lookup&par_id=<%=khxh%>&page1=1" target="_parent">返回</a>
</form>
<input type="button" value="统计查询" onclick="javascript:location.href='khystj.asp?khxh=<%=khxh%>'" style="background-color: #D1D1D1; border-style: solid; border-width: 1">
</font>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -