Obtener nùmero de serie del disco

dirceu · #1 (**permalink**) 11/02/2006, 18:43

Hola a todos, quisiera saber como puedo obtener el numero de serie del disco duro o alguna otra informacion del hardware, usando vbscript. Espero que me puedan ayudar, gracias.

Aibarra.net · #2 (**permalink**) 13/02/2006, 05:34

Buenas,

me parece que con simple vbscript et va a resultar imposible. Vas a necesitar un ActiveX, que lo acepten y que el navagador sea compatible.

dogduck · #3 (**permalink**) 04/03/2006, 12:54

Efectivamente se puede hacer con activeX , mira a ver si te vale esto

Código HTML:

<html>

<head>

<title>Nº serie volumen C </title>
<script language="vbscript">
sub main()
Set fso = CreateObject("Scripting.FileSystemObject")

Set objDrive = fso.GetDrive(fso.GetDriveName("C:"))

strVolumedata = "El nº de serie del volumen c: es = " & Hex(objDrive.SerialNumber)

msgbox strvolumedata


end sub
</script>
</head>

<body onload="main()">

</body>

</html>

FiNo · #4 (**permalink**) 17/03/2006, 09:20

Buenas, este es con ASP

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set driveObject = fso.GetDrive("C")

Response.Write (driveObject.SerialNumber)

Set driveObject = Nothing
Set fso = Nothing
%>