当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:属性-DriveLetter 属性

VBScript
一个最简单的vbs类实例代码
实用vbs提醒小程序
使用vbs下载文件的代码加强版
vbs病毒制作之一复制自身的vbs脚本
用vbs实现的exe2swf工具脚本代码
vbs更改3389远程桌面端口的脚本
用vbs实现的强制杀进程的脚本
用VBS脚本实现更换Windows Xp序列号的代码
vbs实现右键菜单中添加CMD HERE
用VBS脚本删除指定以外的文件或文件夹
用VBS记录客户机操作的代码
用vbs删除某些类型文件和磁盘空间报告的脚本
两个批量挂马vbs脚本代码
关于vbs WebBrowser导航问题
LCL.VBS 病毒源代码
用vbs实现向任何电子邮件发送邮件
用VBS检测Guest状态的脚本
用vbs实现的输入助手附使用方法
vbs base64 解密脚本代码
用vbs实现修改dns的网关脚本

VBScript 中的 VBS教程:属性-DriveLetter 属性


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 70 ::
收藏到网摘: n/a

DriveLetter 属性

返回本地驱动器或网络共享的驱动器号。只读。

object.DriveLetter

object 应为 Drive 对象的名称。

说明

如果指定的驱动器没有与驱动器号相关联(例如,一个网络共享未映射驱动器号),则 DriveLetter 属性返回零长度字符串 ("")。

以下代码举例说明如何使用 DriveLetter 属性:

Function ShowDriveLetter(drvPath) Dim fso, d, s Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvPath)) s = "Drive " & d.DriveLetter & ": - " s = s & d.VolumeName & "<BR>" s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0) s = s & " Kbytes" ShowDriveLetter = sEnd Function