zym_nanako
- 浏览: 85210 次
- 性别:
- 来自: 北京
-
文章分类
最新评论
-
July01：
推荐用StratoIO打印控件，支持网页、URL、图片、PD、 ...
[转]网页打印问题 -
agh_alan：
sssssssssssssssssssssssssssssss ...
[转]网页打印问题 -
vieri122：
请问 抓包数据如何让中文数据不是乱码？
使用 Eclipse 中的 TCP/IP Monitor -
shingo7：
多谢整理看了后帮助很大
tomcat5集群中的SESSON复制 -
huyiho0311：
...
CSS样式使用优先级判断
网页打印问题，打印设置，打印预览，打印分页，纵打，横打及页面的边距
1、控制"纵打"、 横打”和“页面的边距
（1)
<object id="factory" style="display:none" viewastext classid="clsid:1663ed61-23eb-11d2-b92f-008048fdd814"
codebase="http://www.meadroid.com/scriptx/ScriptX.cab#Version=5,60,0,360"></object>
<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="javascriptrintit()">
<input type=button name=button_setup value="打印页面设置"
onclick="javascriptrintsetup();">
<input type=button name=button_show value="打印预览"
onclick="javascriptrintpreview();">
<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.document.close();
pwin.print();
}
</SCRIPT>
5、用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>
这个是调用WORD，进行打印
在<head></head>之间加入如下代码；
<OBJECT Classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 id=WB width=0></OBJECT>
<script language=javascript>
function doPrintSetup(){
WB.ExecWB(8,1)
}
function doPrintPreview(){
WB.ExecWB(7,1)
}
</script>
在<body>中调用:
<input type=button name=button1 value="打印设置" onclick="return doPrintSetup()">
<input type=button name=button2 value="打印预览" onclick="return doPrintPreview()">
<input type=button name=button3 value="打印本页" onclick="javascriptrint()">
6、设置不想打印的部分
<style>
@media print{
.xx {display:none}
}
</style>
<table width="600" class="xx" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="60" align="center">不想打印的表格</td>
</tr>
</table>
7、利用word在客户端打印web页面
以前在asp中也碰到过实现在浏览器中打印的问题，特别是用局域网中的一些应用，以前的实现定义一个打印开始的标记，和一个结束的标记，然后调用 window.print()方法，还有涉及在使用frame时候的打印问题，在msdn的文档中有关于这些的比较详细的介绍，但是，控制起来都比较的麻 烦，而且对与打印比较精确的控制都比较难以实现，有很多的朋友也碰到过这个问题，最近读了一片文章，关于在web中的打印的实现（csdn)，稍作修改， 贴了出来，供大家参考一下，希望对大家有所帮助。
可以调用客户端的word进行打印前提是客户端必须安装word.
方法如下：
＜%
Response.ContentType = "application/msword"
response.AddHeader "content-disposition", "inline; filename=report.doc"
%＞
当把，一样的内容添加到，asp的上面时候，会在客户端自动调用word打开当前的文档，不过不要忘记把，response.buffer的属性设定为false。
8、在WEB环境下打印报表的crystal的解决方案的实例
<%@ LANGUAGE="VBSCRIPT" %>
<%
' = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
' 从ADO Recordset直接生成报表
' = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
'
' 概念:
'
' 这个应用被设计成演示怎样从ADO Recordset生成报表。我们首先建立ADO Connection和
' Recordset对象，然后用SQL语句从数据库中生成一个记录集。然后我们建立一个Crystal
' Reports对象，并把这个这个对象指向ADO recordset。最后我们将Crystal Reports
' Smart Viewer送到客户端显示这个报表。
' 第一步：建立ADO Connection and Recordset
' 一个ADO的数据库连接就是通过你已经存在的ODBC数据源（DSN）从象ASP这样的应用中来访问
' 数据的连接。为了达到这个例子的目的，我们将使用到用一个叫做"Xtreme Sample Data"的
' 连到Access数据库Xtreme.mdb系统DSN
' 建立ADO数据库连接:
Set oConn = Server.CreateObject("ADODB.Connection")
'这里建立叫做"oConn"的ADO connection，我们将用这个ADO connection对象连接到上述的DSN
'用 ADO connection 必须先要打开它:
oConn.Open("Xtreme Sample Database")
'这里打开我们的ODBC的数据源，这个数据源指向Access数据库Xtreme.mdb
'现在我们必须建立一个RecordSet对象：
set session("oRs") = Server.CreateObject("ADODB.Recordset")
'在上面我们建立了一个session("oRs"). 这个session中存放一个RecordSet对象
'将要包含用SQL语句返回的数据
'定义和生成 recordset:
session("oRs").ActiveConnection = oConn
'定义这个recordset将要使用的Connection 对象
session("oRs").Open "SELECT [Product ID], [Product Name] FROM Product"
'用SQL语句从Xtreme.mdb库的"Product"表中取出两个字段
'===================================================================================
'建立Crystal Reports 对象
'===================================================================================
'你可能注意到，Crystal Reports对象被设为session，这是因为已经需求就会被一个叫做
'"rptserver.asp"的ASP处理，为了让rptserver.asp能非常容易地访问Crystal Report对象，
'我们把这些对象都设为session。这样任何ASP页都运行在这个session中，都能够直接访问这些对象
reportname = "ADORecordset.rpt"
'这里建立一个字符串变量，指向Crystal Report文件(.rpt file)，再用这段代码的时候
'换成你的Crystal Report文件名。
'建立APPLICATION 对象
If Not IsObject (session("oApp")) Then
Set session("oApp") = Server.CreateObject("CrystalRuntime.Application")
End If
'这个"if/end if" 结构用来每个session只建立一次 Crystal Reports Application对象o
'建立application对象 - session("oApp")，将Crystal Report Design Component
'automation server (craxdrt.dll)载入内存。
'
'我们建立session变量是为了再asp session过程中都使用它们.这样可以减少将craxdrt.dll
'载入和卸载的系统开销。在一个session中一旦建立了一个application对象我们就可以不必
'重建对象运行更多的报表 。
' 建立REPORT 对象
'
'这个REPORT 对象被Application的OpenReport方法建立
Path = Request.ServerVariables("PATH_TRANSLATED")
While (Right(Path, 1) <> "\" And Len(Path) <> 0)
iLen = Len(Path) - 1
Path = Left(Path, iLen)
Wend
response.Write path
'这个"While/Wend" 循环被用来将当前文件从虚拟路径(eg: http://Domain/Dir)转换成Crystal
' Report file的物理路径(eg: C:\)
'打开REPORT (先清除以前的任何对象)
If IsObject(session("oRpt")) then
Set session("oRpt") = nothing
End if
On error resume next
Set session("oRpt") = session("oApp").OpenReport(path & reportname, 1)
'这里用"PATH" 和 "reportname"变量计算出Crystal Report file的物理路径, 并打开它。
If Err.Number <> 0 Then
Response.Write "Error Occurred creating Report Object: " & Err.Description
Set Session("oRpt") = nothing
Set Session("oApp") = nothing
Session.Abandon
Response.End
End If
'这个 On erro resume next 块检查在建立report对象时出现的任何错误，我们正明确的捕获任何
'错误如果视图超过许可协议规定的最大并发用户数。
'注意，我们并不只建立一次report对象。这是因为有了ASP session 你可以处理更多的超过一个报表
' rptserver.asp将仅仅处理一个叫session("oRpt")的report对象。因此，你如果希望处理多个报表
'的话，就要建立一个新的session("oRpt")对象。
session("oRpt").MorePrintEngineErrorMessages = False
session("oRpt").EnableParameterPrompting = False
'这里不允许错误报告机制，包括Crystal Report Design Component automation server (craxdrt.dll)
'内建的错误报告，这是因为两个原因：
'1. 打印引擎是在Web Server上执行的, 所以任何错误信息都将被显示在服务端，如果在服务端报告出错了，
' 打印引擎将停止运作，你的应用将被“挂起”
'2. rptserver.asp 已经有一些错误处理逻辑在里面了，可以捕获任何非致命错误，并显示在客户端。
'
'**重要** 即使我们禁止了服务端引擎的错误处理，但是致命错误还是会在Web Server服务端被捕获，并
'显示出错误提示对话框。所以我们建议，你在"World Wide Web Publishing" service (IIS service)设置
'"Allow Service to Interact with Desktop"选项。这样如果你的ASP应用死了，你将能看到错误提示。
'======================================================================================
'======================================================================================
'现在我们必须告诉report在ADO recordset中的数据
'report建立在动态的ADO recordset的基础，我们必须基于我们建立的recordset来建立report
'然后在运行时我们告诉report数据在ADO Record set中。report通常依靠数据库结构文件
'(ADORecordset.ttx)建立，这个.ttx文件包含recordset的结构，不包含实际数据。
'一个Crystal Report完全依赖将要使用的Report的数据结构，因此在运行时你的数据库结构文件(ttx file)
'或真实反应ADO recordset包含的数据的DSN是十分重要的
session("oRpt").DiscardSavedData
set Database = session("oRpt").Database
'实例化report用到的数据库
set Tables = Database.Tables
'实例化数据库对象中的表
set Table1 = Tables.Item(1)
'实例化第一张表，在这个实例中这个表对象指向ADORecordset.ttx文件
Table1.SetPrivateData 3, session("oRs")
'"SetPrivateData"告诉report现在数据源是 recordset，现在report将要显示的数据包含在session("oRs")中
'如果你的report中包含子报表将提供不同的recordset来指向子报表的数据
'
'====================================================================================
'重新得到记录和建立"Page on Demand" Engine Object
'====================================================================================
On Error Resume Next
session("oRpt").ReadRecords
If Err.Number <> 0 Then
Response.Write "Error Occurred Reading Records: " & Err.Description
Set Session("oRpt") = nothing
Set Session("oApp") = nothing
Session.Abandon
Response.End
Else
If IsObject(session("oPageEngine")) Then
set session("oPageEngine") = nothing
End If
set session("oPageEngine") = session("oRpt").PageEngine
End If
' 实例化 CRYSTAL REPORTS SMART VIEWER
'
'在ASP环境中使用Crystal Reports automation server, 我们用相同的页来通过Crystal Web Report Server调用
'"Smart Viewers"
'有四个 Crystal Reports Smart Viewers:
'
'1. ActiveX Smart Viewer
'2. Java Smart Viewer
'3. HTML Frame Smart Viewer
'4. HTML Page Smart Viewer
'
'你使用的Smart Viewer将与你数用的浏览器兼容的，例如你将不会使用Java viewer如果你的浏览器
'不支持Java applets。为此，在这个DEMO中，我们已经选择定义一个viewer，你可以通过代码决定
'提出要求的浏览器的支持兼容性，无论如何，这个功能继承自Crystal Reports automation server，
'超过了这个示例的范围。
'基于简单的理由，我们已经选择通过ASP服务端包含的功能来实现这个功能，你可以选择不同的
'SmartViewer*.asp文件送到不同的浏览器，简单的用你想用的Smart Viewer asp文件来代替。
'这些选择是： SmartViewerActiveX.asp, SmartViewerJave.asp,SmartViewerHTMLFrame.asp,
'and SmartViewerHTMLPAge.asp.注意，使用这些包含文件时，你必须把相应的.ASP文件放在同主
'ASP文件相同的虚拟路径中。
'
'*注意* 对于 SmartViewerHTMLFrame and SmartViewerHTMLPage,你必须在虚拟路径中有framepage.asp
'文件和toolbar.asp 文件
viewer = Request.Form("Viewer")
'上面读取被使用的viewer的值，并放入变量"viewer"中
If cstr(viewer) = "ActiveX" then
%>
<!-- #include file="SmartViewerActiveX.asp" -->
<%
ElseIf cstr(viewer) = "Netscape Plug-in" then
%>
<!-- #include file="ActiveXPluginViewer.asp" -->
<%
ElseIf cstr(viewer) = "Java using Browser JVM" then
%>
<!-- #include file="SmartViewerJava.asp" -->
<%
ElseIf cstr(viewer) = "Java using Java Plug-in" then
%>
<!-- #include file="JavaPluginViewer.asp" -->
<%
ElseIf cstr(viewer) = "HTML Frame" then
Response.Redirect("htmstart.asp")
Else
Response.Redirect("rptserver.asp")
End If
'上面 If/Then/Else 被设计测试"viewer" 变量的值，基于这个值，送适当的Crystal Smart Viewer
%>
推荐用StratoIO打印控件，支持网页、URL、图片、PD、ZPL和EPL，浏览器和系统的兼容性都很好，
而且不会崩溃。页头页脚、页码都能定制。参考http://www.webprinter.cn/features
1、控制"纵打"、 横打”和“页面的边距
（1)
<object id="factory" style="display:none" viewastext classid="clsid:1663ed61-23eb-11d2-b92f-008048fdd814"
codebase="http://www.meadroid.com/scriptx/ScriptX.cab#Version=5,60,0,360"></object>
<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="javascriptrintit()">
<input type=button name=button_setup value="打印页面设置"
onclick="javascriptrintsetup();">
<input type=button name=button_show value="打印预览"
onclick="javascriptrintpreview();">
<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.document.close();
pwin.print();
}
</SCRIPT>
5、用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>
这个是调用WORD，进行打印
在<head></head>之间加入如下代码；
<OBJECT Classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 id=WB width=0></OBJECT>
<script language=javascript>
function doPrintSetup(){
WB.ExecWB(8,1)
}
function doPrintPreview(){
WB.ExecWB(7,1)
}
</script>
在<body>中调用:
<input type=button name=button1 value="打印设置" onclick="return doPrintSetup()">
<input type=button name=button2 value="打印预览" onclick="return doPrintPreview()">
<input type=button name=button3 value="打印本页" onclick="javascriptrint()">
6、设置不想打印的部分
<style>
@media print{
.xx {display:none}
}
</style>
<table width="600" class="xx" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="60" align="center">不想打印的表格</td>
</tr>
</table>
7、利用word在客户端打印web页面
以前在asp中也碰到过实现在浏览器中打印的问题，特别是用局域网中的一些应用，以前的实现定义一个打印开始的标记，和一个结束的标记，然后调用 window.print()方法，还有涉及在使用frame时候的打印问题，在msdn的文档中有关于这些的比较详细的介绍，但是，控制起来都比较的麻 烦，而且对与打印比较精确的控制都比较难以实现，有很多的朋友也碰到过这个问题，最近读了一片文章，关于在web中的打印的实现（csdn)，稍作修改， 贴了出来，供大家参考一下，希望对大家有所帮助。
可以调用客户端的word进行打印前提是客户端必须安装word.
方法如下：
＜%
Response.ContentType = "application/msword"
response.AddHeader "content-disposition", "inline; filename=report.doc"
%＞
当把，一样的内容添加到，asp的上面时候，会在客户端自动调用word打开当前的文档，不过不要忘记把，response.buffer的属性设定为false。
8、在WEB环境下打印报表的crystal的解决方案的实例
<%@ LANGUAGE="VBSCRIPT" %>
<%
' = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
' 从ADO Recordset直接生成报表
' = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
'
' 概念:
'
' 这个应用被设计成演示怎样从ADO Recordset生成报表。我们首先建立ADO Connection和
' Recordset对象，然后用SQL语句从数据库中生成一个记录集。然后我们建立一个Crystal
' Reports对象，并把这个这个对象指向ADO recordset。最后我们将Crystal Reports
' Smart Viewer送到客户端显示这个报表。
' 第一步：建立ADO Connection and Recordset
' 一个ADO的数据库连接就是通过你已经存在的ODBC数据源（DSN）从象ASP这样的应用中来访问
' 数据的连接。为了达到这个例子的目的，我们将使用到用一个叫做"Xtreme Sample Data"的
' 连到Access数据库Xtreme.mdb系统DSN
' 建立ADO数据库连接:
Set oConn = Server.CreateObject("ADODB.Connection")
'这里建立叫做"oConn"的ADO connection，我们将用这个ADO connection对象连接到上述的DSN
'用 ADO connection 必须先要打开它:
oConn.Open("Xtreme Sample Database")
'这里打开我们的ODBC的数据源，这个数据源指向Access数据库Xtreme.mdb
'现在我们必须建立一个RecordSet对象：
set session("oRs") = Server.CreateObject("ADODB.Recordset")
'在上面我们建立了一个session("oRs"). 这个session中存放一个RecordSet对象
'将要包含用SQL语句返回的数据
'定义和生成 recordset:
session("oRs").ActiveConnection = oConn
'定义这个recordset将要使用的Connection 对象
session("oRs").Open "SELECT [Product ID], [Product Name] FROM Product"
'用SQL语句从Xtreme.mdb库的"Product"表中取出两个字段
'===================================================================================
'建立Crystal Reports 对象
'===================================================================================
'你可能注意到，Crystal Reports对象被设为session，这是因为已经需求就会被一个叫做
'"rptserver.asp"的ASP处理，为了让rptserver.asp能非常容易地访问Crystal Report对象，
'我们把这些对象都设为session。这样任何ASP页都运行在这个session中，都能够直接访问这些对象
reportname = "ADORecordset.rpt"
'这里建立一个字符串变量，指向Crystal Report文件(.rpt file)，再用这段代码的时候
'换成你的Crystal Report文件名。
'建立APPLICATION 对象
If Not IsObject (session("oApp")) Then
Set session("oApp") = Server.CreateObject("CrystalRuntime.Application")
End If
'这个"if/end if" 结构用来每个session只建立一次 Crystal Reports Application对象o
'建立application对象 - session("oApp")，将Crystal Report Design Component
'automation server (craxdrt.dll)载入内存。
'
'我们建立session变量是为了再asp session过程中都使用它们.这样可以减少将craxdrt.dll
'载入和卸载的系统开销。在一个session中一旦建立了一个application对象我们就可以不必
'重建对象运行更多的报表 。
' 建立REPORT 对象
'
'这个REPORT 对象被Application的OpenReport方法建立
Path = Request.ServerVariables("PATH_TRANSLATED")
While (Right(Path, 1) <> "\" And Len(Path) <> 0)
iLen = Len(Path) - 1
Path = Left(Path, iLen)
Wend
response.Write path
'这个"While/Wend" 循环被用来将当前文件从虚拟路径(eg: http://Domain/Dir)转换成Crystal
' Report file的物理路径(eg: C:\)
'打开REPORT (先清除以前的任何对象)
If IsObject(session("oRpt")) then
Set session("oRpt") = nothing
End if
On error resume next
Set session("oRpt") = session("oApp").OpenReport(path & reportname, 1)
'这里用"PATH" 和 "reportname"变量计算出Crystal Report file的物理路径, 并打开它。
If Err.Number <> 0 Then
Response.Write "Error Occurred creating Report Object: " & Err.Description
Set Session("oRpt") = nothing
Set Session("oApp") = nothing
Session.Abandon
Response.End
End If
'这个 On erro resume next 块检查在建立report对象时出现的任何错误，我们正明确的捕获任何
'错误如果视图超过许可协议规定的最大并发用户数。
'注意，我们并不只建立一次report对象。这是因为有了ASP session 你可以处理更多的超过一个报表
' rptserver.asp将仅仅处理一个叫session("oRpt")的report对象。因此，你如果希望处理多个报表
'的话，就要建立一个新的session("oRpt")对象。
session("oRpt").MorePrintEngineErrorMessages = False
session("oRpt").EnableParameterPrompting = False
'这里不允许错误报告机制，包括Crystal Report Design Component automation server (craxdrt.dll)
'内建的错误报告，这是因为两个原因：
'1. 打印引擎是在Web Server上执行的, 所以任何错误信息都将被显示在服务端，如果在服务端报告出错了，
' 打印引擎将停止运作，你的应用将被“挂起”
'2. rptserver.asp 已经有一些错误处理逻辑在里面了，可以捕获任何非致命错误，并显示在客户端。
'
'**重要** 即使我们禁止了服务端引擎的错误处理，但是致命错误还是会在Web Server服务端被捕获，并
'显示出错误提示对话框。所以我们建议，你在"World Wide Web Publishing" service (IIS service)设置
'"Allow Service to Interact with Desktop"选项。这样如果你的ASP应用死了，你将能看到错误提示。
'======================================================================================
'======================================================================================
'现在我们必须告诉report在ADO recordset中的数据
'report建立在动态的ADO recordset的基础，我们必须基于我们建立的recordset来建立report
'然后在运行时我们告诉report数据在ADO Record set中。report通常依靠数据库结构文件
'(ADORecordset.ttx)建立，这个.ttx文件包含recordset的结构，不包含实际数据。
'一个Crystal Report完全依赖将要使用的Report的数据结构，因此在运行时你的数据库结构文件(ttx file)
'或真实反应ADO recordset包含的数据的DSN是十分重要的
session("oRpt").DiscardSavedData
set Database = session("oRpt").Database
'实例化report用到的数据库
set Tables = Database.Tables
'实例化数据库对象中的表
set Table1 = Tables.Item(1)
'实例化第一张表，在这个实例中这个表对象指向ADORecordset.ttx文件
Table1.SetPrivateData 3, session("oRs")
'"SetPrivateData"告诉report现在数据源是 recordset，现在report将要显示的数据包含在session("oRs")中
'如果你的report中包含子报表将提供不同的recordset来指向子报表的数据
'
'====================================================================================
'重新得到记录和建立"Page on Demand" Engine Object
'====================================================================================
On Error Resume Next
session("oRpt").ReadRecords
If Err.Number <> 0 Then
Response.Write "Error Occurred Reading Records: " & Err.Description
Set Session("oRpt") = nothing
Set Session("oApp") = nothing
Session.Abandon
Response.End
Else
If IsObject(session("oPageEngine")) Then
set session("oPageEngine") = nothing
End If
set session("oPageEngine") = session("oRpt").PageEngine
End If
' 实例化 CRYSTAL REPORTS SMART VIEWER
'
'在ASP环境中使用Crystal Reports automation server, 我们用相同的页来通过Crystal Web Report Server调用
'"Smart Viewers"
'有四个 Crystal Reports Smart Viewers:
'
'1. ActiveX Smart Viewer
'2. Java Smart Viewer
'3. HTML Frame Smart Viewer
'4. HTML Page Smart Viewer
'
'你使用的Smart Viewer将与你数用的浏览器兼容的，例如你将不会使用Java viewer如果你的浏览器
'不支持Java applets。为此，在这个DEMO中，我们已经选择定义一个viewer，你可以通过代码决定
'提出要求的浏览器的支持兼容性，无论如何，这个功能继承自Crystal Reports automation server，
'超过了这个示例的范围。
'基于简单的理由，我们已经选择通过ASP服务端包含的功能来实现这个功能，你可以选择不同的
'SmartViewer*.asp文件送到不同的浏览器，简单的用你想用的Smart Viewer asp文件来代替。
'这些选择是： SmartViewerActiveX.asp, SmartViewerJave.asp,SmartViewerHTMLFrame.asp,
'and SmartViewerHTMLPAge.asp.注意，使用这些包含文件时，你必须把相应的.ASP文件放在同主
'ASP文件相同的虚拟路径中。
'
'*注意* 对于 SmartViewerHTMLFrame and SmartViewerHTMLPage,你必须在虚拟路径中有framepage.asp
'文件和toolbar.asp 文件
viewer = Request.Form("Viewer")
'上面读取被使用的viewer的值，并放入变量"viewer"中
If cstr(viewer) = "ActiveX" then
%>
<!-- #include file="SmartViewerActiveX.asp" -->
<%
ElseIf cstr(viewer) = "Netscape Plug-in" then
%>
<!-- #include file="ActiveXPluginViewer.asp" -->
<%
ElseIf cstr(viewer) = "Java using Browser JVM" then
%>
<!-- #include file="SmartViewerJava.asp" -->
<%
ElseIf cstr(viewer) = "Java using Java Plug-in" then
%>
<!-- #include file="JavaPluginViewer.asp" -->
<%
ElseIf cstr(viewer) = "HTML Frame" then
Response.Redirect("htmstart.asp")
Else
Response.Redirect("rptserver.asp")
End If
'上面 If/Then/Else 被设计测试"viewer" 变量的值，基于这个值，送适当的Crystal Smart Viewer
%>
分享到：
评论
2 楼
July01
2017-11-09
推荐用StratoIO打印控件，支持网页、URL、图片、PD、ZPL和EPL，浏览器和系统的兼容性都很好，
而且不会崩溃。页头页脚、页码都能定制。参考http://www.webprinter.cn/features
1 楼
agh_alan
2012-01-11
ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替ssssssssssssssssssssssssssssssssssdsf顶替
发表评论
-
CSS样式使用优先级判断
2007-12-18 09:54 1621CSS样式定义多了，常常出现显示效果与预期不一致的情况。其中很 ... -
java彩色验证码
2007-11-30 21:13 1522生成有4个随机数字和杂乱背景的图片，数字和背景颜色会改变，服务 ... -
正确解决用户退出问题
2007-11-30 21:11 4252注：本文是翻译的javaworld.com上的一篇名为《Sol ... -
[转]web开发过程中要注意的问题(二)
2007-10-31 09:26 1383上次写了一篇《web开发 ... -
[转]web开发过程中要注意的问题(一)
2007-10-31 09:26 14831，document.getElementById方法只能获取 ...
相关推荐
在现代移动互联网时代，手机网页打印和截屏已经成为不可或缺的功能，尤其对于商务用户和需要将网页内容转化为纸质文档的人来说。本文将深入探讨“手机网页打印”、“WAP打印”、“手机打印”、“H5打印”以及相关的...
JavaScript是Web开发中的一种重要脚本语言，它允许开发者在客户端执行动态操作，包括与用户的交互、数据处理以及，如本题所示，实现网页打印功能。网页打印是将网页内容输出到打印机或创建PDF文档的过程，这对于用户...
网页打印工具是日常工作中不可或缺的一部分，特别是在处理网页内容的整理和存档时。这款名为“PAZU”的工具因其免费且功能强大而受到推崇。它提供了便捷的方式，让用户能够高效地将网页内容转换为可打印格式，从而...
Vue中将网页打印成PDF实例代码 在Vue中，将网页打印成PDF是一种非常实用的功能，特别是在需要将网页内容导出为PDF文件时。下面我们将详细介绍如何使用Vue将网页打印成PDF。 了解 Vue 中的打印机制 在Vue中，我们...
在JavaScript中进行网页打印设置是一项常见的任务，尤其在开发网页应用程序时，往往需要提供用户友好的打印功能。本文将深入探讨如何使用JavaScript控制和自定义网页打印，包括页面布局、样式处理、排除不必要元素等...
网页打印在IT行业中是一项常见的需求，特别是在Web应用和企业信息化管理中。Lodop是一款功能强大的网页打印控件，它提供了便捷的JavaScript API，使得网页中的数据能够方便地被打印出来，无需用户下载任何插件。本文...
网页打印和打印预览是网页开发中的重要功能，它们使得用户可以直接从浏览器中将网页内容输出到打印机或者进行查看预览。在这个过程中，JavaScript（JS）扮演了关键的角色，提供了丰富的API和库来实现这些功能。 一...
Chrome插件，支持打印网页、网页节选内容转PDF 两大功能，使用时可以轻松去除网页中不需要的内容
在网页打印中，CSS媒体查询扮演着关键角色。我们可以使用`@media print`来定义仅在打印时应用的样式规则。这包括设置页面边距、调整布局以适应纸张尺寸，以及控制是否打印背景色和图像。对于SVG元素，特别需要注意...
网页打印在IT行业中是一项常见的需求，特别是在Web应用开发中，用户可能需要将网页内容打印成纸质形式。在ASP.NET框架下，实现网页打印涉及到多种技术和策略。本文将深入探讨"网页打印源码"这一主题，以及如何利用...
**JasperReports -- 客户端打印（WEB网页打印）** JasperReports 是一个功能强大的开源报告生成库，广泛应用于Java应用程序中，用于创建复杂的报表和图表。它支持多种数据源，包括数据库查询、XML、CSV等，并且可以...
首先，我们需要理解网页打印的基本原理。网页是通过HTML和CSS来布局和样式化的，而打印则是将这些内容转换到物理媒介（如纸张）上。在打印过程中，浏览器会根据CSS的@media print规则调整样式，并根据页面大小（通常...
网页打印控件是一种专门用于解决网页打印问题的软件组件，尤其针对那些在尝试打印网页时遇到困难的用户。这类控件通常提供了一种中间层，能够处理网页内容的转换，使其适应打印机的语言和格式，从而确保顺利进行打印...
结合JavaScript库如jQuery或jQuery Print Area，可以在客户端实现网页打印功能。例如，使用`window.print()`函数可以触发浏览器的打印对话框。 至于PDF报表，它们在企业级应用中非常常见，用于生成财务报告、销售...
网页打印控件 Lodop 是一款高效且专业的打印解决方案，尤其适用于网页打印场景。Lodop 2.0 专业精致版在前代的基础上进行了优化，提供了更强大的功能和更精细的用户体验，旨在满足企业级用户的高要求。 Lodop 打印...
Lodop 5.059 是一款备受好评的免费网页打印控件，它专为网页打印需求设计，提供高效且便捷的打印解决方案。在网页应用中，有时我们需要实现复杂的功能，比如多页打印、自定义布局、打印预览等，而Lodop就是为解决...
网页转PDF的目的是为了保存网页内容并保留其布局，防止因浏览器差异导致显示问题。这通常通过Web浏览器的内置功能或第三方库实现。例如，JavaScript库如Puppeteer或PDFKit可以用于服务器端生成PDF，而客户端则可以...
html转pdf(带样式)、网页打印神器。可以实现网页的定制化打印功能，还可以实现html转pdf，并且能保留样式。
在IT领域，网页打印是一个非常实用的功能，尤其对于那些需要将网页内容转化为纸质文档的用户而言。本资源“WBP.rar”包含了一个名为“WBP”的程序，它专门设计用于实现网页打印。这个程序的经典之处在于它提供了一种...
在实际应用中，用户可能会遇到将Word文档转换为图片格式的需求，以便于网页展示或打印。然而，在进行这种转换后，有时会发现图片在打印时显得模糊不清，这可能是由于多种因素导致的。 首先，我们需要了解图片质量...