网页打印问题，打印设置，打印预览，打印分页，纵打，横打及页面的边距(3) 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 > //调用打印函数
