Bonjour
trouvé :)
attribut ==> Write Notes pour la délégation sur objet users plus d'info sur https://ss64.com/vb/syntax-userinfo.html
et pour le script changer description
to Info

Option Explicit
Const ADS_PROPERTY_UPDATE = 2
Dim objSysInfo, objUser, objNetwork, strComputer, strDescription
Set objSysInfo = CreateObject("ADSystemInfo")
Set objUser = GetObject("LDAP://" & objSysInfo.UserName)
Set objNetwork = CreateObject("Wscript.Network")
strComputer = objNetwork.ComputerName
strDescription = "Logged on to " & strComputer & " at " & Date & " " & Time
objUser.Put "Info", strDescription
objUser.SetInfo
Partager C'est avancer : Votez!SVP