狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

LOGO OA教程 ERP教程 模切知識交流 PMS教程 CRM教程 開發文檔 其他文檔  
 
網站管理員

WEB打印經驗交流

admin
2010年10月9日 10:55 本文熱度 3388
WEB打印一直困擾著大家,小弟最近做一項目,稍有心得,特來跟大家交流交流。

我在那個項目中是利用ScriptX.cab這個控件來解決問題的,包括各種匯總表,詳細清單等等,不過最大弊端就是打印的格式是死的,你要打印出怎樣的格式必須自己來做,還有就是打印分頁,它是按你設置的紙張大小來分的,所以必須人為控制,我已經搞定了。

ScriptX.cab大家可以到網上去DOWN一個。

好了,廢話不多說了,代碼才是大家最需要看到的。

包括三個文件,一個是框架頁,一個是工具欄頁,還一個就是打印的內容頁了。

 

框架頁:

<html>
<head>
<title>打印 / 預覽 / 庫存匯總表</title>
<link type="text/css" rel="stylesheet" href="style.css">
<script language="javascript" src="main.js"></script>
<script language="javascript">maxwin();</script>
</head>
<frameset rows="42,*" style="border:none">
<frame src="toolbar.asp" name="toolbar" target="mainbar" frameborder="0" scrolling="no" noresize>
<frame src="kc.asp" name="mainbar" target="mainbar" frameborder="0" scrolling="auto" noresize>
</frameset>
</html>

工具欄頁:([預覽],[設置]和[打印]等按鈕,代碼里邊的圖片大家自己去做一個好了)

<body bgcolor="#D4D0C8" topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" onselectstart="return false" oncontextmenu="return false">
    <table width="100%" height="41" cellpadding="0" cellspacing="0" border="0" background="../images/bg_toolbar.gif">
     <tr>
      <td width="10"><img src="../images/bar_toolbar.gif"></td>
      <td width="85" align="center"><img src="../images/ico_print.gif" onmouseover="this.src='../images/ico_print1.gif'" onmousedown="this.src='../images/ico_print2.gif'" onmouseout="this.src='../images/ico_print.gif'" onclick="top.mainbar.factory.printing.Print(false);"></td>
      <td width="2"><img src="../images/line_toolbar.gif"></td>
      <td width="85" align="center"><img src="../images/ico_setup.gif" onmouseover="this.src='../images/ico_setup1.gif'" onmousedown="this.src='../images/ico_setup2.gif'" onmouseout="this.src='../images/ico_setup.gif'" onclick="top.mainbar.factory.printing.PageSetup();"></td>
      <td width="2"><img src="../images/line_toolbar.gif"></td>
      <td width="85" align="center"><img src="../images/ico_view.gif" onmouseover="this.src='../images/ico_view1.gif'" onmousedown="this.src='../images/ico_view2.gif'" onmouseout="this.src='../images/ico_view.gif'" onclick="top.mainbar.factory.printing.Preview();"></td>
      <td width="2"><img src="../images/line_toolbar.gif"></td>
      <td>&nbsp;</td>
     </tr>
    </table>
</body>

內容頁:(代碼里邊的數據查詢請大家換成自己的數據查詢)

