Lister les modems installés sur la machine en vb.net

Commenter

Contenu du snippet

Cà m'a pris un temps dingue pour trouver le moyen de récupérer la liste de mes modems aussi je pense que çà pourra servir à d'autres.

Pour ce faire, vu la taille de la routine, je ne mettrais de source.

Pour utiliser cette source, il faut juste :

- inclure dans les références du projet "System.Management"
- faire un form avec une combo (ici, je l'ai appelée cboModem)
- copier la source dans le code de la form
- appeler la routine dans le load de la form.

Source / Exemple : 


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

Conclusion :


J'espère que ce petit code pourra servir à d'autres qui, comme moi, ont cherché partout sans résultats.

YellowMan

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_YellowMan)