Bonjour,
En faite j'ai fais ca (rien de méchant) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Printer WHERE SystemName LIKE '%\\%' ")
For Each objItem in colItems


Next
Mon problème est à ce niveau. J'aimerai à la suite du " For Each objItem in colItems " stocker les valeurs " objItem.ShareName " et " objItem.SystemName" dans un tableau dynamique mais je ne sais pas comment faire J'ai essayer avec "Redim Preserve Nom_tableau(..,..)" . Dynamique car je ne connais pas le nombres d'éléments qui sera retournés.

Si quelqu'un à une idée ..
Merci d'avance,
Fas3r