繁體中文当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程：属性-SerialNumber 属性
- VBScript
- VBS中SendKeys的基本应用
- VBScript教程 第十四课在VBScript中使用对象
- VBScript教程 第十三课 VBScript与窗体
- VBScript教程 第十二课VBScript页面的简单样例
- VBScript教程 第十一课深入VBScript
- VBScript教程 第十课 VBScript编码约定
- VBScript教程 第九课VBScript过程
- VBScript教程 第八课 使用循环语句
- VBScript教程 第七课使用条件语句
- VBScript教程 第六课VBScript运算符
- VBscript教程 第五课 VBScript常数
- VBScript教程 第四课VBScript变量
- VBScript教程 第三课VBScript数据类型
- VBScript教程 第二课在HTML页面中添加VBscript代码
- VBScript教程 第一课什么是VBScript
- VBScript的入门学习资料
- VBScript语法速查及实例说明
- MsgBox函数语言参考
- VBS教程：正则表达式简介 -后向引用
- VBS教程：正则表达式简介 -选择与编组
VBScript 中的 VBS教程：属性-SerialNumber 属性
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-11 浏览: 47 ::
收藏到网摘: n/a
SerialNumber 属性
返回十进制序列号，用于唯一标识一个磁盘卷。
object.SerialNumber
object 应为 Drive 对象的名称。
说明
可以使用 SerialNumber 属性以确保在可移动媒体驱动器中插入正确的磁盘。
以下代码举例说明如何使用 SerialNumber 属性：
Function ShowDriveInfo(drvpath) Dim fso, d, s, t Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath))) Select Case d.DriveType Case 0: t = "未知"Case 1: t = "可移动"Case 2: t = "固定"Case 3: t = "网络"Case 4: t = "CD-ROM"Case 5: t = "RAM磁盘"End Selects = "驱动器" & d.DriveLetter & ": - " & ts = s & "<BR>" & "序列号：" & d.SerialNumberShowDriveInfo = sEnd Function
请参阅
评论 (0) All
