如何在VB程序中，打开某个指定打印机的属性窗口？

Question

PrinterProperties VB声明 
Declare Function PrinterProperties Lib "winspool.drv" Alias "PrinterProperties" (ByVal hwnd As Long, ByVal hPrinter As Long) As Long 
说明 
启动打印机属性对话框，以便对打印机进行配置 
返回值 
Long，非零表示成功，零表示失败。会设置GetLastError 
参数表 
参数 类型及说明 
hwnd Long，对话框的父窗口 
hPrinter Long，一个已打开的打印机的句柄 
注解 
如打印机打开的时候没有使用足够的访问权限，对话框的有些功能也许会禁止使用
 
OpenPrinter VB声明 
Declare Function OpenPrinter Lib "winspool.drv" Alias "OpenPrinterA" (ByVal pPrinterName As String, phPrinter As Long, pDefault As PRINTER_DEFAULTS) As Long 
说明 
打开指定的打印机，并获取打印机的句柄 
返回值 
Long，非零表示成功，零表示失败。会设置GetLastError 
参数表 
参数 类型及说明 
pPrinterName String，要打开的打印机的名字 
phPrinter Long，用于装载打印机的句柄 
pDefault PRINTER_DEFAULTS，这个结构保存要载入的打印机信息 PRINTER_DEFAULTS——请参考OpenPrinter函数 类型定义 
Type PRINTER_DEFAULTS 
pDatatype As String
pDevMode As Long
DesiredAccess As Long
End Type 
说明 
This structure specifies default information for a printer. 
字段表 
字段 类型及说明 
pDatatype String，打印机使用的默认数据类型的名字。可设为vbNullString，表示使用当前的默认配置 
pDevMode Long，打印机默认配置信息的一个地址。可设为零，表示使用当前默认设置 
DesiredAccess Long，PRINTER_ACCESS_ADMINISTER 或 PRINTER_ACCESS_USE，或者是一个常规的安全值（取决于您是需要配置打印机，还是仅仅访问它） 你看着怎么用这2个函数吧

Answer 1

----------------------------------------------------------------
注解 
如打印机打开的时候没有使用足够的访问权限，对话框的有些功能也许会禁止使用
----------------------------------------------------------------
我有试过，但是显示出来的属性对话框，只有“About”一项，其他选项一个都没有，大概就是没有使用足够的访问权限，请问应该如何设置“足够的访问权限”呢？急急急急！！！！
请帮忙！！！！

Answer 2

1、使用commdialog控件
2、本人开发一个打印机属性的Dll文件，可以发给你

Answer 3

My Email : [email protected] you!