Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

lokalen Drucker per Script als Standarddrucker einrichten

Frage Microsoft Windows Server

Mitglied: OhnePower

OhnePower (Level 1) - Jetzt verbinden

03.09.2008, aktualisiert 05.09.2008, 9134 Aufrufe, 2 Kommentare

Hallo...

wir haben einige "Wechselarbeitsplätze" in der Firma und ich möchte vermeiden das die Kollegen nach jedem Anmelden den Standarddrucker auswählen müssen weil das direkt beim Drucken aus einer bestimmten Anwendung nicht möglich ist.

Bei Netzwerkdruckern ist das kein Problem aber die lokalen Drucker machen Probleme.

Hier mein Script:

01.
If groupG.IsMember("LDAP://" & username) Then 
02.
   net.AddWindowsPrinterConnection "\\LBX01\HPLJ1200" 
03.
   net.SetDefaultPrinter "\\LBX01\HPLJ1200" 
04.
   Select Case computer 
05.
      Case "KX2510" 
06.
      prog.run "rundll32 printui.dll,PrintUIEntry /y /n " & """" & "Dell Laser Printer 1720dn" & """", 2, true 
07.
      Case "KX2540" 
08.
      prog.run "rundll32 printui.dll,PrintUIEntry /y /n " & """" & "Kyocera FS-1030D" & """", 2, true 
09.
   End Select 
10.
End If
Das Script arbeitet nicht immer zuverlässig. Sieht jemand den Fehler? Kommt XP Prof. evtl. nicht damit klar wenn man "so schnell" nacheinander den Standarddrucker ändert? Geht das Ganze eleganter?
Bitte um Hilfe!


Vielen Dank im Voraus...
Mitglied: Logan000
03.09.2008 um 16:28 Uhr
Moin Moin

Ich sehe zwar keinen Fehler, aber unser Skript läuft soweit "zuverlässig".

01.
Const Druckername = "Brother HL" 
02.
On Error Resume Next 
03.
Set Druckerobjekt = CreateObject("Wscript.Network") 
04.
Druckerobjekt.SetDefaultPrinter Druckername
Gruß L.
Bitte warten ..
Mitglied: OhnePower
05.09.2008 um 23:55 Uhr
Moin

Das zum Thema elegant! Läuft prima.
Vielen Dank!
Bitte warten ..
Neuester Wissensbeitrag
Festplatten, SSD, Raid

12TB written pro SSD in 2 Jahren mit RAID5 auf Hyper-VServer

Erfahrungsbericht von Lochkartenstanzer zum Thema Festplatten, SSD, Raid ...

Ähnliche Inhalte
Batch & Shell
gelöst Batch Drucker Script (3)

Frage von Angelo131095 zum Thema Batch & Shell ...

Batch & Shell
gelöst PowerShell Script Move-Item nach x Tagen (5)

Frage von lupolo zum Thema Batch & Shell ...

Netzwerkgrundlagen
SMB-Scanfreigabe von Xerox-Drucker (8)

Frage von mcdutch zum Thema Netzwerkgrundlagen ...

Windows 10
"geräte und drucker" unter w8 bzw. w10 zu starten dauert ewig (3)

Frage von tobias3355 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (34)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...