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

📄 xx_makereport.asp

📁 生成防伪码,并导出为EXCEL表格,可查寻
💻 ASP
字号:
<!--#include file=conn.asp-->
<!--#include file=config.asp-->
<!--#include file=cookies.asp-->
<!--#include file=function.asp-->
<html>
<head><link href="css1.css" rel="stylesheet" type="text/css">
<title>祥星送货单打印系统--查看送货单</title>
<style media=print> 
.Noprint{display:none;} 
.PageNext{page-break-after: always;} 
</style>
<style type="text/css">
<!--
table{border-collapse:collapse;}
-->
</style>
<style>
.STYLE1 {color: #FFFFFF}
.STYLE2 {
	color: #FF0000;
	font-size: 16px;
}
.STYLE8 {font-size: 15px}
.STYLE10 {font-size: 14}
.STYLE13 {ONT-FAMILY: "宋体", "Verdana", "Arial";}
.STYLE14 {font-size: 16px}
</style>
</head>
<body>
<div align="center">
  <%rs2=conn.execute("select * from xx_config where start=0 and ones=1")
listnums=rs2("Deliverynum")+rs2("usernums")
lennums=rs2("Deliverylen")
%>
<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="19%" height="18"   align="center" class=forumrow></td>
		
        <td width="10%" rowspan="3"  align="center"style="padding-top:40px;" class=forumrow><img src="<%=LogoUrl%>" width="60" height=60 hspace="5" vspace="5" align="top"/></td>
		
        <td colspan="3"  align="left" class=forumrow>&nbsp;</td>
      </tr>
	  
      <tr>
	  
        <td rowspan="2"   align="left" valign="bottom" style="padding-left:10px; " class=forumrow2>TEL:<%=tel%><br>
          FAX:<%=fax%></td>
		  
        <td height="30" colspan="2"  align="left"  class=forumrow style="padding-left:20px;"><font size="5" ><b><%=SiteName%></b></font></td>
        <td  align="left" valign="middle" style="padding-left:20px;"  class=forumrow>&nbsp;</td>
      </tr>
	  
      <tr>
        <td width="4%"  align="left" class=forumrow style="padding-left:20px;">&nbsp;</td>
        <td width="45%" rowspan="2"  align="left" valign="bottom" class=forumrow style="padding-left:20px;"><div align="left" style="padding-left:15px;"><font size="6" face="黑体"><strong>送 货 单</strong></font></div></td>
        <td  align="left" valign="middle" style="padding-left:20px;" class=forumrow><span class="STYLE1"><span class="STYLE2">NO:<%=gen(request("listnum"),lennums)%></span></span></td>
      </tr>
      
      <tr>
        <td colspan="3"   align="left" valign="top"  style="padding-left:10px;" class=forumrow>E-mail:<%=Email%></td>
        <td width="22%"  align="center"   class=forumrow></td>
      </tr>
    </table>	</td>
    <td rowspan="2" valign="baseline">&nbsp;</td>
  </tr>
  <tr >
    <td width="100%" class=forumrow >
	<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff"  bordercolor="#000000">
      <tr >
        <td width="28%"  align="left" valign="top" class=forumrow3 style="padding-left:5px;">客户:<%=conn.execute("select top 1 listuser from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0)%></td>
        <%
		rstime=conn.execute("select top 1 addtime from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0)
		%>
        <td width="45%" align="center" class=forumrow1>&nbsp;</td>
        <td width="3%"  align="center"class=forumrow1 ><%=formatDTM(rstime,"YYYY")%></td>
        <td width="6%"  align="center" class=forumrow1><span class="STYLE10">年 </span></td>
        <td width="5%"  align="center" class=forumrow1><%=formatDTM(rstime,"MM")%></td>
        <td width="3%"  align="center" class=forumrow1><span class="STYLE10">月  </span></td>
        <td width="5%"  align="center" class=forumrow1><%=formatDTM(rstime,"DD")%></td>
        <td width="3%"  align="center" class=forumrow1><span class="STYLE10">日</span></td>
        <td width="2%"  align="center" class=forumrow1>&nbsp;</td>
      </tr>
    </table></td>
  </tr>
     
  <tr>
  <td valign="top" class=forumrow>
  <table width="100%" border=1 align="center" cellpadding="0" cellspacing="0"  bordercolor="#000000" bgcolor="#ffffff" class="tables" id="TableTitleLink">
<tr>
    <td width="12%" height="21"  align="center" class=forumrow >电脑批号</td>
        <td width="9%"  align="center"  class=forumrow>指示卡</td>
        <td width="15%"  align="center" class=forumrow >资材名称</td>
        <td width="5%"  align="center"  class=forumrow>颜色</td>
        <td width="9%"  align="center"  class=forumrow>规格</td>
        <td width="6%"  align="center"  class=forumrow>单位</td>
        <td width="9%"  align="center"  class=forumrow>交货数量</td>
        <td width="5%"  align="center"  class=forumrow>预补</td>
        <td width="11%" align="center"  class=forumrow>备注</td>
		<td width="8%" align="center"  class=forumrow>价格</td>
		<td width="11%" align="center" class=forumrow>金额</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
Allrecord=rs.Recordcount '得到记录总数
for i=1 to Allrecord
sumones=rs("spjg")*rs("spsl")
sum=session("sum")
session("sum")=sum+sumones
%>
  <tr >
   <td width="12%" height="25" align="center" class=forumrow><%=rs("spnum")%></td>
      <td width="9%" align="center" class=forumrow><%=rs("zsk")%></td>
    <td width="15%" align="center" class=forumrow><%=rs("spname")%></td>
    <td width="5%" align="center" class=forumrow><%=rs("spys")%></td>
    <td width="9%" align="center" class=forumrow><%=rs("spgg")%></td>
    <td width="6%" align="center" class=forumrow><%=rs("unit")%></td>
	<td width="9%" align="center" class=forumrow><%=rs("spsl")%></td>
    <td width="5%" align="center"class=forumrow><%=rs("spyb")%></td>
	<td width="11%" align="center" class=forumrow><%=rs("meno")%></td>
    <td width="8%" align="center" class=forumrow><%=rs("spjg")%></td>
	<td width="11%" align="center" class=forumrow><%=sumones%></td>
		  </tr><%rs.movenext
if rs.eof then exit for
next
end if
if allrecord<10 then
over=10-allrecord
for j=1 to over
%>
<tr height="15">
   <td width="12%" height="24" align="center" class=forumrow>&nbsp;</td>
      <td width="9%" align="center" class=forumrow>&nbsp;</td>
    <td width="15%" align="center" class=forumrow>&nbsp;</td>
    <td width="5%" align="center" class=forumrow>&nbsp;</td>
    <td width="9%" align="center" class=forumrow>&nbsp;</td>
    <td width="6%" align="center" class=forumrow>&nbsp;</td>
	<td width="9%" align="center" class=forumrow>&nbsp;</td>
    <td width="5%" align="center"class=forumrow>&nbsp;</td>
	<td width="11%" align="center" class=forumrow>&nbsp;</td>
    <td width="8%" align="center" class=forumrow>&nbsp;</td>
	<td width="11%" align="center" class=forumrow>&nbsp;</td>
		  </tr>
<%next
end if
rs.close

%>

  <tr>
   <td width="12%" rowspan="2" align="center" class=forumrow>备注:</td>
      <td height="65" colspan="4" rowspan="2" align="left" class=forumrow><%=replace(conn.execute("select top 1 listmeno from XX_GoodsUnit where listnum="&int(request("listnum"))&"")(0),"null","&nbsp;")%></td>
	  <td height="32" colspan="6" align="RIGHT" class=forumrow><b>合计</b>:<%=session("sum")%></td>
	  </tr>
  <tr>
    <td height="33" colspan="6" align="RIGHT" class=forumrow><b>大写金额</b>:<%=int2chn(session("sum"))%> </td>
  </tr>
  </table>  </td>  
  <td rowspan="2" valign="top"><div style="layout-flow:vertical-ideographic;">
①存根(白)②会计(黄)③请款(兰)④客户(绿)⑤对帐(红)<BR>

</div></td>
  <tr>
    <td valign="baseline" ><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ffffff"  bordercolor="#000000">
  <tr>
    <td width="20%" align="left" class=forumrow><span class="STYLE8">核准:</span></td>
    <td width="18%" align="left" class=forumrow><span class="STYLE8">经理:</span></td>
    <td width="20%" align="left" class=forumrow><span class="STYLE8">送货:</span></td>
    <td width="21%" align="left" class=forumrow><span class="STYLE8">制表:</span></td>
    <td width="21%" align="left" class=forumrow><span class="STYLE8">客户签收:</span></td>
  </tr></table></td>
  </tr
>
</table>
<table align="right">
  <tr>
    <td height="30" colspan="10" align="center" class=forumrow><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 + -