📄 391.htm

📁 VBScript教程及语言参考(HTM)
💻 HTM
字号:
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN"><HTML>
<HEAD>
<TITLE>Drive 对象</TITLE> 
<META NAME="CATEGORY" CONTENT="语言参考"> 
<META NAME="MS.LOCALE" CONTENT="ZH-CN">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<META NAME="PRODUCT" CONTENT="Visual Basic Scripting Edition">
<META NAME="TECHNOLOGY" CONTENT="SCRIPTING">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="Drive 对象">
</HEAD>
<BODY BGCOLOR=FFFFFF LINK=#0033CC>
<!--TOOLBAR_START-->
<!--TOOLBAR_EXEMPT-->
<!--TOOLBAR_END-->
<FONT FACE="宋体" SIZE=2>
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%><TR VALIGN=TOP><TD WIDTH=360>
<FONT SIZE=2 COLOR=#660033>Microsoft&reg; Visual Basic&reg; Scripting Edition</FONT><BR>
<FONT SIZE=5 COLOR=#660033><B>Drive 对象</B></FONT></TD>


<TD ALIGN=RIGHT>
<FONT SIZE=2>&nbsp;<A HREF="vbstoc.htm">语言参考</A> <BR>
<!--START PAGE START--><!--START PAGE END--><A HREF="16.htm">版本 3</A> <P></FONT>

</TD></TR>
</TABLE> 

<FONT SIZE=2><p>
<A HREF="392.htm">请参阅</A> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<A HREF="394.htm">属性</A> 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="393.htm">方法</A></FONT>
<HR noshade SIZE=2>

<H5>描述</H5>
<BLOCKQUOTE>
提供对磁盘驱动器或网络共享的属性的访问。
</BLOCKQUOTE>

<H5>说明</H5>
<BLOCKQUOTE>
以下代码举例说明如何使用 <b>Drive</b> 对象访问驱动器的属性：
<BLOCKQUOTE><PRE><FONT FACE="宋体" SIZE=2>Sub ShowFreeSpace(drvPath)
    Dim fs, d, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = <FONT COLOR="#FF0000">fs.GetDrive(</FONT>fs.GetDriveName(drvPath)<FONT COLOR="#FF0000">)</FONT>
    s = "驱动器 " & UCase(drvPath) & " - " 
    s = s & d.VolumeName  & vbCrLf
    s = s & "可用空间： " & FormatNumber(d.FreeSpace/1024, 0) 
    s = s & "KB"
    MsgBox s
End Sub
</FONT></PRE></BLOCKQUOTE>

</BLOCKQUOTE>
<hr noshade SIZE=2>
<FONT SIZE=2>
<!--COPYRIGHT BEGIN--><!--COPYRIGHT END--> 
</FONT></FONT></BODY></HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -