ADSI SCRUTER LE RÉSEAU

Cubitus - 25 août 2000 à 19:40
taatmeru Messages postés 5 Date d'inscription mercredi 2 juillet 2003 Statut Membre Dernière intervention 2 février 2006 - 16 juin 2004 à 14:51
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/221-adsi-scruter-le-reseau

taatmeru Messages postés 5 Date d'inscription mercredi 2 juillet 2003 Statut Membre Dernière intervention 2 février 2006
16 juin 2004 à 14:51
C'est pas vraiment identique et j'ai pas trop le temps de modifier. Mais tu y arriveras facilement.

Dim owinnt As Object
Dim str As String
Dim i, j As Integer
Dim domaine(50) As String
Dim Item
Dim myStrArr() As String = {"computers"}

owinnt = GetObject("WinNT:")
owinnt = GetObject("WinNT://CEPEC")
owinnt.Filter = "computers"
For Each Item In owinnt
If Item.class = "Computer" Then

str = str + Item.Name & vbCrLf
End If
Next Item
cs_titititi Messages postés 11 Date d'inscription mercredi 16 avril 2003 Statut Membre Dernière intervention 21 juillet 2004
7 juin 2004 à 12:31
Est ce que quelqu'un aurait l'équivalent pour vb.NET ?
Merci
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
24 mai 2004 à 10:42
Ca marche nikel ce truc même sous Access2000 avec W2k!
myoldvb Messages postés 6 Date d'inscription jeudi 5 juin 2003 Statut Membre Dernière intervention 10 mars 2004
31 mars 2004 à 16:35
c'est tres bien ce code, mais y'a le mm pb qu'avec l'explorateur.. a savoir le rafraichissement c'est pas vraiment ca...
justement moi j'aurais besoin de savoir en permanence quels sont les ordis connectés sur le réseau, mais avec ce code au debut il voit bien PC1 et PC2, mais quand j'éteins PC2 il reste dans la liste!!
qqun aurait un moyen de pvr vérifier que l'ordi est bien là, tentative de connexion qqch comme ca, sachant qu'un ordi n'a pas forcément qqch de partagé!

merci d'avance
etilegr Messages postés 70 Date d'inscription vendredi 22 février 2002 Statut Membre Dernière intervention 13 novembre 2003
10 nov. 2002 à 15:13
Afficher les 27 commentaires