Script vbs et Active Directory

[Montano5]

Salut à tous !

 

J'administre un réseau sous Windows Server 2003 depuis quelques mois et dans les scripts qui se lancent à l'ouverture de session des utilisateurs, il y a un petit script qui permet de souhaiter un bon anniversaire à l'utilisateur.

 

C'est quelques chose qui ne sert vraiment à rien mis à part à faire un petit clin d'oeil sympa...

 

Sauf qu'il ne fonctionne pas...

 

on error resume Next

'initialisation de l'objet manipulant AD

Set oADSystemInfo = CreateObject("ADSystemInfo")

 

'récuperation de l'objet utilisateur repondant au CN de la personne logé par oADSystemInfo.UserName

Set oUser = GetObject("LDAP://"& oADSystemInfo.UserName)

 

' le champs "info" de AD contient la date de naissance

if month(Ouser.get("info")) = month(NOW()) then

if day(Ouser.get("info")) = day(NOW()) then

' message a personnaliser pour souhaiter un bon anniversaire

MsgBox ("Joyeux Anniversaire " & ouser.get("firstname"))

end if

end if

 

Il n'y a pas de champs "info" dans ma base AD et la date de naissance se retrouve automatiquement dans le champs "Remarques" dans l'onglet "Téléphones" (oui assez bizarre)

J'aimerai donc que le script appel ce champs.

 

Merci pour vos idées et/ou conseil !

Modifié le 26 février 2009 par Montano5

[Invité bart]

Salut vire le 'on error resume Next' qui te masque les eventuels erreur de ton script !

 

Sinon coté 'drh' la date de naissance fait partie des données perso, à utiliser avec précaution !