Megosztás a következőn keresztül:


Útmutató: Nyomtató klónozása

A legtöbb vállalat egy bizonyos ponton több nyomtatót vásárol ugyanabból a modellből. Ezek általában gyakorlatilag azonos konfigurációs beállításokkal vannak telepítve. Az egyes nyomtatók telepítése időigényes és hibalehetőséget jelenthet. A Microsoft .NET-keretrendszerrel közzétett System.Printing.IndexedProperties névtér és InstallPrintQueue osztály lehetővé teszi a meglévő nyomtatási üzenetsorokból klónozott további nyomtatási üzenetsorok azonnali telepítését.

példa

Az alábbi példában egy második nyomtatási üzenetsor klónozása egy meglévő nyomtatási üzenetsorból történik. A második csak a névben, a helyen, a portban és a megosztott állapotban különbözik az elsőtől. Ennek fő lépései a következők.

  1. Hozzon létre egy PrintQueue objektumot a klónozni kívánt meglévő nyomtatóhoz.

  2. Hozzon létre egy PrintPropertyDictionary a PropertiesCollectionPrintQueue-ból. A szótár minden bejegyzésének Value tulajdonsága egy olyan objektum, amely a PrintProperty-ből származó valamelyik típushoz tartozik. A szótárban kétféleképpen állíthatja be egy bejegyzés értékét.

    • Használja a szótár Eltávolítás, és Add metódusait a bejegyzés eltávolításához, majd adja hozzá újra a kívánt értékkel.

    • Használja a szótár SetProperty metódusát.

    Az alábbi példa mindkét módszert szemlélteti.

  3. Hozzon létre egy PrintBooleanProperty objektumot, és állítsa a Name "IsShared" értékre, Value pedig true.

  4. Használja a PrintBooleanProperty objektumot az PrintPropertyDictionary"IsShared" bejegyzésének értékeként.

  5. Hozzon létre egy PrintStringProperty objektumot, és állítsa a Name a "ShareName" értékre, a Value pedig egy megfelelő String.

  6. Használja a PrintStringProperty objektumot a PrintPropertyDictionary"ShareName" bejegyzésének értékeként.

  7. Hozzon létre egy másik PrintStringProperty objektumot, és állítsa be a Name-et "Hely" értékre, a Value-t pedig egy megfelelő String-ra.

  8. Használja a második PrintStringProperty objektumot a PrintPropertyDictionary"Hely" bejegyzésének értékeként.

  9. Hozzon létre egy Stringtömböt. Minden elem a kiszolgálón lévő port neve.

  10. A InstallPrintQueue használatával telepítse az új nyomtatót az új értékekkel.

Alább látható egy példa.

LocalPrintServer myLocalPrintServer = new LocalPrintServer(PrintSystemDesiredAccess.AdministrateServer);
PrintQueue sourcePrintQueue = myLocalPrintServer.DefaultPrintQueue;
PrintPropertyDictionary myPrintProperties = sourcePrintQueue.PropertiesCollection;

// Share the new printer using Remove/Add methods
PrintBooleanProperty shared = new PrintBooleanProperty("IsShared", true);
myPrintProperties.Remove("IsShared");
myPrintProperties.Add("IsShared", shared);

// Give the new printer its share name using SetProperty method
PrintStringProperty theShareName = new PrintStringProperty("ShareName", "\"Son of " + sourcePrintQueue.Name +"\"");
myPrintProperties.SetProperty("ShareName", theShareName);

// Specify the physical location of the new printer using Remove/Add methods
PrintStringProperty theLocation = new PrintStringProperty("Location", "the supply room");
myPrintProperties.Remove("Location");
myPrintProperties.Add("Location", theLocation);

// Specify the port for the new printer
String[] port = new String[] { "COM1:" };

// Install the new printer on the local print server
PrintQueue clonedPrinter = myLocalPrintServer.InstallPrintQueue("My clone of " + sourcePrintQueue.Name, "Xerox WCP 35 PS", port, "WinPrint", myPrintProperties);
myLocalPrintServer.Commit();

// Report outcome
Console.WriteLine("{0} in {1} has been installed and shared as {2}", clonedPrinter.Name, clonedPrinter.Location, clonedPrinter.ShareName);
Console.WriteLine("Press Return to continue ...");
Console.ReadLine();
Dim myLocalPrintServer As New LocalPrintServer(PrintSystemDesiredAccess.AdministrateServer)
Dim sourcePrintQueue As PrintQueue = myLocalPrintServer.DefaultPrintQueue
Dim myPrintProperties As PrintPropertyDictionary = sourcePrintQueue.PropertiesCollection

' Share the new printer using Remove/Add methods
Dim [shared] As New PrintBooleanProperty("IsShared", True)
myPrintProperties.Remove("IsShared")
myPrintProperties.Add("IsShared", [shared])

' Give the new printer its share name using SetProperty method
Dim theShareName As New PrintStringProperty("ShareName", """Son of " & sourcePrintQueue.Name & """")
myPrintProperties.SetProperty("ShareName", theShareName)

' Specify the physical location of the new printer using Remove/Add methods
Dim theLocation As New PrintStringProperty("Location", "the supply room")
myPrintProperties.Remove("Location")
myPrintProperties.Add("Location", theLocation)

' Specify the port for the new printer
Dim port() As String = { "COM1:" }


' Install the new printer on the local print server
Dim clonedPrinter As PrintQueue = myLocalPrintServer.InstallPrintQueue("My clone of " & sourcePrintQueue.Name, "Xerox WCP 35 PS", port, "WinPrint", myPrintProperties)
myLocalPrintServer.Commit()

' Report outcome
Console.WriteLine("{0} in {1} has been installed and shared as {2}", clonedPrinter.Name, clonedPrinter.Location, clonedPrinter.ShareName)
Console.WriteLine("Press Return to continue ...")
Console.ReadLine()

Lásd még