Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何指定打印机？


  共有9051人关注过本帖树形打印复制链接

主题：如何指定打印机？
帅哥哟，离线，有人找我吗？
cubaren
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：3 积分：133 威望：0 精华：0 注册：2012/2/19 14:17:00 		如何指定打印机？  发帖心情 Post By：2012/4/13 20:02:00 [只看该作者]

如何指定打印机

 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2012/4/13 20:53:00 [只看该作者]

指定打印机

如果安装了多个打印机，且需要在非默认打印机上打印，可以设置PrintDoc的PrinterName属性，在指定的打印机上打印。

例如

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
rt.Text = "Hello Foxtable"
doc.Body.Children.Add(rt)
Doc.PrinterName = "HP LaserJet 6L"
doc.Print()


 回到顶部
帅哥哟，离线，有人找我吗？
scbekserver
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：15 积分：197 威望：0 精华：0 注册：2012/2/15 11:43:00 		  发帖心情 Post By：2012/4/14 10:14:00 [只看该作者]

可以指定同时在多台打印机上打印吗？

 回到顶部
帅哥哟，离线，有人找我吗？
sloyy
 小大  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2193 积分：13908 威望：0 精华：2 注册：2012/2/25 10:59:00 		  发帖心情 Post By：2012/4/15 20:43:00 [只看该作者]

可以 复制一遍代码 修改打印机名

 回到顶部
帅哥哟，离线，有人找我吗？
don
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1812 积分：12999 威望：0 精华：14 注册：2008/10/11 18:07:00 		  发帖心情 Post By：2012/4/16 11:45:00 [只看该作者]

以下是引用sloyy在2012-4-15 20:43:00的发言：
可以 复制一遍代码 修改打印机名
生成PrintDoc的代碼不用重複!
Dim doc As New PrintDoc
Dim rt As New prt.RenderText
rt.Text = "Hello Foxtable" 
doc.Body.Children.Add(rt) 
Dim PtNames As String() = {"HP LaserJet 3050 Series PCL 6","Foxit PDF Printer"}
For each ptn as string in Ptnames
     Doc.PrinterName =  ptn
     doc.Print() 
Next
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询