标题：请问有没有打印机重命名的方法？

1楼

km007 发表于：2023/12/1 14:30:00

例如我想将已安装的指定打印机 HP1001 重命名为 HP12345，请问这个如何写代码呢？

[此贴子已经被作者于2023/12/1 14:43:20编辑过]

2楼

有点蓝 发表于：2023/12/1 15:09:00

代码

Dim mc As New System.Management.ManagementClass("Win32_Printer")

Dim moc = mc.GetInstances()

For Each mo As System.Management.ManagementObject In moc

Output.Show( mo.Properties("name").Value.ToString())

If mo.Properties("name").Value.ToString() = "HP1001" Then

mo.InvokeMethod("RenamePrinter", New Object(){ "HP12345" })

End If

3楼

km007 发表于：2023/12/1 15:21:00

ok 谢谢

共3 条记录, 每页显示 10 条, 页签: [1]