<form id="hz9zz"></form>
  • <form id="hz9zz"></form>

      <nobr id="hz9zz"></nobr>

      <form id="hz9zz"></form>

    1. 明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

      WEB打印大全

      [摘要]1、控制"縱打"、 橫打”和“頁面的邊距。 (1)<script defer> function SetPrintSettings() {  // -- advanc...
      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>
      <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打印大全 
      日韩精品一区二区三区高清