win2000中的打印设置问题

Question

在WIN98+VB6中可以用showprinter方法调用打印设置对话框，并可以改变printer对象的width及height属性，但是这种方法在WIN2000中无效，请问在WIN2000+VB6中该如何编程才能调用有效的页面设置对话框，谢谢！我的代码如下：
             CommonDialog1.Flags = cdlPDPrintSetup
             CommonDialog1.ShowPrinter
             MsgBox Printer.DeviceName
             MsgBox Printer.Height / 567
             MsgBox Printer.Width / 567
             MsgBox Printer.Orientation
    我的主要目的是要通过打印设置对话框来改变纸张大小和方向，即改变printer对象的width及height属性，以便在预览窗口中显示相应的纸张大小和方向。

Answer 1

我也遇到  没解决
上顺便问下 怎么得到当前打印机支持的纸张的所有类型  及其 信息

Answer 2

2000及以后版本操作系统的自定义纸张不是在程序中设置的,而是由操作系统本身来设置的.
进入到操作系统的打印机设置中(注意是通过控制面板中的那个打印机设置)
在空白的地方按鼠标右键,选择'服务器属性"
看到那个"创建新格式"的东西了吗?
对,就是它了,钩选它,在样式名称中写上你自定义纸张的名称,再在大小中设置纸张的大小,完成后保存格式
这样,你以后就可以在打印设置中直接选择到你自定义的纸张了.

Answer 3

恩。楼上的方法正确。
但我不能在所有的客户端都设置纸张属性啊。
或者客户如果重装完系统，还得重设一遍，
有何更好的方法？？
谢谢！！