Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 04/03/2024 in all areas

  1. Tomislav, the serial number can be obtained in decimal or hexadecimal format. And it can be negative.
    1 point
  2. Try this ; drive type 1 is a usb 2 hard disk (defun UsbDriveSerialNumber ( / fso dr) (setq fso (vlax-create-object "Scripting.FileSystemObject")) (vlax-for d (vlax-get fso 'Drives) (if (= (Vlax-get d 'DriveType) 2) (setq dr (cons (list (vla-get-path d) (vla-get-SerialNumber d)) dr) ) ) ) (vlax-release-object fso) (reverse dr) ) (UsbDriveSerialNumber)
    1 point
×
×
  • Create New...