Question : Afficher le message d'ouverture à de nouveaux utilisateurs à la première ouverture.

Nous avons un besoin de montrer un type message de « EULA » à un utilisateur d'annuaire actif au premier souhait de logon.

We pour faire ceci pendant que le moyen d'assurer à de nouveaux utilisateurs lit et accepte nos compagnies qu'IL policy.

We évidemment ne le ferait plutôt pas montrer chaque fois un utilisateur ouvre une session, toutefois une position de compromis peut être example I d'acceptable.

One considéré est si nous faisons examiner un manuscrit d'ouverture le poste de travail pour assurer un profil d'utilisateur, si cet utilisateur ne fait pas afficher un profil d'utilisateur alors le message. elles seront plus que probablement un nouvel utilisateur. Au pis aller ils verront que ceci chaque fois que ils se déplacent qu'à un nouveau poste de travail ou à une ouverture à un serveur différent de citrix mais aux ouvertures non suivantes une fois le profil local est created.

I trouverait plutôt une certaine manière de lire l'attribut ouvert une session par bout de l'annonce et si ce = le 0h00 etc. alors ils sont de nouveaux utilisateurs et montrent l'ouverture message.



class= de

Réponse : Afficher le message d'ouverture à de nouveaux utilisateurs à la première ouverture.

L'attribut LastLogin peut être différent pour chaque contrôleur de domaine dans vous sont domaine (le C.C de sorcière a manipulé la dernière ouverture ?)

Tout de fonction le getLastLogin dans de manuscrit les enummerates joints de vous sont des contrôleurs de domaine, et des retours le nom de lastlogin pour l'utilisateur donné.
Ceci peut être employé pour vérifier pour voir ou l'utilisateur loged jamais dessus à vous sont domaine.

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 : 20 : 21 : 22 : 23 : 24 : 25 : 26 : 27 : 28 : 29 : 30 : 31 : 32 : 33 : 34 : 35 : 36 : 37 : 38 : 39 : 40 : 41 : 42 : 43 : 44 : 45 : 46 : 47 :

Faible objNetwork Placer l'objNetwork = le CreateObject (« WScript.Network ») Placer l'oRoot = le GetObject (« LDAP : //RootDSE ») si getLastLogin (objNetwork.UserName) = « 1-1-1970 » puis msgbox « première ouverture » autrement le msgbox « loged dedans avant » finir si getLastLogin de fonction (username) lastDate = « 1-1-1970 » sConfigNamingContext = oRoot.Get (« configurationNamingContext ») Placer l'oADOCommand = le CreateObject (« ADODB.Command ») Placer l'oADOConnection = le CreateObject (« ADODB.Connection ») oADOConnection.Provider = « ADsDSOObject » oADOConnection.Open « fournisseur actif d'annuaire » oADOCommand.ActiveConnection = oADOConnection sADOQuery = « ; (ObjectClass=nTDSDSA) ; AdsPath ; sous-arbre » oADOCommand.CommandText = sADOQuery oADOCommand.Properties (« taille de page ») = 100 oADOCommand.Properties (« temps mort ») = 30 oADOCommand.Properties (la « cachette résulte ») = faux Placer l'oRecordSet = l'oADOCommand.Execute Faire jusqu'à oRecordSet.EOF Placer l'oDC = le GetObject (GetObject (oRecordSet.Fields (« AdsPath »)). Parent) Placer des conn. = CreateObject (« ADODB.Connection ») conn. Fournisseur = « ADSDSOObject » conn. Ouvrir le « fournisseur d'annonces » strLDAP = « ; (et (objectCategory=User) (sAMAccountName= » et username et ")) ; adspath ; sous-arbre " Placer l'oComm = le CreateObject (« ADODB.Command ») oComm.ActiveConnection = conn. oComm.CommandText = strLDAP Placer les rs = l'oComm.Execute Tandis que pas rs.EOF Placer FoundObject = GetObject (rs. Champs (0). Valeur) Sur le résumé d'erreur après si datediff (« s », lastDate, FoundObject.LastLogin) > 0 puis lastDate = FoundObject.LastLogin finir si rs.MoveNext Wend oRecordSet.MoveNext Boucle oADOConnection.Close getLastLogin = lastDate getLastLogin de fonction de fin '