打印大全,Web中打印终极秘籍

转载 2006年06月07日 15:58:00

 <!--语言无关   保存成   .HTML   看看-->  
  <html>  
  <head>  
  <meta   name=vs_targetSchema   content="http://schemas.microsoft.com/intellisense/ie5">  
  <title>看看</title>  
  <meta   http-equiv="Content-Type"   content="text/html;   charset=gb2312">  
  <!--media=print   这个属性可以在打印时有效-->  
  <style   media=print>  
  .Noprint{display:none;}  
  .PageNext{page-break-after:   always;}  
  </style>  
   
  <style>  
  .tdp  
  {  
          border-bottom:   1   solid   #000000;  
          border-left:     1   solid   #000000;  
          border-right:     0   solid   #ffffff;  
          border-top:   0   solid   #ffffff;  
  }  
  .tabp  
  {  
          border-color:   #000000   #000000   #000000   #000000;  
          border-style:   solid;  
          border-top-width:   2px;  
          border-right-width:   2px;  
          border-bottom-width:   1px;  
          border-left-width:   1px;  
  }  
  .NOPRINT   {  
    font-family:   "宋体";  
    font-size:   9pt;  
  }  
   
  </style>  
   
  </head>  
   
  <body   >  
  <center   class="Noprint"   >  
      <p>  
      <OBJECT     id=WebBrowser     classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2     height=0     width=0>  
      </OBJECT>  
      <input     type=button     value=打印                     onclick=document.all.WebBrowser.ExecWB(6,1)>  
      <input     type=button     value=直接打印     onclick=document.all.WebBrowser.ExecWB(6,6)>  
      <input     type=button     value=页面设置     onclick=document.all.WebBrowser.ExecWB(8,1)>  
  </p>  
      <p>         <input     type=button     value=打印预览     onclick=document.all.WebBrowser.ExecWB(7,1)>  
          <br/>  
          </p>  
      <hr   align="center"   width="90%"   size="1"   noshade>  
  </center>  
   
  <table   width="90%"   border="0"   align="center"   cellpadding="2"   cellspacing="0"     class="tabp">  
    <tr>  
      <td   colspan="3"   class="tdp">第1页</td>  
          </tr>  
    <tr>  
        <td   width="29%"   class="tdp"> </td>  
        <td   width="28%"   class="tdp"> </td>  
              <td   width="43%"   class="tdp"> </td>  
      </tr>  
    <tr>  
        <td   colspan="3"   class="tdp"> </td>  
      </tr>  
    <tr>  
        <td   colspan="3"   class="tdp"><table   width="100%"     border="0"   cellspacing="0"   cellpadding="0">  
                  <tr>  
                      <td   width="50%"   class="tdp"><p>这样的报表</p>  
                      <p>对一般的要求就够了。</p></td>  
                      <td> </td>  
                  </tr>  
              </table></td>  
      </tr>  
  </table>  
  <hr   align="center"   width="90%"   size="1"   noshade   class="NOPRINT"   >  
  <!--分页-->  
  <div   class="PageNext"></div>  
  <table   width="90%"   border="0"   align="center"   cellpadding="2"   cellspacing="0"     class="tabp">  
      <tr>  
          <td   class="tdp">第2页</td>  
      </tr>  
      <tr>  
          <td   class="tdp">看到分页了吧</td>  
      </tr>  
      <tr>  
          <td   class="tdp"> </td>  
      </tr>  
      <tr>  
          <td   class="tdp"> </td>  
      </tr>  
      <tr>  
          <td   class="tdp"><table   width="100%"     border="0"   cellspacing="0"   cellpadding="0">  
                  <tr>  
                      <td   width="50%"   class="tdp"><p>这样的报表</p>  
                              <p>对一般的要求就够了。</p></td>  
                      <td> </td>  
                  </tr>  
          </table></td>  
      </tr>  
  </table>  
  </body>  
  </html>  
    使用这段代码来打印挺好的。

    这个更好:  
  <html>  
  <head>  
  <meta   name=vs_targetSchema   content="http://schemas.microsoft.com/intellisense/ie5">  
  <title>***上海市眼病防治中心病人结帐费用报表***</title>  
  <meta   http-equiv="Content-Type"   content="text/html;   charset=gb2312">  
  <!--media=print   这个属性可以在打印时有效-->  
  <style   media=print>  
  .Noprint{display:none;}  
  .PageNext{page-break-after:   always;}  
  </style>  
  <style>  
  body,td,th    
  {  
  font-size:   12px;  
  }  
  .tdp  
  {  
          border-bottom:   1   solid   #000000;  
          border-left:     1   solid   #000000;  
          border-right:     0   solid   #ffffff;  
          border-top:   0   solid   #ffffff;  
  }  
  .tabp  
  {  
          border-color:   #000000;  
   
  border-collapse:collapse;  
  }  
  .NOPRINT   {  
  font-family:   "宋体";  
  font-size:   12px;  
  }  
   
  </style>  
   
  </head>  
   
  <body   >  
      <OBJECT     id=WebBrowser     classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2     height=0     width=0   VIEWASTEXT>  
      </OBJECT>  
  <input   type=button   value=打印           onclick="document.all.WebBrowser.ExecWB(6,1)"   class="NOPRINT">  
  <input   type=button   value=直接打印   onclick="document.all.WebBrowser.ExecWB(6,6)"   class="NOPRINT">  
  <input   type=button   value=页面设置   onclick="document.all.WebBrowser.ExecWB(8,1)"   class="NOPRINT">  
  <input   type=button   value=打印预览   onclick="document.all.WebBrowser.ExecWB(7,1)"   class="NOPRINT">  
      <br/>  
  <table   width="90%"   border="0"   align="center"   cellpadding="0"   cellspacing="0">  
      <tr   align="center">    
          <td   colspan="5"><font   size="3">上海市眼病防治中心病人结帐费用报表(A)   </font></td>  
      </tr>  
      <tr>    
          <td>汇总人次   5</td>  
          <td>费用合计   15853.12</td>  
          <td>统计日期   </td>  
          <td>制表人   023</td>  
          <td>制表日期:2004-05-13</td>  
      </tr>  
  </table>  
     
   
   
  <table   width="90%"   border="1"   align="center"   cellpadding="2"   cellspacing="0"   bordercolor="#000000"     class="tabp">  
      <tr>    
          <td       >姓名</td>  
          <td       >住院号</td>  
          <td       >科室</td>  
          <td       >结帐日期</td>  
          <td       >出院日期</td>  
          <td       >费用合计</td>  
          <td       >医保交易费用</td>  
          <td       >分类给付费用</td>  
          <td       >非医保交易费</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
   
      </tr>  
      <tr>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
          <td       >&nbsp;</td>  
   
      </tr>  
  </table>  
  <hr   align="center"   width="90%"   size="1"   noshade   class="NOPRINT"   >  
  <!--分页-->  
  <div   class="PageNext"></div>  
  <table   width="90%"   border="1"   align="center"   cellpadding="2"   cellspacing="0"   bordercolor="#000000"     class="tabp">  
      <tr>  
          <td   >第2页</td>  
      </tr>  
      <tr>  
          <td   >看到分页了吧</td>  
      </tr>  
      <tr>  
          <td   >&nbsp;</td>  
      </tr>  
      <tr>  
          <td   >&nbsp;</td>  
      </tr>  
      <tr>  
          <td   ><table   width="100%"     border="0"   cellspacing="0"   cellpadding="0">  
                  <tr>  
                      <td   width="50%"   >这样的报表  
                              对一般的要求就够了。</td>  
                      <td>&nbsp;</td>  
                  </tr>  
          </table></td>  
      </tr>  
  </table>  
  </body>  
  </html>  

