promethee2003
Messages postés38Date d'inscriptionlundi 8 novembre 2004StatutMembreDernière intervention10 décembre 2006
-
29 août 2005 à 19:08
garudo
Messages postés8Date d'inscriptionjeudi 10 juillet 2003StatutMembreDernière intervention10 novembre 2005
-
9 nov. 2005 à 17:30
Bonjour,
Je cherche a lister les dossier partagées d'un ordi en reseau en sachant que je posséde le nom de l'ordi en reseau.
Je voudrais quelque chose de simple, un affichage en listbox par exemple, des partage disponible sur l'ordi cible.
promethee2003
Messages postés38Date d'inscriptionlundi 8 novembre 2004StatutMembreDernière intervention10 décembre 2006 30 août 2005 à 17:19
Merci, j'ai regarder est elle est bien, mais ce n'est pas ce que je cherche il me faudrais quelques chose de plus simple (moins lourd et complexe).
Voici le code que je veut améliorer :
Set owinnt3 = CreateObject("WinNT:")
For Each Item3 In owinnt3
Liste_Rezo = Liste_Rezo & " - " & Item3.Name & vbCrLf
Set owinnt = CreateObject("WinNT://" + Item3.Name)
owinnt.Filter = Array("computer")
For Each Item In owinnt
Liste_Rezo = Liste_Rezo & " - " & Item.Name & vbCrLf
Next Item
Next Item3
Ca liste les domaine et les utilisateurs conectée, je voudrais juste rajouter la liste des partage.
En fait j'aimerais eviter un maximum les API pour l'instant.
promethee2003
Messages postés38Date d'inscriptionlundi 8 novembre 2004StatutMembreDernière intervention10 décembre 2006 30 août 2005 à 17:21
Merci, j'ai regarder est elle est bien, mais ce n'est pas ce que je cherche il me faudrais quelques chose de plus simple (moins lourd et complexe).
Voici le code que je veut améliorer :
Set owinnt3 = CreateObject("WinNT:")
For Each Item3 In owinnt3
Liste_Rezo = Liste_Rezo & " - " & Item3.Name & vbCrLf
Set owinnt = CreateObject("WinNT://" + Item3.Name)
owinnt.Filter = Array("computer")
For Each Item In owinnt
Liste_Rezo = Liste_Rezo & " - " & Item.Name & vbCrLf
Next Item
Next Item3
Ca liste les domaine et les utilisateurs conectée, je voudrais juste rajouter la liste des partage.En fait j'aimerais eviter un maximum les API pour l'instant.