Moin,
folgendes Problem ich möchte ein Script schreiben welches einen Domänen Benutzer in die Gruppe der Lokalen Adminstratoren hinzufügt.
Dieses Script liest den Usernamen aus einer TXT Datei aus.
Das was ich bisher gemacht habe funktioniert auch aber nur wenn der User der das Script ausführt schon an der Domäne angemeldet ist.
Ich möchte das Script allerdings von unserem lokalen Administrator Konto ausführen lassen. Mit anderen Worten mein Script muss sich irgendwie authentifizieren.
Kann mir da wer helfen?
Hier mal das was ich bisher habe:
Set oWshNet = CreateObject("WScript.Network")
strdatei="c:\user.txt"
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTest = objFSO.GetFile(strdatei)
If objTest.Size > 0 Then
Set objFile = objFSO.OpenTextFile(strdatei, ForReading)
strText = objFile.ReadAll
objFile.Close
end if
DIM sUser
sUser = strText
sNetBIOSDomain = <<Domainname>>
sComputer = oWshNet.ComputerName
Set oGroup = GetObject("WinNT://" & sComputer & "/Administratoren,group")
Set oUser = GetObject("WinNT://" & sNetBIOSDomain & "/" & sUser & ",user")
' suppress errors in case the user is already a member
On Error Resume Next
oGroup.Add(oUser.ADsPath)
On Error Goto 0