选择默认打印机的问题

JosephTan · 发表于 2012-2-11 20:12:53

我的附件是一个可以列出默认打印机并选择默认打印机的程序模块和一个窗体.

已经可以实用.
可是还不够完善.我目前只能做到重启access来达到改动默认打印机的目的.能否可以做到不需要重启就能修改到?我对windows script host的理解还不行.

笑嘻嘻哦 · 发表于 2013-1-30 21:00:30

打印机有什么好的效果呢

笑嘻嘻哦 · 发表于 2013-1-27 18:44:28

我家的打印机很正常啊

yzt880 · 发表于 2012-12-26 19:51:51

看我修改的，不用重启就可以设定系统和程序使用默认打印机。

yzt880 · 发表于 2012-12-26 19:51:37

看我修改的，不用重启就可以设定系统和程序使用默认打印机。

JosephTan · 发表于 2012-2-13 17:27:56

本帖最后由 JosephTan 于 2012-2-13 20:36 编辑

那个模块里面的comment我还没有删除呢,版权问题我是不会擅自删除的.
上面有那个人的博客吧.我没有记错的话.里面还有些特别的例子.(悄悄说,我有的东西也从这里拿来卖了)
怎么找到的这个模块?我用google找到的,平时不用百度的,我.

t小宝 · 发表于 2012-2-13 17:04:00

试了GG在17楼的例子，还是不行，代码有逻辑错误，prtDefaultIndex的值不是想要的值，
其实直接使用打印机名称就行了，不需要用公用变量保存打印机ID。
改变ACCESS默认打印机就一句代码：Set Application.Printer =Application.Printers("打印机名称")
我在6楼贴的也有多余，象下面就行了：
Private Sub Combo75_AfterUpdate()
DoCmd.Hourglass True
DefaultPrinter (Me.Combo75)
DoCmd.Hourglass False

Set Application.Printer = Application.Printers(CStr(Me.Combo75))

End Sub

JosephTan · 发表于 2012-2-13 14:59:38

Grant 发表于 2012-2-13 14:37
上传一例子你参考

嗯.所以我在#5说我找到一个重启access的模块,整一块就可以解决.但是我就是不甘心嘛.我也不想改access的默认.
这里有把重启模块用上以后的例子.

Grant · 发表于 2012-2-13 11:37:10

上传一例子你参考

Grant · 发表于 2012-2-13 11:20:17

Access每次打开都会读取一次系统默认打印机,所以就照成了你为什么需要一定重启一次ACCESS,你可以采用
更改Access默认的打印机,也可以更改系统默认打印机后,重启Access重新加载打印机或者再次更改Access默认打印机

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[API] 选择默认打印机的问题

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

点评

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)