You are here

하드 디스크 시리얼 넘버 얻기

Windows 만 가능합니다.

package require twapi

foreach drive [twapi::find_logical_drives -type fixed] {
        array set diskinfo [twapi::get_volume_info $drive -serialnum -label]
        puts "Drive $drive, Serial: $diskinfo(-serialnum)"
}

Drive C:, Serial: F843-EB03
Drive D:, Serial: 302D-4B27
Drive E:, Serial: DC8F-EAF6
Drive F:, Serial: A42D-EFF6
포럼: