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, 9148 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 ..
Ähnliche Inhalte
Netzwerke
Gast WLAN einrichten (4)

Frage von Hajo2006 zum Thema Netzwerke ...

Windows Userverwaltung
Gleiches Benutzerprofil für Anmeldung an TS und am lokalen System?? (6)

Frage von eastfrisian zum Thema Windows Userverwaltung ...

Neue Wissensbeiträge
RedHat, CentOS, Fedora

Fedora, RedHat, Centos: DNS-Search Domain setzen

(13)

Tipp von Frank zum Thema RedHat, CentOS, Fedora ...

Drucker und Scanner

Samsung SL-M4025ND, firmware update und (kompatible) Tonerkassetten

(1)

Erfahrungsbericht von markus-1969 zum Thema Drucker und Scanner ...

Heiß diskutierte Inhalte
Windows 10
Windows für Privatanwender "nicht mehr handhabbar" (35)

Frage von FA-jka zum Thema Windows 10 ...

LAN, WAN, Wireless
Komplett neues Netzwerk, Ubiquiti WLAN, Router, Switch (15)

Frage von Freak-On-Silicon zum Thema LAN, WAN, Wireless ...

Backup
Backup Wochen- Monats- Jahressicherung (13)

Frage von Meterpeter zum Thema Backup ...

RedHat, CentOS, Fedora
Fedora, RedHat, Centos: DNS-Search Domain setzen (13)

Tipp von Frank zum Thema RedHat, CentOS, Fedora ...