4
Anmeldeskript für Drucker
Hallo zusammen
Ich möchte ein Anmeldeskript machen, das mir alle Drucker zuerst enfernt (um zu vermeiden dass falsche drin sind, dann die richtigen verbindet. Wie geht das:
1. Habe keinen Server
Arbeitsgruppe: 2Ö1P5S5SABBER92
Drucker 1: \\Pc-nnpejvwauwra\Druckerf.
Drucker 2: \\Pc-d0a8942ed5aa\IE37
Drucker 3: \\Pc-b3rzguruwy2\IE36
(Diese 3 PC's + Pc-d0a8942ed5aa sind im Netzwerk)
Vielen Dank
Ich möchte ein Anmeldeskript machen, das mir alle Drucker zuerst enfernt (um zu vermeiden dass falsche drin sind, dann die richtigen verbindet. Wie geht das:
1. Habe keinen Server
Arbeitsgruppe: 2Ö1P5S5SABBER92
Drucker 1: \\Pc-nnpejvwauwra\Druckerf.
Drucker 2: \\Pc-d0a8942ed5aa\IE37
Drucker 3: \\Pc-b3rzguruwy2\IE36
(Diese 3 PC's + Pc-d0a8942ed5aa sind im Netzwerk)
Vielen Dank
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 11256
Url: https://administrator.de/contentid/11256
Printed on: April 20, 2024 at 04:04 o'clock
4 Comments
Latest comment
Du schreibst nicht, welche OS zu einsetzt.
Man darf aber wohl annehmen dass es sich um XP handelt.
Das Script trennt deine 3 Drucker und verbindet sie dann erneut,
Abschließend wird der an Pc-nnpejvwauwra angeschlossene als Standard gesetzt.
' ~~~~~~~~~~~~~
' ConnectPrinter.vbs
' ~~~~~~~~~~~~~
Option Explicit
On Error Resume Next
Dim WshNetwork
Set WshNetwork = Wscript.CreateObject("Wscript.Network")
WshNetwork.RemovePrinterConnection "\\Pc-nnpejvwauwra\Druckerf."
WshNetwork.RemovePrinterConnection "\\Pc-d0a8942ed5aa\IE37"
WshNetwork.RemovePrinterConnection "\\Pc-b3rzguruwy2\IE36"
WshNetwork.AddWindowsPrinterConnection "\\Pc-nnpejvwauwra\Druckerf."
WshNetwork.AddWindowsPrinterConnection "\\Pc-d0a8942ed5aa\IE37"
WshNetwork.AddWindowsPrinterConnection "\\Pc-b3rzguruwy2\IE36"
WshNetwork.SetDefaultPrinter "\\Pc-nnpejvwauwra\Druckerf."
Set WshNetwork = Nothing
' ~~~~~~~~~~~~~
PS: Glückwunsch zu den Rechnernamen
Was hast du da genommen; Hashwerte?
Man darf aber wohl annehmen dass es sich um XP handelt.
Das Script trennt deine 3 Drucker und verbindet sie dann erneut,
Abschließend wird der an Pc-nnpejvwauwra angeschlossene als Standard gesetzt.
' ~~~~~~~~~~~~~
' ConnectPrinter.vbs
' ~~~~~~~~~~~~~
Option Explicit
On Error Resume Next
Dim WshNetwork
Set WshNetwork = Wscript.CreateObject("Wscript.Network")
WshNetwork.RemovePrinterConnection "\\Pc-nnpejvwauwra\Druckerf."
WshNetwork.RemovePrinterConnection "\\Pc-d0a8942ed5aa\IE37"
WshNetwork.RemovePrinterConnection "\\Pc-b3rzguruwy2\IE36"
WshNetwork.AddWindowsPrinterConnection "\\Pc-nnpejvwauwra\Druckerf."
WshNetwork.AddWindowsPrinterConnection "\\Pc-d0a8942ed5aa\IE37"
WshNetwork.AddWindowsPrinterConnection "\\Pc-b3rzguruwy2\IE36"
WshNetwork.SetDefaultPrinter "\\Pc-nnpejvwauwra\Druckerf."
Set WshNetwork = Nothing
' ~~~~~~~~~~~~~
PS: Glückwunsch zu den Rechnernamen
Was hast du da genommen; Hashwerte?
Hallo,
Ich bin recht neu auf diesem Gebiet und habe unsere Drucker in der EDV mit diesem Script
eingerichtet. Das funktioniert wunderbar. Habt ihr Quellen oder weite Bespiele wo man was
über diese Sript nachlesen kann? ( schächte einrichten usw. )
Greetz,
WaRCraFt
Ich bin recht neu auf diesem Gebiet und habe unsere Drucker in der EDV mit diesem Script
eingerichtet. Das funktioniert wunderbar. Habt ihr Quellen oder weite Bespiele wo man was
über diese Sript nachlesen kann? ( schächte einrichten usw. )
Greetz,
WaRCraFt
Guy Thomas bspw. http://www.computerperformance.co.uk/
und natürlich das MS Scripting Center
http://www.microsoft.com/technet/scriptcenter/default.mspx
und natürlich das MS Scripting Center
http://www.microsoft.com/technet/scriptcenter/default.mspx
Hi,
ohne mich jetzt selber zu loben. Eine Anleitung zum Einbinden von Druckern via Kix, gibt es ein Tutorial von mir.
Anleitung: Anmeldeskript mit Kix erstellen -Part 1- Drucker und Laufwerke
Gruß Miguel
ohne mich jetzt selber zu loben. Eine Anleitung zum Einbinden von Druckern via Kix, gibt es ein Tutorial von mir.
Anleitung: Anmeldeskript mit Kix erstellen -Part 1- Drucker und Laufwerke
Gruß Miguel
