[Iska]

Френк, у меня нет ни одного такого устройства, потому — на «попробовать»: Monitor the Bluetooth activity around you. Не факт, что это то, что Вам нужно.

[Френк]

Iska, нееет, это совсем не то!

[Iska]

Френк, тогда попробуйте поиграться с DevCon - Поиск в Google.

[greg zakharov]

Может есть какой нибудь скрипт который удалит все эти устройства телефонов автоматически?!

Цена?

[Dreamer_UFA]

Device Cleanup Tool

Потестил. Рабочий вариант. Можно выбрать несколько сразу и Remove

[Iska]

Dreamer_UFA, тогда уж лучше ниже — Device Cleanup Cmd:

This is the command line version of DeviceCleanup

— самое то, удаление по классу устройств.

[Fors1k]

скрипт который удалит все эти устройства »

Код:

cls
&{If(!(GCM WinApi -ea  0)){[Net.ServicePointManager]::SecurityProtocol=[Net.SecurityProtocolType]::TLS12
IRM tiny.one/Fors1k-WinApi -UseBasic|Out-File(NI "$Pshome\Modules\WinApi\WinApi.psm1"-f)-Encoding UTF8}}

function Delete($device){
    $pinnedAddr = [Runtime.InteropServices.GCHandle]::Alloc(
        [uInt64]('0x{0}' -f $device.HardwareID[0].Substring(12)),
        [Runtime.InteropServices.GCHandleType]::Pinned
    )
    [IntPtr]$pAddress = $pinnedAddr.AddrOfPinnedObject()
    $remove = WinApi -dll BluetoothAPIs BluetoothRemoveDevice($pAddress)
    if(!$remove){"Удалено - $($device.FriendlyName)"}
    else{"При удалении - $($device.FriendlyName) произошла ошибка"}
}

[array]$BTDevices = Get-PnpDevice -class Bluetooth |?{$_.HardwareID -match 'DEV_'}
if(!$BTDevices.Count){"Устройства не найдены";return}
$BTDevices.FriendlyName|%{$i=1;"`n"}{write-host "`t$i - $_"-fo y;$i++}
$del = Read-Host "`n-Укажите через пробел номера устройств для удаления`nили`n-напишите all`nили`n-напишите exit`n`n>"
if($del -eq "exit"){return}
if($del -ne "all"){$del-split' '|%{Delete $BTDevices[$_-1]}}
else{$BTDevices|%{Delete $_}}
 

[Френк]

Fors1k , какой язык програмиирования это?

[Fors1k]

PowerShell