📄 xx_makereport2.asp
字号:
<!--#include file=conn.asp-->
<!--#include file=config.asp-->
<!--#include file=cookies.asp-->
<!--#include file=function.asp-->
<html>
<head>
<title>祥星送货单打印系统--查看送货单</title>
<style media=print>
.Noprint{display:none;}
.PageNext{page-break-after: always;}
</style>
<style>
.STYLE1 {color: #FFFFFF}
.STYLE2 {
color: #FF0000;
font-size: 14px;
}
.STYLE4 {font-family: System, "楷体_GB2312"}.STYLE8 {font-size: 15px}
.STYLE10 {font-size: 14}
</style></head>
<body>
<div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr>
<td align="center"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr>
<td width="16%" align="center"></td>
<td width="10%" rowspan="2" align="center"style="padding-top:40px;"><img src="=<%=LogoUrl%>" width="60" height=60 hspace="5" vspace="5" align="top"/></td>
<td colspan="3" align="left"> </td>
</tr>
<tr>
<td align="left" valign="bottom" style="padding-left:10px; padding-top:20px;"><span class="STYLE4">TEL：<%=tel%><br>
FAX：<%=fax%></span></td>
<td colspan="3" align="left" style="padding-left:20px;"><font size="5" face="黑体"><b><%=SiteName%></b></font></td>
</tr>
<tr>
<td colspan="3" align="left" valign="top" style="padding-left:10px;"><span class="STYLE4">E-mail：<%=Email%></span></td>
<td width="43%" align="left"><div align="left" style="padding-left:1px;"><font size="6" face="黑体"><strong>送 货 单</strong></font></div></td>
<td width="25%" align="center"><span class="STYLE1"><span class="STYLE2">NO：<%=request("listnum")%></span></span></td>
</tr>
</table></td>
</tr>
<tr >
<td width="100%" >
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr style="padding-bottom:2px;">
<td width="21%" align="left" style="padding-left:10px;" ><span class="STYLE10">客户：<%=conn.execute("select top 1 listuser from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0)%></span></td><%
rstime=conn.execute("select top 1 addtime from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0)
%>
<td width="54%" align="center" > </td>
<td width="4%" align="center" ><%=formatDTM(rstime,"YYYY")%></td>
<td width="4%" align="center" ><span class="STYLE10">年 </span></td>
<td width="4%" align="center" > </td>
<td width="4%" align="center" ><span class="STYLE10">月 </span></td>
<td width="5%" align="center" > </td>
<td width="4%" align="center" ><span class="STYLE10">日</span></td>
</tr>
</table></td>
</tr>
<tr>
<td>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr>
<td width="15%" align="center" >电脑批号</td>
<td width="10%" align="center" >指示卡</td>
<td width="18%" align="center" >资材名称</td>
<td width="6%" align="center" >颜色</td>
<td width="10%" align="center" >规格</td>
<td width="5%" align="center" >单位</td>
<td width="8%" align="center" >交货数量</td>
<td width="5%" align="center" >预补</td>
<td width="10%" align="center" >备注</td>
<td width="7%" align="center" >价格(￥)</td>
<td width="9%" align="center" >金额(￥)</td>
</tr>
<%
listnum=Request("listnum")
Set Rs=Server.Createobject("adodb.recordset")
Sql="Select * from XX_shoplist where listnum="&listnum&" order by id desc"
Rs.Open Sql,Conn,1,1
if rs.bof and rs.eof then
response.write"<td align=center>对不起没有找到记录！</td>"
else
page=request("page")
rs.pagesize=20'每页显示记录数
j=rs.pagesize
Allrecord=rs.Recordcount '得到记录总数
Allpage=rs.pagecount '得到页总数
if not isnumeric(page) or page="" then
page=1
else page=clng(page)
end if
if page<1 then
page=1
elseif page>Allpage then
page=allpage
end if
rs.absolutepage=page
for i=1 to j
sumones=rs("spjg")*rs("spsl")
sum=session("sum")
session("sum")=sum+sumones
%>
<tr>
<td width="15%" align="center" ><%=rs("spnum")%></td>
<td width="10%" align="center"><%=rs("zsk")%></td>
<td width="18%" align="center"><%=rs("spname")%></td>
<td width="6%" align="center" ><%=rs("spys")%></td>
<td width="10%" align="center"><%=rs("spgg")%></td>
<td width="5%" align="center"><%=rs("unit")%></td>
<td width="8%" align="center"><%=rs("spsl")%></td>
<td width="5%" align="center"><%=rs("spyb")%></td>
<td width="10%" align="center"><%=rs("meno")%></td>
<td width="7%" align="center"><%=rs("spjg")%></td>
<td width="9%" align="center"><%=sumones%></td>
</tr><%rs.movenext
if rs.eof then exit for
next
end if
rs.close
%>
<tr>
<td width="15%" rowspan="3" align="center" >备注：</td>
<td colspan="4" rowspan="3" align="left"><%=replace(conn.execute("select top 1 listmeno from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0),"null"," ")%></td>
</tr>
<tr>
<td height="32" colspan="6" align="right">合计：<%=session("sum")%></td>
</tr>
<tr>
<td height="33" colspan="6" align="right">大写金额：<%=int2chn(session("sum"))%></td>
</tr>
</table>
</td>
<tr>
<td ><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff" bordercolor="#000000">
<tr>
<td width="18%" align="left"><span class="STYLE8">核准：</span></td>
<td width="16%" align="left"><span class="STYLE8">经理：</span></td>
<td width="19%" align="left"><span class="STYLE8">送货：</span></td>
<td width="26%" align="left"><span class="STYLE8">制表</span></td>
<td width="21%" align="left"><span class="STYLE8">客户签收</span></td>
</tr></table></td>
</tr>
<td height="18" width="150" align="center" ><%'=rs("spnum")%></td>
<td width="100" align="center"><%'=rs("zsk")%></td>
<td width="100" align="center"><%'=rs("spname")%></td>
<td width="100" align="center" ><%'=rs("spys")%></td>
</tr>
</table>
<table align="right">
<tr>
<td height="30" colspan="10" align="center"><object id=WebBrowser classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 width=0 viewastext>
</object>
<input name="button" type=button class="NOPRINT" onClick="document.all.WebBrowser.ExecWB(6,1)" value=打印 />
<input name="button2" type=button class="NOPRINT" onClick="document.all.WebBrowser.ExecWB(6,6)" value=直接打印 />
<input name="button2" type=button class="NOPRINT" onClick="document.all.WebBrowser.ExecWB(8,1)" value=页面设置 />
<input name="button2" type=button class="NOPRINT" onClick="document.all.WebBrowser.ExecWB(7,1)" value=打印预览 />
</td>
</tr>
</table>
</div>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -