Soyez le premier à donner votre avis sur cette source.
Snippet vu 8 714 fois - Téléchargée 27 fois
Private Sub LoadModemList() Try Dim mngSearch As New ManagementObjectSearcher("Select * From Win32_POTSModem") Dim mngColl As ManagementObjectCollection = mngSearch.Get Dim mngObj As ManagementObject For Each mngObj In mngColl ' AttachedTo : port du modem ' Name : nom windows du modem cboModem.Items.Add(CType(mngObj.Item("AttachedTo"), String) & " - " & CType(mngObj.Item("Name"), String)) Next cboModem.SelectedIndex = 0 Catch ex As Exception End Try End Sub
déjà que j'ai trouvé ces fonctions relativement par hasard ...
(coup de bol)
Tu as d'autres information sur WMI et System.Management (des liens ou des docs). Je cherche ce genre de choses pour la gestion des Hard Disk.
PS: finalement c'était bien FileSystemObject... ;-)
merci beaucoup
;)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.