Ajout d'un utilisateur en tant que administrateur sur des machine sous domaine

Commenter

Contenu du snippet

voila un autre petit script qui doit être exécuter sur le serveur et qui ajoute des utilisateur en tant que administrateur sur les machine liste dans le fichier fichier1.txt

Source / Exemple : 


' VBScript source code
on error resume next

''''''''''''''ouverture du fichier d'erreur pour savoire les nom de machine inaccessible
Set def = CreateObject("Scripting.FileSystemObject")
set defaut = def.OpenTextFile("erreurs.txt",2 ,true)

defaut.writeline("          debut de rapport d'erreur le " & Now)
defaut.WriteBlankLines(2)

''''''''''''''ouverture du fichier liste.txt
Set fso = CreateObject("Scripting.FileSystemObject")
Set list = fso.OpenTextFile("fichier1.txt",1,false)

''''''''''''''Connection Reseaux
Set net = CreateObject("WScript.Network") 

do until list.AtEndOfStream
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    strComputer = list.readline
    domaine = "nom du domaine"
    users = array("user1","user2")
    for each value in users
        Set objGroup = GetObject("WinNT://" & strComputer & "/Administrateurs,group")
        Set objUser = GetObject("WinNT://" & domaine & "/" & users)
        'wscript.echo objUser.name
        objGroup.Add(objUser.ADsPath)
        'if err.number<>0 then
            defaut.WriteLine(strcomputer & "        |" & err.number & "        |" & err.Description & "     |" & Now)
            err.Clear()
        'end if 
    next
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
loop    
    wscript.echo "Terminée"

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (caiman125)