Property Name
Manufacturer
Property Type
String
Description
The printer manufacturer selected for install
Example
Dim ps2 As IPrintServer2
Set ps2 = GetObject("ntds://sqlserverdom/sqlserver")
'Initialize the target machine for installation. This is a
compulsory step, which creates the necessary shares on the target
machine
ps2.Initialize
Dim AllManufacturers
Dim FriendlyNames
AllManufacturers = ps2.PrinterTypes(FriendlyNames)
Dim manufacturer_name
For Each manufacturer_name In FriendlyNames
Debug.Print manufacturer_name
Next manufacturer_name
'Select a manufacturer for installation
ps2.Manufacturer = "Agfa"
See Also