当前位置: 首页 > 图文教程 > 网络编程 > ASP > WEB打印设置解决方案三

ASP
ASP中用Join和Array,可以加快字符连接速度。
采用ODBC接口访问MySQL指南
最大限度优化你的Asp性能
实现让每句话的头一个字母都大写
如何尽快释放掉Connection对象建立的连接?
把数据插入到数据库的两种方法
Connection对象的应用
查看ASP Session 变量的小工具
用XMLHTTP组件正确解析图片地址并将其保存
利用XMLHTTP 从其他页面获取数据
Request与Request.Form的速度测试
用SOAP和ASP进行服务器端更新
ASP开发网页时需要牢记的注意事项列表
面向对象的ASP技术:思考与实践
提供一种“间接防止另存为”的方法
格式化数字函数FormatNumber
怎么样写一段高效,安全的sql查询代码
关于Adodb.Stream的使用说明
不用EOF以加快记录循环
防止重复提交的巧妙方法

ASP 中的 WEB打印设置解决方案三


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 201 ::
收藏到网摘: 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>