Druckereinrichtung an 20 Clients

[civic_mb3 10]

HI,

 

hab da ein Problem. Ich muss ca. 20 Clients einrichten.

Jeder Client hat min. 6 Netzwerkdrucker mit Facheinstellugen. Jetzt meine Frage wie kann ich diesen Aufwand relativ gering halten. Will mir ersparen ca. 120 Drucker einzeln einzurichten.

 

Vieleicht kann ich auch von den alten Clients die Drucker komplett mit Einstellungen übernehmen.

 

Zuerst hatte ich vor, alle Drucker am Server einzurichten und dann über die Freigabe an den Clients einbinden. Das Problem dabei ist allerdings, dass wenn der Server mal down sein sollte, kann kein Client auf die Netzwerkdrucker ausdrucken. Dies ist nur gegeben wenn ich die Drucker direkt ansteuer.

 

Oder täusche ich mich?

Kann mir jemand sagen wie ich das AM bESTEN MANAGEN KANN. Ohne Abhängig vom Server zu sein. Im Netzwerk ist nur 1 Server

 

Gruß

Andy

[Sternenkind 11]

Vielleicht ist das hier noch für dich ausbaufähig?

 

Ich benutze das gerne

 

'----------------------------------------------------------

'Ausblenden eventueller Fehlermeldungen

'----------------------------------------------------------

on error resume next

'----------------------------------------------------------

'Instanzieren des Windows Scripting Hosts

'----------------------------------------------------------

Set Network = CreateObject("Wscript.Network")

 

'----------------------------------------------------------

'Löschen eventuell bestehender Printerconnections

'----------------------------------------------------------

For i = 0 To network.EnumPrinterConnections.Count - 1

On Error Resume Next

network.RemovePrinterConnection network.EnumPrinterConnections.Item(i)

Next

 

 

'Auslesen der ersten 5 Buchstaben des Computernamens

sPCName = UCase(Left(network.ComputerName, 6))

 

'Zuweisen der jeweiligen Drucker sowie des Defaultdruckers

Select Case sPCName

 

'-----------------------------------------------------------

'PCs

'-----------------------------------------------------------

 

Case "PC001"

PrinterShare = "\\server-tzl\Drucker"

network.AddWindowsPrinterConnection PrinterShare

network.SetDefaultPrinter PrinterShare

 

Case "PC002"

PrinterShare = "\\PC002\Drucker"

network.AddWindowsPrinterConnection PrinterShare

network.SetDefaultPrinter PrinterShare

 

 

...

End Select

[substyle 20]

Das hilft bestimmt!

 

Print Migrator 3.1

 

Einfach an einem PC installieren & Rechte bvergeben,

Backup machen und bei den anderen PCs wieder einspielen!

 

Grüße

 

Lars