|
Bienvenue invité ( Connexion | Inscription ) |
mercredi 30 avril 2008 à 16h19
Message
#1
|
|
|
Junior Member Groupe : Membres Messages : 4 Inscrit : 30/04/2008 Membre no 197339 |
Bonjour tous le monde,
Je suis un administrateur d'un réseau active directory avec tous plein de controleur de domaine sur mon entreprise et je souhaite savoir qui se connecte en bureau a distance sur mes serveurs via mail. J'ai trouvé comment envoyé un mail et comment vérifier que le bureau a distance se lance sur UN serveur par contre je n'arrive pas a trouvé QUI se connecte et aussi sur TOUS les serveurs. voici le débutr de code CODE set mail = CreateObject("CDO.Message")
strcomputer = "SRV-DC1" set ObjSWbemServices = GetObject ("Winmgmts:" & "\\" & strcomputer & "\root\cimv2" ) set objEvenement = ObjSWbemServices.ExecNotificationQuery ("SELECT * FROM __InstanceCreationEvent " &_ "WITHIN 5 " & "WHERE TargetInstance " & "ISA 'Win32_process' " & "AND TargetInstance.Name = 'rdpclip.exe'" ) Set objEventObject = objEvenement.NextEvent() with mail .From="******@free.fr" .To="******@free.fr" .Subject="test" .TextBody="TSE démarré" .configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "smtp.free.fr" .configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .configuration.fields.update .send end with |
|
|
|
mavric Vérification des TSE mercredi 30 avril 2008 à 16h19
sebdraluorg Salut, quand tu dis qui, tu veux dire le nom de l... mercredi 30 avril 2008 à 17h58
mavric Salut, se que je veux c'est l'utilisateur ... mercredi 30 avril 2008 à 18h33
sebdraluorg hum il me semble qu'il te manque ces 3 lignes:... mercredi 30 avril 2008 à 20h29
mavric Ok merci pour les information. Je testerais toute ... mercredi 30 avril 2008 à 22h09
mavric Bonjour,
J'ai bien réessayé le script avec tou... lundi 05 mai 2008 à 17h00![]() ![]() ![]() |
Sujets similaires
| Titre | Réponses | Auteur | Lectures | Dernière action | |||
|---|---|---|---|---|---|---|---|
![]() |
7 | Zonk | 1063 | lundi 16 novembre 2009 à 15h43 Dernier message par : Zonk |
|||
![]() |
4 | lomaster | 333 | mardi 03 novembre 2009 à 19h37 Dernier message par : lomaster |
|||
![]() |
1 | Alemel | 251 | mardi 03 novembre 2009 à 11h40 Dernier message par : Thanos |
|||
![]() |
18 | petitpoison | 1245 | samedi 05 septembre 2009 à 18h10 Dernier message par : petitpoison |
|||
![]() |
11 | pecko14 | 1514 | lundi 10 août 2009 à 09h36 Dernier message par : Kyle_Katarn |
|||
![]() |
1 | francisbrun1 | 278 | vendredi 01 mai 2009 à 08h24 Dernier message par : pear |
|||
![]() |
1 | galapagos | 1158 | vendredi 13 mars 2009 à 04h37 Dernier message par : Zonk |
|||
![]() |
3 | thierryForum | 853 | mardi 27 janvier 2009 à 13h52 Dernier message par : pear |
|||
![]() |
9 | nebuleux | 1662 | samedi 22 novembre 2008 à 23h30 Dernier message par : - Invité - |
|||
![]() |
21 | Etienne69 | 5738 | mardi 30 septembre 2008 à 17h42 Dernier message par : Etienne69 |
|||
|
Version bas débit | Nous sommes le : mardi 09 février 2010 à 13h18 |
| [Services] [Contact] [Plan du site] [Notice légale] [Twitter] | Copyright © 1999-2010 Zebulon.fr - Optimisation windows & Informatique - Tous Droits Réservés. Hébergé par OVH |
| Partenaires : Prix ordinateur, Libellules.ch, Magazine informatique |