Page 3 of 3
Re: Ayuda Funciones a Bajo Nivel
Posted:
Tue Jun 10, 2014 7:56 pm
by cuatecatl82
Cristobal: para obtener el serial lógico de cada partición del disco es fácil mediante Wmi, lo que se intenta en este post es obtener el número único de cada disco duro el cual está grabado en el chip del controlador del disco duro.
Maestro Antonio : De plano en Xp no me funciona ni en disco Ide ni en Sata,..
Re: Ayuda Funciones a Bajo Nivel
Posted:
Tue Jun 10, 2014 8:18 pm
by Antonio Linares
Victor,
Por lo visto asi funciona en XP, no se si has llegado a usar este objeto:
- Code: Select all Expand view
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives
For Each objDrive in colDrives
Wscript.Echo "Available space: " & objDrive.AvailableSpace
Wscript.Echo "Drive letter: " & objDrive.DriveLetter
Wscript.Echo "Drive type: " & objDrive.DriveType
Wscript.Echo "File system: " & objDrive.FileSystem
Wscript.Echo "Free space: " & objDrive.FreeSpace
Wscript.Echo "Is ready: " & objDrive.IsReady
Wscript.Echo "Path: " & objDrive.Path
Wscript.Echo "Root folder: " & objDrive.RootFolder
Wscript.Echo "Serial number: " & objDrive.SerialNumber
Wscript.Echo "Share name: " & objDrive.ShareName
Wscript.Echo "Total size: " & objDrive.TotalSize
Wscript.Echo "Volume name: " & objDrive.VolumeName
Next
Re: Ayuda Funciones a Bajo Nivel
Posted:
Tue Jun 10, 2014 8:22 pm
by Antonio Linares
No devuelve el valor grabado en la rom del HD...
Re: Ayuda Funciones a Bajo Nivel
Posted:
Tue Jun 10, 2014 11:35 pm
by cuatecatl82
Bueno Maestro ni hablar, de plano tendré que utilizar la dll aunque sea en demo.. Le agradesco bastante su tiempo y valoró su esfuerzo mil gracias..
Re: Ayuda Funciones a Bajo Nivel
Posted:
Wed Jun 11, 2014 7:44 am
by Antonio Linares
Victor,
Siento no haberte sido de más ayuda. Es un código bastante complejo y no estoy familiarizado con él.