Netzwerkdrucker per script entfernen ?

hallo expertInnen

ich kenne zwar die funktion:
RemovePrinterConnection

Syntax Sub RemovePrinterConnection(ByVal bstrName As String)

bstrName = Printerport, dem der Netzwerkdrucker bisher zugeordnet ist

Beispiel:
set wshnet = CreateObject(„WScript.Network“)
wshnet.RemovePrinterConnection „LPT1:“

aber damit kann ich doch keine netzwerkdrucker löschen, weil ich da doch keinen printerport angeben kann. irgendwie paradox für mich. kennt jemand eine möglichkeit, netzwerkdrucker zu entfernen? danke und

gruß stefan

Hallo Stefan,

bei uns bekommt jeder User seine Netzwerdrucker beim Einloggen abgenommen und wieder über eine ini (die sich aktualisieren lässt) zugewiesen.
Den hoffentlich richtigen Programmausschnitt siehst du unten.

Gruß
Carlos

'Gruppe PDRUCKNEU entscheidet über neues Verfahren
if objCurrentUser.InGroup(„PDRUCKNEU“) then
'alle Printer Connection löschen
On Error Resume Next
Set regConnections = ALScript.Registry
regConnections.DeleteKey „Printers\Connections“
'Key Connections wieder anlegen
objWshShell.RegWrite „HKEY_CURRENT_USER\Printers\Connections“,""
Set regConnections = Nothing
On Error Goto 0
else
'altes Verfahren
’ Falschen Eintrag unter Connections löschen, falls er existiert
On Error Resume Next
if ALScript.RegUserKeyExist(„Printers\Connections,“) Then
Set regConnections = ALScript.Registry
regConnections.DeleteKey „Printers\Connections,“
Set regConnections = Nothing
end if
On Error Goto 0
end if

Hallo Carlos

euer script verwendet eine selbstgebaute oder zuge"kaufte" dll namens ALScript. sowas hätten wa ja auch rumliegen, ist aber halt nicht so meins. ich hätt lieber windows-eigene mittel (dann läufts halt „überall“), und vbs kann leider registry-keys mit unterschlüsseln nicht löschen.
und an die unterschlüssel komm ich nicht, weil vbs ebensolche nicht auflisten kann (wieder nur über zusatz-tools)

IST DAS NICHT EIN TEUFELSKREIS *ggg*

trotzdem danke und
gruß stefan

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]