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

Freigabedrucker löschen via Script aber nur bestimmte

Frage Entwicklung Batch & Shell

Mitglied: redzack

redzack (Level 1) - Jetzt verbinden

17.06.2010 um 20:52 Uhr, 4563 Aufrufe, 3 Kommentare

Hallo ich habe folgendes Script hier auf der Seite gefunden


01.
  
02.
Set WshNetwork = WScript.CreateObject("WScript.Network"
03.
Set oPrinters = WshNetwork.EnumPrinterConnections 
04.
WScript.Echo "Network printer mappings:"  
05.
For i = 0 to oPrinters.Count - 1 Step 2  
06.
if Left(oPrinters.Item(i+1),2) = "\\" Then _ 
07.
WScript.Echo "Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1) 
08.
Next
Das Script ist soweit ganz gut das es Netzwerkdrucker löscht jedoch habe ich zwei bis drei Drucker die nicht gelöscht werden dürfen am liebsten wäre es mir das ich nur drucker lösche die von einer DOmaine kommen um die von Hand verbundenen Drucker einer anderen Domaine nicht mit zu löschen.

Über Hinweise / Lösungsvorschläge die mich weiterbringen, würde ich mich freuen.

lg
redzack
Mitglied: redzack
18.06.2010 um 10:06 Uhr
Kein Scripter anwesend der mir da weiterhelfen kann?
Bitte warten ..
Mitglied: bastla
19.06.2010 um 00:19 Uhr
Hallo redzack!
Kein Scripter anwesend der mir da weiterhelfen kann?
Du weißt ja wohl, wie das so ist: Mal dauert's lang, dann wieder länger ...

Versuch es etwa so:
01.
Ausnahme = "#Drucker 1#Drucker 2#Drucker 3#" 
02.
Set WshNetwork = WScript.CreateObject("WScript.Network") 
03.
Set oPrinters = WshNetwork.EnumPrinterConnections 
04.
WScript.Echo "Network printer mappings:"  
05.
For i = 0 to oPrinters.Count - 1 Step 2  
06.
if InStr(Ausnahme, "#" & oPrinters.Item(i+1) & "#") = 0 Then _ 
07.
WScript.Echo "Lösche Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1) 
08.
Next
Grüße
bastla
Bitte warten ..
Mitglied: redzack
24.06.2010 um 08:37 Uhr
vielen Dank du hast mir sehr weiter geholfen ;)
Bitte warten ..
Neuester Wissensbeitrag
Off Topic

"Ich habe nichts zu verbergen"

(1)

Erfahrungsbericht von FA-jka zum Thema Off Topic ...

Ähnliche Inhalte
Outlook & Mail
gelöst Bestimmte Anhänge bei E-mails mit Exchange 2010 löschen (5)

Frage von jojo0411 zum Thema Outlook & Mail ...

Outlook & Mail
gelöst Email Anhänge speichern VB Script aber nur bestimmte Dateitypen (Outlook) (4)

Frage von LindeUnimog zum Thema Outlook & Mail ...

Heiß diskutierte Inhalte
Hyper-V
gelöst Reiner Hyper- V Server oder lieber Rolle (32)

Frage von Winuser zum Thema Hyper-V ...

Linux Netzwerk
gelöst DHCP vergibt keine Adressen (30)

Frage von Maik82 zum Thema Linux Netzwerk ...

Exchange Server
gelöst Bestehende eMails autoamatisch weiterleiten (22)

Frage von metal-shot zum Thema Exchange Server ...

Apache Server
gelöst Lets Encrypt SSL mit Apache2 (20)

Frage von banane31 zum Thema Apache Server ...