OBTENIR LA LISTE DES PC SUR UN DOMAINE.
romagny13
Messages postés
687
Date d'inscription
lundi 10 janvier 2005
Statut
Membre
Dernière intervention
27 août 2014
-
30 janv. 2007 à 09:53
den62 Messages postés 3 Date d'inscription lundi 9 mai 2005 Statut Membre Dernière intervention 4 mai 2010 - 7 mars 2007 à 22:33
den62 Messages postés 3 Date d'inscription lundi 9 mai 2005 Statut Membre Dernière intervention 4 mai 2010 - 7 mars 2007 à 22:33
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/41315-obtenir-la-liste-des-pc-sur-un-domaine
https://codes-sources.commentcamarche.net/source/41315-obtenir-la-liste-des-pc-sur-un-domaine
7 mars 2007 à 22:33
ta source a l'air pas mal mais je suis sur VB6.
On peut avoir un .exe a telecharger ?
Merci.
2 mars 2007 à 23:01
Serait il pas mieux de faire une petit fonction comme ça ?
__________________________________________________________________________
Private Function GetPCList(ByVal DomainPath As String)As ArrayList
Dim PCList As Arraylist
Dim DomainEntry As New DirectoryEntry(DomainPath)
Dim Entry As DirectoryEntry
DomainEntry.Children.SchemaFilter.Add("Computer")
For Each entry In DomaineEntry.Children
ComputerList.Add(entry.Name)
Next
Return PCList
End Sub
______________________________________________________________________
Enfin j'ai testé ça fonctionne pas mal :)
www.troxsa.info
7 févr. 2007 à 16:43
31 janv. 2007 à 13:44
http://www.microsoft.com/france/windows/windowsserver2003/default.mspx
ou la télécharger en anglais.
31 janv. 2007 à 13:08
31 janv. 2007 à 09:56
Si tu n'a pas de d'active directory, tu peux utiliser Virtual PC pour te créer un serveur virtuel en windows 2000/2003 serveur.
Par contre rajoute une GROSSE barette mémoire dans ton pc.
Bon courage.
30 janv. 2007 à 13:19
30 janv. 2007 à 09:53
marche pas chez moi regarde voir ton code je remarqué deja ca >> Dim DomainEntry As New DirectoryEntry(Me.tbxNomDomaine)
ne serait-ce pas plutot Me.tbxNomDomaine.Text pour le chemin d'acces ?
++