Серый форум — AHK: Как узнать HWID?

Re: AHK: Как узнать HWID?

null@example.com (serzh82saratov) — Sun, 05 Aug 2018 13:43:08 +0000

Serial, Drive: возвращает серийный номер диска

Re: AHK: Как узнать HWID?

null@example.com (serzh82saratov) — Sun, 05 Aug 2018 13:42:18 +0000

Встроенная команда тоже есть.

DriveGet, List, List 
Loop, Parse, List
{
	DriveGet, Serial, Serial, %A_LoopField%:
	MsgBox, % "Drives:`t`t" . A_LoopField . "`n"
	. "Volume Serial No:`t" . Format("{:X}", Serial)
}

Re: AHK: Как узнать HWID?

null@example.com (morgan) — Sun, 05 Aug 2018 13:29:05 +0000

Это то?

objWMIService := ComObjGet("winmgmts:\\.\root\cimv2")
colItems := objWMIService.ExecQuery("SELECT * FROM Win32_LogicalDisk")._NewEnum
while colItems[objItem]
{
        MsgBox, % "Drives:`t`t" . objItem.Caption . "`n"
            . "Volume Serial No:`t" . objItem.VolumeSerialNumber
}

AHK: Как узнать HWID?

null@example.com (morgan) — Sun, 05 Aug 2018 13:20:31 +0000

Здравствуйте!

Хочу узнать, как сделать чтобы скрипт определил серийный номер жесткого диска (любого).
Отправьте код. Буду благодарен