Joined
Last Seen
0 Reputation Points
100% Quality Score
- Upvotes Received
- 1
- Posts with Upvotes
- 1
- Upvoting Members
- 1
- Downvotes Received
- 0
- Posts with Downvotes
- 0
- Downvoting Members
- 0
0 Endorsements
Ranked #107.55K
1 Posted Topic
Re: Had to do something like this real quick and I come up with this Function GetBluetoothConnectedDevices() As List(Of String) Dim R As New List(Of String) Try Dim searcher As New ManagementObjectSearcher(New ManagementScope("\\.\root\CIMV2", Nothing), New WqlObjectQuery("Select Name from Win32_PnPEntity where pnpclass = 'bluetooth' and service is null and description = 'bluetooth … |
The End.