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 Löschen einer Gruppe aus der Administratorengruppe

Mitglied: 30323

30323 (Level 1)

19.07.2006, aktualisiert 26.07.2006, 5006 Aufrufe, 4 Kommentare

Eine Domaingruppe soll aus der lokalen Administratorengruppe eines Rechners gelöscht werden.

Hallo liebe Allwissende,

die zu löschende Gruppe ist in einer Domain. Die Administratorgruppe liegt lokal auf dem Rechner. Ich habe mich nun mit folgendem VBA - Code versucht:

Private Sub CommandButton2_Click()
'strDomain = Cells(1, 4)
strGroup = Cells(8, 1)
strComputer = Cells(2, 4)
'Set objAdmins = GetObject("WinNT://" & strDomain & "/" & strGroup & "")
Set objComputer = GetObject("WinNT://" & strComputer & "")
objComputer.Filter = Array("Group")
For Each objGroup In objComputer
If objGroup.class = "Group" Then
If objGroup.Name = "Administratoren" Or objGroup.Name = "Administrators" Then
For Each objUser In objGroup.members
If objUser.Name = strGroup Then
objGroup.Delete (objUser.ADsPath)
Exit For
End If
Next
Exit For
End If
End If
Next
Set objUser = Nothing
Set objGroup = Nothing
Set objComputer = Nothing
'Set objAdmins = Nothing
End Sub


Ich habe es bereits geschafft mit ähnlichem Code die Gruppe hinzuzufügen, wenn ich sie manuell gelöscht habe. Nun möchte ich sie aber von meinem Programm löschen lassen.

Bitte helft mir.
Mit freundlichem Gruß, OSka


Edit: Vielleicht hilft Euch ja die Fehlermeldung (mir nämlich nicht so richitg).

Laufzeitfehler '438':
Objekt unterstützt diese Eigenschaft oder Methofe nicht

Diese Fehlermeldung kommt bei der Zeile
objGroup.delete
Mitglied: superboh
19.07.2006 um 15:19 Uhr
Hi,

warum machst Du es nicht so:

WshShell.Run "net localgroup administratoren GRUPPE /delete"

Gruß,
Thomas
Bitte warten ..
Mitglied: 30323
21.07.2006 um 14:12 Uhr
Hallo Thomas,

wie genau meinst du das? Soll ich die Zeile so in Excel übernehmen? Was passiert da? Ich möchte hier nicht ausversehen die Administratorengruppe löschen!

Gruß, OSka
Bitte warten ..
Mitglied: superboh
21.07.2006 um 22:50 Uhr
Hi,

such mal in der Onlinehilfe von Windows nach "net localgroup".

Der Befehl "net localgroup administratoren GRUPPE /delete" löscht die Gruppe "GRUPPE" aus der Gruppe Administratoren.

Gruß,
Thomas
Bitte warten ..
Mitglied: 30323
26.07.2006 um 19:13 Uhr
Danke für die Hilfe. Gerade als ich deinen Tipp probieren wollte kam mir noch eine letzte Idee und ich hatte es geschafft. Statt delete muss man remove schreiben. Danach hat es bei mir zumindest geklappt.
Bitte warten ..
Neue Wissensbeiträge
LAN, WAN, Wireless
OPNsense Captive Portal mit vordefnierten Voucher
Tipp von Crusher79 vor 1 TagLAN, WAN, Wireless

Hallo, Ziel war es vorhandene Klienten-Daten (Nummer im System) und Kennwörter anzulegen. Voucher werden durch externes Programm in Papierform ...

Administrator.de Feedback
Entwicklertagebuch: Die nächste Version
Information von admtech vor 2 TagenAdministrator.de Feedback6 Kommentare

Hallo Administrator User, vielleicht haben es einige User schon mitbekommen: Wir arbeiten aktuell an einer komplett neuen Version von ...

Windows Server

Active Directory ESE Version Store Changes in Server 2019

Information von Dani vor 6 TagenWindows Server

Moin, Last month at Microsoft Ignite, many exciting new features rolling out in Server 2019 were talked about. But ...

Exchange Server

Microsoft Extending End of Support for Exchange Server 2010

Information von Dani vor 6 TagenExchange Server5 Kommentare

Moin, After investigating and analyzing the deployment state of an extensive number of Exchange customers we have decided to ...

Heiß diskutierte Inhalte
Router & Routing
Anmeldung am Router von einer ext. IP?
Frage von BigSnakeyeRouter & Routing15 Kommentare

Hallo, ich habe gerade seltsames in meiner Fritzbox entdeckt. Plötzlich war die Verbindung unterbrochen - kein Internet. Also habe ...

Windows 10
Win 10 PC blockiert
Frage von tsunamiWindows 1013 Kommentare

Guten Morgen, ich habe ein komisches Problem: Windows 10 Pro PC startet normal. Internet ist für ca. 5 Sekunden ...

Hyper-V
Hyper-V geht die Verbindung zur VM auch ohne RDP?
Frage von DennisWeberHyper-V10 Kommentare

Hallo zusammen, ich habe mir auf meinem Heim-PC eine VM (Win 10) per Hyper-V eingerichtet. Alles auch soweit gut. ...

Batch & Shell
Symbolische links einer Ordnerstruktur
gelöst Frage von FollyxBatch & Shell10 Kommentare

ich möchte von einer Ordnerstruktur von jedem einzelnen Unterordner einen symbolischen Link erstellen lassen. wie kann ich das am ...