> Tech > Script VBscript

Script VBscript

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

Le script suivant permet d’afficher et de modifier l’identifiant de l’utilisateur. Cet attribut étant déjà présent dans le schéma LDAP d’Active Directory, vous ne devez pas le modifier pour l’utiliser. Paramétrage d’Active Directory

1) Ouvrez ADSIEDIT.msc (installé avec les supports tools)

2) Déplacez vous dans le

conteneur suivant de la partition de configuration (Context Naming): CN=Configuration, puis CN=DisplaySpecifiers, puis CN=40C pour la langue française,

3) Sélectionnez l’objet CN=user-display et ouvrez-le en double-cliquant dessus,

4) Dans l’attribut context-menu ajoutez les informations suivantes : 1,&Identifiant Utilisateur,C:\scripts\ IdentifiantUser.vbs (le signe & permet de souligner le caractère dans les touches de raccourcis). Voir Figure 3. En utilisant la console « Utilisateurs et ordinateurs Active Directory » vous pouvez voir apparaître cette nouvelle commande en faisant un clic droit sur un objet utilisateur. Voir Figure 4.

Vous pouvez spécifier un chemin réseau UNC dans l’attribut pour que vos scripts fonctionnent également sur des postes distants.
Création du script d’affichage et de modification de l’identifiant de l’employé

IdentifiantUser.vbs
Dim oVar
Dim oUtilisateur
Dim temp

Set oVar = Wscript.Arguments
Set oUtilisateur = GetObject(oVar(0))

temp = InputBox("L’identifiant de l’utilisateur est: " &
oUtilisateur.employeeID & vbCRLF & vbCRLF & "Vous pouvez le modifier en renseignant le nouvel identifiant")
if temp <> "" then oUtilisateur.Put "employeeID",temp oUtilisateur.SetInfo
Set oUtilisateur = Nothing
WScript.Quit

Téléchargez cette ressource

Percer le brouillard des rançongiciels

Percer le brouillard des rançongiciels

Explorez les méandres d’une investigation de ransomware, avec les experts de Palo Alto Networks et Unit 42 pour faire la lumière dans la nébuleuse des rançongiciels. Plongez au cœur de l’enquête pour comprendre les méthodes, les outils et les tactiques utilisés par les acteurs de la menace. Découvrez comment prévenir les attaques, les contrer et minimiser leur impact. Des enseignements indispensables aux équipes cyber.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010