vba excel active directory

Le
totor
Bonjour
Comment récupérer en vba dans excel des informations d'active directory
Merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #20271781
Bonjour Totor,

Tu peux utiliser ceci pour questionner "Active Directory"
les informations reçues vont s'afficher dans un fichier .txt

P.S- Excel sait ouvrir un fichier texte... on peut aussi utiliser
un bout de code en VBA si on sait ce que l'on cherche
précisément dans le fichier texte.

'------------------------------------------
Sub test()

Dim T As Double
Dim Fichier As String
'Où les informations seront après la procédure:
Fichier = "c:toto.txt"

'La commande Net à plusieurs paramètres possible
'dans une fenêtre Dos, utilise la commande User /?
'pour afficher les paramètres disponibles
commande = Environ("comspec") & " /c Net User > " & Fichier
Shell commande, vbHide

'Un délai d'une seconde pour permettre à la commande
'de créer le fichier et y inscrire l'information
T = Timer + 1
Do While Timer <= T
DoEvents
Loop
'affichage de la fenêtre avec le résultat.
Shell "c:WindowsNotepad.exe " & Fichier, vbNormalFocus

End Sub
'------------------------------------------



"totor" :
Bonjour
Comment récupérer en vba dans excel des informations d'active directory
Merci
Publicité
Poster une réponse
Anonyme