繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > WEB打印设置解决方案三
- ASP
- 关于释放session的两篇文章（一）
- 关于释放session的两篇文章（二）
- 表单填写时用回车代替TAB的实现方式
- DateDiff的用法
- 加快DHTML的一组技巧
- 全面考察“禁用浏览器后退按钮”
- XML加ASP实现网页“本地化”
- 透过ASP修改NT使用者的密码
- 方便购买的电子商务站点设计技巧
- 使用ASPMail组件发送数字卡片
- 聊天室关键技术[用户断线]处理
- 生成类似Windows资源管理器
- 如何将代码生成的文件设为只读
- ASP中巧用存储过程
- 拦截表单的另外一种写法
- ASP实现OICQ式的信息收发功能
- 怎样用HtmlEncode显示Unicode？
- ASP出错集成处理
- ASP.NET中处理datetime的一些通用函数
- ASP.NET实现HTTP方式获取功能
ASP 中的 WEB打印设置解决方案三
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 174 ::
收藏到网摘: n/a
程序代码：
<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>
评论 (0) All
