vbs 检测 USB 驱动器并运行一些命令

Question 1

VBScript：请阅读 Rob Haupt 的五项 VBScript“最佳实践”和 Rob van der Woude 的调试脚本; 简而言之：
- 使用Option Explicit陈述总是（如果使用，该Option Explicit语句必须出现在脚本中的任何其他语句之前）并且
- 使用On Error GoTo 0陈述至少对于调试来说；请阅读示例这是我对 VBScript 错误处理的回答。
批处理脚本：请阅读 Rob van der Woude 的调试批处理文件。
为什么不将所有给定的任务都保留在批处理脚本中？让我们应用wmic命令：这Win32_Volume 类（表示硬盘上的存储区域）或Win32_LogicalDisk WMI 类（表示解析为运行 Windows 的计算机系统上的实际本地存储设备的数据源）。

尝试一下 *** 看看编辑以下：

wmic path Win32_Volume get BlockSize, DriveLetter, DriveType, Label
wmic path Win32_LogicalDisk get DeviceID, DriveType, Description, VolumeName, FileSystem
rem or full output:
wmic path Win32_Volume get /value
wmic path Win32_LogicalDisk get /value

以下是批处理脚本的可能框架（将其与usb.bat脚本放在一起你自己)：

@ECHO OFF
SETLOCAL EnableExtensions DisableDelayedExpansion
set "_drives="
for /F "tokens=*" %%G in ('
  wmic path Win32_LogicalDisk where "DriveType=2" get DeviceID /value ^|findstr "="
  ') do for %%g in ("%%~G") do (
    set "__%%~g"
    echo(
    rem echo going to process drive __%%~g
    call :processDrive
  )

ENDLOCAL
goto :eof

:processDrive
  echo processing drive %__DeviceID%
  pushd "%__DeviceID%\"
    2>NUL dir /S /B /A *.ini
    2>NUL dir /S /B /A *.lnk
  popd
goto :eof

以下for是循环

%%G检索DeviceID值；
%%g删除结尾回车在返回的值中：wmic行为：每个输出行以0x0D0D0A（<CR><CR><LF>）结尾，而不是常见的0x0D0A（<CR><LF>）。

查看 Dave Benham 的WMIC和FOR /F：修复尾随<CR>问题

输出：

==> D:\bat\SF\786392.bat

processing drive F:
F:\Shortcut.lnk
F:\vbScriptDoc\Hey_Scripting_Guy.lnk

processing drive G:
G:\SPSS\admin\SCRIPTS.INI
G:\SPSS\admin\system32\GroupPolicy\GPT.INI
G:\VB_scripts\Net\nethood_create_a_link.vbs.lnk

==>

更多资源（批处理脚本编写者必读）：

（命令参考）Windows CMD 命令行的 AZ 索引
（其他细节）Windows CMD Shell 命令行语法
（%~G等专题页面）命令行参数（参数）
（>>等2>NUL专题页面）重定向

***编辑：不幸的是，查询和wmi 类DriveType中的属性可能会产生错误的结果，请参见下一个输出，其中和都是 USB 可移动介质，因此属性Win32_VolumeWin32_LogicalDiskF:G:DriveType应该是2：

==> wmic path Win32_LogicalDisk get DeviceID,DriveType,Description,VolumeName, FileSystem,Size
Description       DeviceID  DriveType  FileSystem  Size           VolumeName
Local Fixed Disk  C:        3          NTFS        119664537600
Local Fixed Disk  D:        3          NTFS        1000202039296  DataDisk
CD-ROM Disc       E:        5
Removable Disk    F:        2          FAT         519274496      KINGSTON
Local Fixed Disk  G:        3          FAT32       500044136448   GOG

==> wmic path Win32_Volume get BlockSize, DriveLetter, DriveType, Label, Capacity
BlockSize  Capacity       DriveLetter  DriveType  Label
4096       1000202039296  D:           3          DataDisk
4096       366997504                   3          Rezervováno systémem
8192       519274496      F:           2          KINGSTON
65536      500044136448   G:           3          GOG
4096       119664537600   C:           3
                          E:           5

您需要结合以下 WMI/WMIC 查询来获取可移动磁盘的正确驱动器号：

==> wmic path Win32_DiskDrive get DeviceID, InterfaceType, MediaType

DeviceID            InterfaceType  MediaType
\\.\PHYSICALDRIVE1  IDE            Fixed hard disk media
\\.\PHYSICALDRIVE2  USB            Removable Media
\\.\PHYSICALDRIVE0  IDE            Fixed hard disk media
\\.\PHYSICALDRIVE3  USB            External hard disk media


==> wmic path Win32_DiskDriveToDiskPartition get /value

Antecedent="\\USER-PC\root\cimv2:Win32_DiskDrive.DeviceID="\\.\PHYSICALDRIVE1""
Dependent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #1, Partition #0""

Antecedent="\\USER-PC\root\cimv2:Win32_DiskDrive.DeviceID="\\.\PHYSICALDRIVE1""
Dependent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #1, Partition #1""

Antecedent="\\USER-PC\root\cimv2:Win32_DiskDrive.DeviceID="\\.\PHYSICALDRIVE2""
Dependent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #2, Partition #0""

Antecedent="\\USER-PC\root\cimv2:Win32_DiskDrive.DeviceID="\\.\PHYSICALDRIVE0""
Dependent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #0, Partition #0""

Antecedent="\\USER-PC\root\cimv2:Win32_DiskDrive.DeviceID="\\.\PHYSICALDRIVE3""
Dependent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #3, Partition #0""



==> wmic path Win32_LogicalDiskToPartition get /value

Antecedent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #1, Partition #1""
Dependent="\\USER-PC\root\cimv2:Win32_LogicalDisk.DeviceID="C:""
EndingAddress=120032591871
StartingAddress=368050176

Antecedent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #0, Partition #0""
Dependent="\\USER-PC\root\cimv2:Win32_LogicalDisk.DeviceID="D:""
EndingAddress=1000203091967
StartingAddress=1048576

Antecedent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #2, Partition #0""
Dependent="\\USER-PC\root\cimv2:Win32_LogicalDisk.DeviceID="F:""
EndingAddress=519569407
StartingAddress=16384

Antecedent="\\USER-PC\root\cimv2:Win32_DiskPartition.DeviceID="Disk #3, Partition #0""
Dependent="\\USER-PC\root\cimv2:Win32_LogicalDisk.DeviceID="G:""
EndingAddress=500105249279
StartingAddress=32256

Answer

VBScript：请阅读 Rob Haupt 的五项 VBScript“最佳实践”和 Rob van der Woude 的调试脚本; 简而言之：
- 使用Option Explicit陈述总是（如果使用，该Option Explicit语句必须出现在脚本中的任何其他语句之前）并且
- 使用On Error GoTo 0陈述至少对于调试来说；请阅读示例这是我对 VBScript 错误处理的回答。
批处理脚本：请阅读 Rob van der Woude 的调试批处理文件。
为什么不将所有给定的任务都保留在批处理脚本中？让我们应用wmic命令：这Win32_Volume 类（表示硬盘上的存储区域）或Win32_LogicalDisk WMI 类（表示解析为运行 Windows 的计算机系统上的实际本地存储设备的数据源）。