ASP Drive 对象 - ASP 对象 - [ ASP ]

Drive 对象用于返回关于本地磁盘驱动器或者网络共享驱动器的信息。

Drive 对象

Drive 对象用于返回关于本地磁盘驱动器或者网络共享驱动器的信息。Drive 对象可以返回有关驱动器的文件系统类型、剩余容量、序列号、卷标名等信息。

注释：您无法通过 Drive 对象返回有关驱动器内容的信息。要达到这个目的，请使用 Folder 对象。

如需操作 Drive 对象的相关属性，您需要通过 FileSystemObject 对象来创建 Drive 对象的实例。首先，创建一个 FileSystemObject 对象，然后通过 FileSystemObject 对象的 GetDrive 方法或者 Drives 属性来实例化 Drive 对象。

Drive 对象的属性描述如下：

属性

属性	描述
AvailableSpace	向用户返回在指定的驱动器或网络共享驱动器上的可用空间容量。
DriveLetter	返回识别本地驱动器或网络共享驱动器的大写字母。
DriveType	返回指定驱动器的类型。
FileSystem	返回指定驱动器所使用的文件系统。
FreeSpace	向用户返回在指定的驱动器或网络共享驱动器上的剩余空间容量。
IsReady	如果指定驱动器已就绪，则返回 true。否则返回 false。
Path	返回其后有一个冒号的大写字母，用来指示指定驱动器的路径名。
RootFolder	返回一个文件夹对象，该文件夹代表指定驱动器的根文件夹。
SerialNumber	返回指定驱动器的序列号。
ShareName	返回指定驱动器的网络共享名。
TotalSize	返回指定的驱动器或网络共享驱动器的总容量。
VolumeName	设置或者返回指定驱动器的卷标名。

在线实例

取得指定驱动器的总容量
本例演示如何使用 TotalSize 属性来获得指定驱动器的总容量。

<!DOCTYPE html>
<html>
<body>
 
<%
Dim fs,d,n
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set d=fs.GetDrive("c:")
n = "Drive: " & d
n = n & "<br>Total size in bytes: " & d.TotalSize
Response.Write(n)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的可用空间数
本例演示如何首先创建一个 FileSystemObject 对象，然后使用 AvailableSpace 属性来获得指定驱动器的可用空间。

<!DOCTYPE html>
<html>
<body>
 
<%
Dim fs, d, n
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set d=fs.GetDrive("c:")
n = "Drive: " & d
n = n & "<br>Available Space in bytes: " & d.AvailableSpace
Response.Write(n)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的剩余空间容量
本例演示如何使用 FreeSpace 空间属性来取得指定驱动器的剩余空间。

<!DOCTYPE html>
<html>
<body>
 
<%
Dim fs, d, n
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set d=fs.GetDrive("c:")
n = "Drive: " & d
n = n & "<br>Free Space in bytes: " & d.FreeSpace
Response.Write(n)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的驱动器字母
本例演示如何使用 DriveLetter 属性来获得指定驱动器的驱动器字母。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs, d, n
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
Response.Write("The drive letter is: " & d.driveletter)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的驱动器类型
本例演示如何使用 DriveType 属性来获得指定驱动器的驱动器类型。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs, d, n
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
Response.Write("The drive type is: " & d.DriveType)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的文件系统信息
本例演示如何使用 FileSystem 来取得指定驱动器的文件系统信息。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs, d, n
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
Response.Write("The file system is: " & d.FileSystem)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

驱动器是否已就绪？
本例演示如何使用 IsReady 属性来检查指定的驱动器是否已就绪。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs,d,n
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
n = "The " & d.DriveLetter
if d.IsReady=true then 
    n = n & " drive is ready."
else
    n = n & " drive is not ready."
end if 
Response.Write(n)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的路径
本例演示如何使用 Path 属性来取得指定驱动器的路径。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs,d
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
Response.Write("The path is " & d.Path)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的根文件夹
本例演示如何使用 RootFolder 属性来取得指定驱动器的根文件夹。

<!DOCTYPE html>
<html>
<body>
 
<%
dim fs,d
set fs=Server.CreateObject("Scripting.FileSystemObject")
set d=fs.GetDrive("c:")
Response.Write("The rootfolder is " & d.RootFolder)
set d=nothing
set fs=nothing
%>
 
</body>
</html>

取得指定驱动器的序列号
本例演示如何使用 Serialnumber 属性来取得指定驱动器的序列号。

<!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>