Új hozzászólás Aktív témák
-
Zsolt_974
tag
Sziasztok!
Egy kis segítséget, útmutatást szeretnék kérni, bár látom nem nagyon pörög a téma.
Írogatok egy programot Visual Basic 2008 környezetben. A program soros portról fogad adatokat.
A problémám a következő lenne. A program indulásakor a gépen aktív soros portok száma mellé, hogy lehet az eszköz nevét is kiíratni mint az eszközkezelőben is van? Remélem érthetően fogalmaztam.A programban a következő sor olvassa be a soros portokat:
ComboBox1.Items.AddRange(IO.Ports.SerialPort.GetPortNames())
Segítségeteket, válaszotokat előre is köszönöm.
Üdv. Zsolt
-
Zsolt_974
tag
válasz Bobrooney #2666 üzenetére
Köszönöm a gyors választ.
Sajnos ezzel is csak a következőt kapom vissza, hogy
COM 1
COM 9Viszont ezt találtam:
[link]Ez egy MsgBox-ban vissza adja ezt:
Sajnos a ComboBox1-be nem tudom belevarázsolni és csak a Com 1 jelenik meg a Com 9 nem.
Én csak hobbiszinten programozgatok. Viszont kitartóan.Zsolt
-
Zsolt_974
tag
válasz Bobrooney #2668 üzenetére
Így indul a program:
A belépés gombra klikkelve:
Ok gombra klikkelve és utána a "Com port lenyílóban ezek láthatók: Com1, Com9, Kommunikációs port(Com1)":
A program kódban az ehhez tartozó sorok:
Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_SerialPort")
_______________________________________________________________________________________Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _Button1.Click
For Each queryObj As ManagementObject In searcher.Get()
MsgBox(queryObj("Name"))
Dim textt As String = queryObj("Name").ToString
RichTextBox1.Text = textt
ComboBox1.Items.Add(textt)Next
ComboBox1.Items.AddRange(IO.Ports.SerialPort.GetPortNames())
End SubVégül is tegnap már ott jártam, hogy a ComboBox-ba is beírja, de sajnos csak a
Kommunikációs port(COM1). Az USB-SERIAL CH340(COM9) nem sikerül kiíratni.
A két port közül miért csak a Kommunikációs port(COM1)-et találja meg?[ Szerkesztve ]
-
Zsolt_974
tag
válasz Bobrooney #2670 üzenetére
Bocs, hogy nem válaszoltam, de nem volt rá időm.
Igen közbe rájöttem én is, hogy miért csak a Com1-et találja meg és a Com9-et miért nem. Azért, mert a Com9 egy usb-s eszköz, "virtuális soros port".
Viszont ezzel:
Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_PnPEntity")sikerült megtalálni az USB-Serial CH340(COM9)-et, de sajnos sok PnP eszköz, erőforrások is belekerült a listába.
Új hozzászólás Aktív témák
- Latitude 5540 15.6" FHD IPS i7-1370P MX550 32GB DDR5 512GB NVMe SSD gar
- Predator TRITON NVIDIA RTX 2060 6gb i7-10750H 16gb ram 1tb ssd Display 240HZ
- Xiaomi Redmi Note 10S 128GB, Kártyafüggetlen, 1 Év Garanciával
- Xiaomi 11T 128GB, Kártyafüggetlen, 1 Év Garanciával
- Eladó OnePlus 8 PRO 12/256 GB zöld + AJÁNDÉKOK
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen