Code Red > AutoLISP (Vanilla / Visual)
HD Serial number
Marc'Antonio Alessi:
--- Quote from: VovKa on February 03, 2023, 05:53:40 AM ---
--- Quote from: Marc'Antonio Alessi on February 03, 2023, 05:39:43 AM ---
--- Code: ---Thanks VovKa :
; errore: no function definition: VK_RELEASEOBJECTS
--- End code ---
--- End quote ---
nothing special, just substitute it with (mapcar 'vlax-release-object ... )
--- End quote ---
Thanks again,
(vk_GetHDDID) => (("RSH USB Device" "00A123456789 ") ("KINGSTON SV300S37A240G" "50026B775203E442"))
sorry again for my ignorance but with
(dos_serialno "C:") => "BCA30E72"
why do I have a different result?
VovKa:
--- Quote from: Marc'Antonio Alessi on February 03, 2023, 11:03:48 AM ---why do I have a different result?
--- End quote ---
as i mentioned earlier, my code works on win7. that's the operating system i'm using
i removed my pc's cover and checked the returned serial against hdd's sticker, they match
and i've also found a comment in my lisp file concerning this function
;;;Win XP/2003 only, no SATA
so it's windows version dependent
It's Alive!:
are you looking for the volume label? XXXX-XXXX
"Select VolumeSerialNumber from Win32_LogicalDisk"
BIGAL:
It's Alive!:
(dos_serialno "C:") used to return the volume serial
if you go to the command prompt c:\, type dir, you should see it at the top
this serial changes when you format the volume, this is not to be confused with a hardware serial number
Navigation
[0] Message Index
[#] Next page
[*] Previous page
Go to full version