Jump to content

PortMs

Members
 Profil anzeigen  Aktivitäten des Benutzers anzeigen

  • Gesamte Inhalte

    1

  • Registriert seit

  • Letzter Besuch

Profile Fields

  • Member Title
    Newbie

Fortschritt von PortMs

Newbie

Newbie (1/14)

  • Erste Antwort
  • Eine Woche dabei
  • Einen Monat dabei
  • 1 Jahre dabei
  • 5 Jahre dabei!

Neueste Abzeichen

10

Reputation in der Community

  1. PortMs
    Auf diese Weise trennt man die Verbindung sämtlicher Netzwerkdrucker, welche an einer IP-Adresse angeschlossen sind. Allfällige lokale Drucker mit Freigaben (Namensspace) werden so nicht getrennt. Set objNetwork = Wscript.CreateObject("WScript.Network") Set selPrinter = objNetwork.EnumPrinterConnections Dim FlagPrinter For i = 0 to selPrinter.Count -1 Step 2 FlagPrinter = selPrinter.Item(i) & vTab & selPrinter.Item(i+1) if left(FlagPrinter,3) = "IP_" then objNetwork.RemovePrinterConnection mid(FlagPrinter,16,100) end if Next
×
×
  • Neu erstellen...