Top-Themen

Aktuelle Themen (A bis Z)

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

Standard Druckerauswahl über Script.

Frage Entwicklung VB for Applications

Mitglied: keitel

keitel (Level 1) - Jetzt verbinden

09.01.2008, aktualisiert 10.01.2008, 8079 Aufrufe, 3 Kommentare

Hallo Leutz

Wir Arbeiten mit Offert Programmen und hatten mit Window NT keine probleme.

Jetzt haben wir Windows XP Sp2 und diese Offert programme nehmen nur den Standart Drucker zur Kenntnis,

4 Drucker vorhanden

Unser Problem die clienten müssen immer Umständlich die einzelnen Drucker je nach gebrauch über die Drucker einstellungen ändern.

Wir haben in NT zeiten ein script gehabt aber das greift nicht unter XP siehe unten.

Bitte um Hilfestellung.

mfg
Keitel

03b29544a21880442503d71c0902d149-stprint - Klicke auf das Bild, um es zu vergrößern


01.
02.
; StandardDruckerauswahl 
03.
04.
#SingleInstance ignore 
05.
 
06.
; -- In der Registry nachschauen welcher Drucker als Standard eingestellt ist 
07.
RegRead, DRU_STD, HKCU, Software\Microsoft\Windows NT\CurrentVersion\Windows, Device 
08.
StringSplit, Word_Array, DRU_STD, `, 
09.
StringReplace, DRU_STD, Word_Array1, \\ 
10.
 
11.
; -- Aus der Registry auslesen welche Drucker installiert sind 
12.
prnCount = 0 
13.
prnNames = 
14.
Loop, HKCU, Software\Microsoft\Windows NT\CurrentVersion\PrinterPorts, 1 
15.
16.
   StringReplace, Drucker, A_LoopRegName, " 
17.
;" 
18.
   prnCount += 1 
19.
   prnNames = %prnNames%%Drucker%| 
20.
   If Drucker = %DRU_STD% 
21.
      prnDefault = %prnCount% 
22.
23.
;prnCount += 1 
24.
IfGreater, prnCount, 10 
25.
   prnCount = 10 
26.
 
27.
; -- ComboBox 
28.
Gui, Color, F4F3FF 
29.
 
30.
Gui, Font, s8, Verdana 
31.
Gui, Add, Text, xp+130 yp+010 cRed, Der Ausgewählte Drucker ist im`nMoment der StandardDrucker! 
32.
Gui, Font, s10, Verdana 
33.
Gui, Add, Button, xp-130 yp+000 gSelect default, &Drucker wählen 
34.
Gui, Add, ListBox, xp+000 yp+040 w320 R%prnCount% Choose%prnDefault% Sort gPrinter vPrinter, %prnNames% 
35.
Gui, Show, , StandartDruckerauswahl 
36.
Return 
37.
 
38.
; -- Drucker mit DoppelClick ausgewählt 
39.
Printer: 
40.
   If A_GuiControlEvent <> DoubleClick 
41.
      Return 
42.
 
43.
; -- Den ausgewählten Drucker anzeigen 
44.
Select: 
45.
   GuiControlGet, Printer 
46.
   MsgBox, 64, StandartDruckerauswahl, Als StandardDrucker wurde: "%Printer%" ausgewählt!, 5 
