有没有显示磁盘类型的命令行工具？

9zhmke

VBS也很简单，把里面查硬盘的DriveType从多换成1就是U盘了。

1. 
   
2. Set colDrives = CreateObject("Scripting.FileSystemObject").Drives
   
3. For Each objDrive in colDrives
   
4.    if objDrive.DriveType=2 then '0:"未知"/1:"可移动"/2:"固定"/3:"网络"/4:"CD-ROM"/5:"RAM 磁盘"
   
5.                 msgbox objDrive.DriveLetter
   
6.    end if
   
7. Next
   

复制代码

disk.7z (333 Bytes, 下载次数: 4)

2020-11-10 18:08 上传

点击文件名下载附件
下载积分: 无忧币 -2

如果想直接写到批处理中，这样写可以直接列出磁盘列表，前面是类型，后面字母是盘号：

1. 
   
2. mshta VBScript:Execute("For Each objDrive in CreateObject(""Scripting.FileSystemObject"").Drives:msgbox objDrive.DriveType&objDrive.DriveLetter:Next:close")
   

复制代码