thekingofqueens
Goto Top

Desktop Shortcut zum wechseln des Standarddruckers

Win XP Pro SP2, 2 Drucker per LPT

Hallo,

gibt es eine Möglichkeit ne Verknüpfung auch den Dekstop zu bekommen die nach nem Doppelklick den Standarddrucker ändert? Also von Drucker 1 an LPT 1 zu Drucker 2 an LPT 3.

Danke.

Content-ID: 44683

Url: https://administrator.de/forum/desktop-shortcut-zum-wechseln-des-standarddruckers-44683.html

Ausgedruckt am: 22.12.2024 um 23:12 Uhr

bastla
bastla 16.11.2006 um 21:34:49 Uhr
Goto Top
Hallo thekingofqueens!

'SetDefaultPrinter.vbs  
strComputer = "."  
Set objWMIService = GetObject("winmgmts:" _  
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")  

Set colInstalledPrinters =  objWMIService.ExecQuery _
    ("Select * from Win32_Printer Where Name = 'PDFCreator'")  

For Each objPrinter in colInstalledPrinters
    objPrinter.SetDefaultPrinter()
Next
'PDFCreator' (einfache Anführungszeichen) durch den gewünschten Drucker ersetzen und entweder das Script selbst oder einen Shortcut auf dem Desktop platzieren.

HTH
bastla