取得指定驱动器的序列号

代码:

<!DOCTYPE html>

<html>

<body>

 

<%

dim fs,d

set fs=Server.CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The serialnumber is " & d.SerialNumber)

set d=nothing

set fs=nothing

%>

 

</body>

</html>

结果:

The serialnumber is -1703793645

相关文章