1

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

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

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

2

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

Это то?

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
}

3

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

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

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)
}
По вопросам возмездной помощи пишите письма
E-Mail: serzh82saratov@mail.ru
OS: Win7x64, AutoHotkey_L v1.1.30.01 (Unicode 32-bit).

4

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

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

По вопросам возмездной помощи пишите письма
E-Mail: serzh82saratov@mail.ru
OS: Win7x64, AutoHotkey_L v1.1.30.01 (Unicode 32-bit).