1、控制"纵打"、   横打”和“页面的边距。    
  (1)<script   defer>    
  function   SetPrintSettings()   {    
   //   --   advanced   features    
   factory.printing.SetMarginMeasure(2)   //   measure   margins   in   inches    
   factory.SetPageRange(false,   1,   3)   //   need   pages   from   1   to   3    
   factory.printing.printer   =   "HP   DeskJet   870C"    
   factory.printing.copies   =   2    
   factory.printing.collate   =   true    
   factory.printing.paperSize   =   "A4"    
   factory.printing.paperSource   =   "Manual   feed"    
   
   //   --   basic   features    
   factory.printing.header   =   "This   is   MeadCo"    
   factory.printing.footer   =   "Advanced   Printing   by   ScriptX"    
   factory.printing.portrait   =   false    
   factory.printing.leftMargin   =   1.0    
   factory.printing.topMargin   =   1.0    
   factory.printing.rightMargin   =   1.0    
   factory.printing.bottomMargin   =   1.0    
  }    
  </script>    
   
  (2)    
  <script   language="javascript">    
    function   printsetup(){    
    //   打印页面设置    
    wb.execwb(8,1);    
    }    
    function   printpreview(){    
    //   打印页面预览    
          
    wb.execwb(7,1);    
           
          
    }    
   
    function   printit()    
    {    
    if   (confirm('确定打印吗?'))   {    
    wb.execwb(6,6)    
    }    
    }    
    </script>    
  </head>    
  <body>    
  <OBJECT   classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"    
   
  height=0   id=wb   name=wb   width=0></OBJECT>    
  <input   type=button   name=button_print   value="打印"    
   
  onclick="javascript:printit()">    
  <input   type=button name=button_setup   value="打印页面设置"    
   
  onclick="javascript:printsetup();">    
  <input   type=button name=button_show   value="打印预览"    
   
  onclick="javascript:printpreview();">    
  <input   type=button   name=button_fh   value="关闭"    
   
  onclick="javascript:window.close();">    
   
  ------------------------------------------------    
  关于这个组件还有其他的用法,列举如下:    
  WebBrowser.ExecWB(1,1)   打开    
  Web.ExecWB(2,1)   关闭现在所有的IE窗口,并打开一个新窗口    
  Web.ExecWB(4,1)   保存网页    
  Web.ExecWB(6,1)   打印    
  Web.ExecWB(7,1)   打印预览    
  Web.ExecWB(8,1)   打印页面设置    
  Web.ExecWB(10,1)   查看页面属性    
  Web.ExecWB(15,1)   好像是撤销,有待确认    
  Web.ExecWB(17,1)   全选    
  Web.ExecWB(22,1)   刷新    
  Web.ExecWB(45,1)   关闭窗体无提示    
   
  2、分页打印    
  <HTML>    
  <HEAD>    
  <STYLE>      
    P   {page-break-after:   always}    
  </STYLE>    
  </HEAD>    
  <BODY>    
  <%while   not   rs.eof%>    
  <P><%=rs(0)%></P>    
  <%rs.movenext%>    
  <%wend%>    
  </BODY>    
  </HTML>    
   
  3、ASP页面打印时如何去掉页面底部的路径和顶端的页码编号    
  (1)ie的文件-〉页面设置-〉讲里面的页眉和页脚里面的东西都去掉,打印就不出来了。

    (2)<html>  
  <head>  
  <SCRIPT   language="javascript">  
  <!--  
  function   HiddenBtn()  
  {  
        document.all["Print1"].style.display   =   'none';  
  }  
  function   ShowBtn()  
  {  
        document.all["Print1"].style.display   =   '';  
  }  
  //-->  
  </SCRIPT>  
  </head>  
  <body   onafterprint="ShowBtn();"   onbeforeprint="HiddenBtn();">  
  <TABLE   id="Table5"   cellSpacing="0"   cellPadding="0"   border="0"   align="center">  
  <TR>  
  <TD   align="center"   colSpan="2"   height="30"><INPUT   id="Print1"   onclick="ExePrint();"   type="button"   value="打印合同"   name="Print1"   runat="server</TD>  
  </TR>  
  </TABLE>  
  </body>  
  </html> 
  (3)<style   media="print">   .Noprint{display:none;}  
  放到head里面试试 
  (4)<HTML>    
  <HEAD>    
  <TITLE>   New   Document   </TITLE>    
  <META   NAME="Generator"   CONTENT="EditPlus">    
  <META   NAME="Author"   CONTENT="YC">    
  <script   language="VBScript">    
  dim   hkey_root,hkey_path,hkey_key    
  hkey_root="HKEY_CURRENT_USER"    
  hkey_path="/Software/Microsoft/Internet   Explorer/PageSetup"    
  '//设置网页打印的页眉页脚为空    
  function   pagesetup_null()    
    on   error   resume   next    
    Set   RegWsh   =   CreateObject("WScript.Shell")    
    hkey_key="/header"      
    RegWsh.RegWrite   hkey_root+hkey_path+hkey_key,""    
    hkey_key="/footer"    
    RegWsh.RegWrite   hkey_root+hkey_path+hkey_key,""    
  end   function    
  '//设置网页打印的页眉页脚为默认值    
  function   pagesetup_default()    
    on   error   resume   next    
    Set   RegWsh   =   CreateObject("WScript.Shell")    
    hkey_key="/header"      
    RegWsh.RegWrite   hkey_root+hkey_path+hkey_key,"&w&b页码,&p/&P"    
    hkey_key="/footer"    
    RegWsh.RegWrite   hkey_root+hkey_path+hkey_key,"&u&b&d"    
  end   function    
  </script>    
  </HEAD>    
   
  <BODY>    
  <br/>    
  <br/>    
  <br/>    
  <br/>    
  <br/>    
  <br/><p   align=center>    
  <input   type="button"   value="清空页码"   onclick=pagesetup_null()>   <input   type="button"   value="恢复页吗"   onclick=pagesetup_default()><br/>    
   
  </p>    
  </BODY>    
  </HTML>    
  4、浮动帧打印    
  <SCRIPT   LANGUAGE=javascript>    
  function   button1_onclick()   {    
    var   odoc=window.iframe1.document;    
    var   r=odoc.body.createTextRange();    
    var   stxt=r.htmlText;    
    alert(stxt)    
    var   pwin=window.open("","print");    
    pwin.document.write(stxt);    
    pwin.print();    
  }    
  </SCRIPT>    
  4、用FileSystem组件实现WEB应用中的本地特定打印    
  <script   Language=VBScript>    
  function   print_onclick   //打印函数    
  dim   label    
  label=document.printinfo.label.value   //获得HTML页面的数据    
  set   objfs=CreateObject("Scripting.FileSystemObject")   //创建FileSystem组件对象的实例    
  set   objprinter=objfs.CreateTextFile   ("LPT1:",true)   //建立与打印机的连接    
  objprinter.Writeline("__________________________________")   //输出打印的内容    
  objprinter.Writeline("|   |")    
  objprinter.Writeline("|   您打印的数据是:"&label&   "   |”)    
  objprinter.Writeline("|   |")    
  objprinter.Writeline("|_________________________________|")    
  objprinter.close   //断开与打印机的连接    
  set   objprinter=nothing    
  set   objfs=nothing   //   关闭FileSystem组件对象    
  end   function    
  </script>    
  服务器端脚本:    
  <%………    
  set   conn=server.CreateObject   ("adodb.connection")    
  conn.Open   "DSN=name;UID=XXXX;PWD=XXXX;"    
  set   rs=server.CreateObject("adodb.recordset")    
  rs.Open(“select   ……”),conn,1,1    
  ……….%>   //与数据库进行交互    
  HTML页面编码:    
  <HTML>    
  ………    
  <FORM   ID=printinfo   NAME="printinfo"   >    
  <INPUT   type="button"   value="打印>>"   id=print   name=print   >   //调用打印函数    
  <INPUT   type=hidden   id=text1   name=label   value=<%=………%>>   //保存服务器端传来的数据    
  ………    
  </HTML>  

相关文章推荐

解放思想,Web打印终极解决方案

不写博客已经好多年,最近在做一些使用到报表方面的一些项目,涉及到比较麻烦的一些事情就是Web的打印,就这个问题做过很多这方面的资料查阅,网络上各种打印插件到处都有,国内外都有很多,收费的不收费的,对一...

学Java的必知几种排序(终极秘籍)

8种排序之间的关系: 1, 直接插入排序    (1)基本思想:在要排序的一组数中,假设前面(n-1)[n>=2] 个数已经是排 好顺序的,现在要把第n个数插到前...

ConstraintLayout 终极秘籍(上)

ConstraintLayout 终极秘籍(上) 时间 2017-02-25 12:25:49  云在千峰 原文  http://blog.chengyunfeng.com/?p=1030 ...

Android APP设计教程与终极UI适配秘籍【图文版】

UI界面在不同平台的适配受屏幕尺寸和屏幕密度影响,Android适配机制就是在资源后面添加对这两种因素的限定,通过不同的限定区分不同的平台资源,Android在使用资源的时候会优先选择满足本平台限定的...

Kali Linux Web 渗透测试秘籍 第九章 客户端攻击和社会工程

第九章 客户端攻击和社会工程 作者:Gilberto Najera-Gutierrez 译者:飞龙 协议:CC BY-NC-SA 4.0 简介我们目前所见的大部分技巧都尝试利用...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:打印大全,Web中打印终极秘籍
举报原因:
原因补充:

(最多只允许输入30个字)