47.
   Run, %windir%\system32\RUNDLL32.exe PRINTUI.DLL`,PrintUIEntry /y /n "%Printer%" 
48.
   ExitApp 
49.
 
50.
; -- Programm beenden 
51.
GuiEscape: 
52.
GuiClose: 
53.
ExitApp 
Mitglied: Logan000
09.01.2008 um 14:06 Uhr
Wir setzen den Standarddrucker per VB skript.
01.
on Error resume next 
02.
Set WshNetwork = CreateObject("WScript.Network") 
03.
drucker = "Druckername" 
04.
WshNetwork.SetDefaultPrinter(drucker)
Aber wozu benötigt Ihr dieses Skript? Ich sehe nicht das dies Skript wesentlich schneller ist als die Druckerverwaltung von XP?
Bitte warten ..
Mitglied: keitel
09.01.2008 um 15:22 Uhr
@Logan000
Erstmals Danke für die Schnelle Hilfe.

Es sollte so einfach wie möglich sein.

Deine Script anleitung funktioniert bis auf das man den Nezterkprinter nicht zurückstellen kann auf Default

Habe mich schlecht ausgedrückt.(Sorry)

Es sind ein Netzwerkdrucker (Standart + 4 PDF Drucker von gotomaxx)

Wenn ich dein script ausführe (für jeden drucker ein script) kann ich zwischen drei drucker schalten.
beim 4 drucker (Netzwerkdrucker) funkt es nicht.


Aber wozu benötigt Ihr dieses Skript? Ich sehe nicht das dies Skript wesentlich schneller ist als die Druckerverwaltung von XP?


Damit die User nicht abgelenkt werden 1 klick und fertig. Scripte liegen jeweils auf dem Desktop.

mfg
Keitel
Bitte warten ..
Mitglied: Logan000
10.01.2008 um 09:39 Uhr
Tatsächlich verwenden wir das Skript auch nur für Lokale Drucker.
Und auch nicht zum wechseln des Standart Druckers sondern als Defaulteinstellung.
Bitte warten ..
Ähnliche Inhalte
Entwicklung
Druckerauswahl bei Anmeldung
Frage von christian11133Entwicklung4 Kommentare

Hallo ich bin relative neu in der IT und habe da mal eine Frage. Wir setzen in unserer Firma ...

VB for Applications
Script um Drucker als Standard zu definieren
gelöst Frage von Rabauke84VB for Applications6 Kommentare

Hallo zusammen, wir haben VMware View im Einsatz mit ZeroClients (OS Windows 7 Prof). Die User weisen sich daher ...

Batch & Shell
Druckerverwaltung mit Druckerauswahl per Batch
gelöst Frage von WiSchBatch & Shell5 Kommentare

Hallo. Ich möchte gerne ein Batch-Script erstellen, mit welchem ich die Druckerverwaltung für einen bestimmten Drucker aufrufen kann: Der ...

Microsoft Office
Keine Druckerauswahl in Project 2013
gelöst Frage von MacgregSMicrosoft Office1 Kommentar

servus zusammen, bei einem kunden tut sich auf einem rechner ein seltsames problem auf: in ms project 2013 (egal ...

Neue Wissensbeiträge
Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 34 MinutenWindows 10

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Sicherheits-Tools

Achtung: Sicherheitslücke im FortiClient VPN-Client

Tipp von kgborn vor 2 StundenSicherheits-Tools

Ich weiß nicht, wie häufig die NextGeneration Endpoint Protection-Lösung von Fortinet in deutschen Unternehmen eingesetzt wird. An dieser Stelle ...

Internet

USA: Die FCC schaff die Netzneutralität ab

Information von Frank vor 16 StundenInternet2 Kommentare

Jetzt beschädigt US-Präsident Donald Trump auch noch das Internet. Der neu eingesetzte FCC-Chef Ajit Pai ist bekannter Gegner einer ...

DSL, VDSL

ALL-BM200VDSL2V - Neues VDSL-Modem mit Vectoring von Allnet

Information von Lochkartenstanzer vor 20 StundenDSL, VDSL1 Kommentar

Moin, Falls jemand eine Alternative zu dem draytek sucht: Gruß lks

Heiß diskutierte Inhalte
Netzwerkmanagement
Mehrere Netzwerkadapter in einem PC zu einem Switch zusammenfügen
Frage von prodriveNetzwerkmanagement21 Kommentare

Hallo zusammen Vorweg, ich konnte schon einige IT-Probleme mit Hilfe dieses Forums lösen. Wirklich klasse hier! Doch für das ...

Hardware
Links klick bei Maus funktioniert nicht
gelöst Frage von Pablu23Hardware16 Kommentare

Hallo erstmal. Ich habe ein Problem mit meiner relativ alten maus jedoch denke ich nicht das es an der ...

Windows Server
Anmeldung direkt am DC nicht möglich
Frage von ThomasGrWindows Server16 Kommentare

Hallo, ich habe bei unserem Server 2016 Standard ein Problem. Keine Ahnung wie das auf einmal passiert ist. Ich ...

TK-Netze & Geräte
VPN-fähige IP-Telefone
Frage von the-buccaneerTK-Netze & Geräte14 Kommentare

Hi! Weiss noch jemand ein VPN-fähiges IP-Telefon mit dem man z.B. einen Heimarbeitsplatz gesichert anbinden könnte? Habe nur einen ...