<style>
td{line-height:180%}
.ybk{border-right:1px #000000 solid;}
.sbk{border-top:1px #000000 solid;}
</style>
<!--這里調用控件ScriptX.cab-->
<object id="factory" style="display:none" viewastext classid="clsid:1663ed61-23eb-11d2-b92f-008048fdd814" codebase="ScriptX.cab#Version=5,60,0,360"></object>
<script defer>
function window.onload() {
  factory.printing.header = ""         //頁眉
  factory.printing.footer = ""        //頁腳
  factory.printing.portrait = false    //true為縱向打印,flase為橫向打印
  factory.printing.leftMargin = 15.0   //左頁邊距
  factory.printing.topMargin = 5.0     //上頁邊距
  factory.printing.rightMargin = 0.75  //右頁邊距
  factory.printing.bottomMargin = 1.5  //下頁邊距
  }
</script>
<body oncontextmenu="return false">

        <!--#include file="conn.asp"-->
        <%
           sql="exec showkc_print"
           Set rs=Server.CreateObject("Adodb.Recordset")
           rs.open sql,conn,3,2
           If Not rs.eof then
              rs.pagesize=21 '每頁記錄條數即每頁打印的條數
              xs=rs.pagesize
              rc=rs.pagecount %>

<!--自動分頁開始-->

<% for n = 1 to rc
   xs_s=(xs*n-xs)+1 '每頁起始序數
   xs_e=xs*n '每頁結束序數 %>
<p>&nbsp;
<table width="1000" height="700" cellpadding="0" cellspacing="0" border="0">
<tr><td valign="top">
<table width="100%" cellpadding="0" cellspacing="0" border="0">
  <tr><td height="50" align="center" valign="top"><font size="5">庫存匯總表</font></td></tr>
</table>

<table width="1000" cellpadding="0" cellspacing="0" style="border:1px #000000 solid" align="center">
 <tr height="20" align="center">
  <td width="5%" class="ybk">序號</td>
  <td width="10%" class="ybk">人工編號</td>
  <td width="15%" class="ybk">材料名稱</td>
  <td width="25%" class="ybk">型號規格</td>
  <td width="10%" class="ybk">單價</td>
  <td width="8%" class="ybk">數量</td>
  <td width="12%" class="ybk">金額</td>
  <td width="5%" class="ybk">單位</td>
  <td width="10%">更新日期</td>
 </tr>
<%
   dim i
   i=1
   Do While Not rs.eof and i<=xs %>
 <tr><td colspan="10" height="1"><img src="../images/dot.gif" width="100%" height="1"></td></tr>
 <tr height="20">
  <td width="5%" class="ybk">&nbsp;&nbsp;<%=xs_s+(i-1)%></td>
  <td width="10%" class="ybk">&nbsp;&nbsp;<%=rs("rgbh")%></td>
  <td width="15%" class="ybk">&nbsp;<%=rs("clmc")%></td>
  <td width="25%" class="ybk">&nbsp;<%=rs("clxh")%></td>
  <td width="10%" class="ybk" align="right"><%=FormatNumber(rs("pjj"),3,true)%>&nbsp;</td>
  <td width="8%" class="ybk" align="right"><%=FormatNumber(rs("kcsl"),2,true)%>&nbsp;</td>
  <td width="12%" class="ybk" align="right"><%xj=FormatNumber(rs("pjj"),3)*FormatNumber(rs("kcsl"),2)%><%=FormatNumber(xj,2,true)%>&nbsp;</td>
  <td width="5%" class="ybk">&nbsp;<%=rs("dw")%></td>
  <td width="10%">&nbsp;<%=datevalue(rs("gxsj"))%></td>
 </tr>

<%
   rs.MoveNext
   i=i+1
   hj=hj+xj
   zj=zj+xj
   Loop %>

 <% If rc>1 then %>
 <tr><td colspan="10" height="1"><img src="../images/dot.gif" width="100%" height="1"></td></tr>
 <tr height="20">
  <td width="5%" class="ybk">&nbsp;</td>
  <td width="10%" class="ybk">&nbsp;</td>
  <td width="15%" class="ybk">&nbsp;</td>
  <td width="25%" class="ybk">&nbsp;本 頁 合 計</td>
  <td width="8%" class="ybk">&nbsp;</td>
  <td width="8%" class="ybk">&nbsp;</td>
  <td width="12%" class="ybk" align="right"><%=FormatNumber(hj,2,true)%><% hj=0%>&nbsp;</td>
  <td width="5%" class="ybk">&nbsp;</td>
  <td width="10%">&nbsp;</td>
 </tr>
 <% end if %>

 <% If n=rc then %>
 <tr><td colspan="10" height="1"><img src="../images/dot.gif" width="100%" height="1"></td></tr>
 <tr height="20">
  <td width="5%" class="ybk">&nbsp;</td>
  <td width="10%" class="ybk">&nbsp;</td>
  <td width="15%" class="ybk">&nbsp;</td>
  <td width="25%" class="ybk">&nbsp;總 計</td>
  <td width="8%" class="ybk">&nbsp;</td>
  <td width="8%" class="ybk">&nbsp;</td>
  <td width="12%" class="ybk" align="right"><%=FormatNumber(zj,2,true)%>&nbsp;</td>
  <td width="5%" class="ybk">&nbsp;</td>
  <td width="10%">&nbsp;<%=now%></td>
 </tr>
 <% end if %>

</table>

<table width="100%" cellpadding="0" cellspacing="0" border="0">
  <tr><td height="15">&nbsp;</td></tr>
  <tr><td height="30" align="center"><font size="3">第<%=n%>頁,共<%=rc%>頁</font></td></tr>
</table>
</td></tr>
</table>
<% next %>

<!--分頁結束-->

<%        
           end if
           rs.close
           Set rs=Nothing
           conn.close
           Set conn=Nothing %>

以上代碼實現一個類似EXCEL格式的庫存匯總表打印,大家可以把代碼拷過去感覺一下,效果還是不錯的,就如我上面所說,因為它的打印格式是要自己做的,所以大家可以改為自己想要的格式,必須自己做了。

歡迎大家交流  ^_^

關于ScriptX的下載和該控件的使用方法請登陸http://www.meadroid.com/scriptx/index.asp查看.

 

本文來自CSDN博客,轉載請標明出處:http://blog.csdn.net/dh20156/archive/2004/12/23/226464.aspx

該文章在 2010/10/9 10:55:18 編輯過
關鍵字查詢
相關文章
正在查詢...
點晴ERP是一款針對中小制造業的專業生產管理軟件系統,系統成熟度和易用性得到了國內大量中小企業的青睞。
點晴PMS碼頭管理系統主要針對港口碼頭集裝箱與散貨日常運作、調度、堆場、車隊、財務費用、相關報表等業務管理,結合碼頭的業務特點,圍繞調度、堆場作業而開發的。集技術的先進性、管理的有效性于一體,是物流碼頭及其他港口類企業的高效ERP管理信息系統。
點晴WMS倉儲管理系統提供了貨物產品管理,銷售管理,采購管理,倉儲管理,倉庫管理,保質期管理,貨位管理,庫位管理,生產管理,WMS管理系統,標簽打印,條形碼,二維碼管理,批號管理軟件。
點晴免費OA是一款軟件和通用服務都免費,不限功能、不限時間、不限用戶的免費OA協同辦公管理系統。
Copyright 2010-2025 ClickSun All Rights Reserved