Visualizzazione dei risultati da 1 a 7 su 7
  1. #1
    Utente di HTML.it
    Registrato dal
    Aug 2011
    Messaggi
    119

    Trovare descrizione porte seriali del sistema

    Buongiorno.
    Popolo una combo con le seriali presenti sul sistema così

    codice:
    For Each sp As String In My.Computer.Ports.SerialPortNames
                cboComController.Items.Add(sp)
            Next
    Ora vorrei sapere se è possibile trovare anche il nome esteso.
    per esempio io sul mio pc vedo:

    BRAINBOXES RS232 Serial port (COM13)
    BRAINBOXES RS232 Serial port (COM14)
    NPort comunication Port1 (COM2)

    E' possibile estrarre questi valori per poter identificare meglio la porta che devo usare ?

    Grazie, Alberto

  2. #2
    Non e' in VB.net, ma puoi trovare qui il codice sorgente di un programma che usa diversi modi per elencare le porte seriali di un PC e le loro proprieta', tra cui il nome esteso.
    Tradurre il codice in VB.net e' relativamente facile se si ha un po' di dimestichezza con le chiamate API.
    Io personalmente trovo che il modo piu' accurato sia uno di quelli che fa uso delle Setup API (ne sono elencati due e non ricordo quale dei due ho effettivamente utilizzato).

  3. #3
    Utente di HTML.it
    Registrato dal
    Aug 2011
    Messaggi
    119
    Grazie

  4. #4
    Utente di HTML.it
    Registrato dal
    Aug 2011
    Messaggi
    119
    Può essere che questo codice su win 7 64 bit non veda le com virtuali ?

    codice:
    Try
                Using searcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_SerialPort")
    
                    For Each queryObj As ManagementObject In searcher.Get()
                        Console.WriteLine("DeviceID: {0}", queryObj("DeviceID"))
                        Console.WriteLine("Caption: {0}", queryObj("Caption"))
                        Console.WriteLine("Description: {0}", queryObj("Description"))
                        Console.WriteLine("-----------------------------------")
                    Next
                End Using
            Catch err As ManagementException
                MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
            End Try
    Grazie, Alberto

  5. #5
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Prova ad elencare i device

    Win32_PnPEntity

    e vedi se ottieni l'elenco dei dispositivi che cerchi.
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  6. #6
    Utente di HTML.it
    Registrato dal
    Aug 2011
    Messaggi
    119
    si vedo tutti i dispositivi per esteso
    purtroppo però adesso vedo il nome del driver della seriale ma non vedo la COM

    comunque grazie.

  7. #7
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Beh, ovviamente ... fai due query oppure combina la precedente con questa.
    No MP tecnici (non rispondo nemmeno!), usa il forum.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.