您可以自动检查是否有批量可移动磁盘吗?

Question

我想批量编写一个程序，它可以识别您是否放入USB记忆棒，然后自动复制文件夹。复制很容易，但我正在努力识别 U 盘。

我已经完成了这个，但是如果USB记忆棒有另一个字母并且字母" E"上有一个硬盘驱动器怎么办。此外，它每2分钟检查一次。如果程序可以立即识别USB记忆棒，那就太好了。

我尝试过的代码：

@echo off
goto search
:search
IF EXIST E: GOTO E
timeout /T 120 /nobreak
goto search
:F
xcopy /s F:test*.* C:UserssebasDesktopcopied*.*
exit

Answer 1

USB 驱动器是可移动磁盘，可以按如下方式找到：

Prompt>wmic logicaldisk get DeviceID, Description
Description       DeviceID
Local Fixed Disk  C:
Removable Disk    D:
CD-ROM Disc       E:
Removable Disk    F:

Answer 2

您可以使用以下命令准确获取可移动磁盘：

wmic logicaldisk get deviceid, description | find "Removable"

Answer 3

使用提供的链接标记，这是如何将驱动器号存储到文本文件中，然后启动批处理程序。

在 Batch 中包含一些代码以恢复驱动器号并将其应用于变量：

<StoreDriveLeterFilepath.txt (
Set /p Drive_Letter=
)

调整您的 XCOPY 线以使用该变量。

xcopy /s %Drive_Letter%test*.* C:UserssebasDesktopcopied*.*

修改了 vbs 代码以将驱动器存储到.txt中并启动批处理程序。 在指示的位置插入批处理的文件路径

strComputer = "." 
Set objWMIService = GetObject("winmgmts:\.rootCIMV2") 
Set evtDevice = objWMIService.ExecNotificationQuery ("SELECT * FROM Win32_VolumeChangeEvent")
Wscript.Echo "Waiting for events ..."
Do
Set objReceivedEvent = evtDevice.NextEvent
'report an event
Wscript.Echo " Win32_Device Changed event occurred" & VBNewLine
If objReceivedEvent.EventType = 1 Then 
Wscript.Echo "Type = Config Changed" 
ElseIf objReceivedEvent.EventType = 2 Then 
Wscript.Echo "Type = Device Arrived" 
Set colItems = objWMIService.ExecQuery("Select * From Win32_Volume")
For Each objItem in colItems
If objitem.DriveType = 2 then
Wscript.Echo objItem.DriveType & " " & objItem.Name & " " & objItem.driveletter
Dim objFSO 'File System Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
Dim objTS 'Text Stream Object
Const ForWriting = 2
Set objTS = objFSO.OpenTextFile("StoreDriveLeterFilepath.txt", ForWriting, True)
objTS.Write ("objItem.driveletter")
objTS.Close()
Set bjFSO = Nothing 'Destroy the object.
Set objTS = Nothing 'Destroy the object.
set WshShell=createobject("wscript.shell") 
WshShell.run "Your Batch Filepath Here.bat", 1, true

End If
Next

ElseIf objReceivedEvent.EventType = 3 Then 
Wscript.Echo "Type = Device Left" 
ElseIf objReceivedEvent.EventType = 4 Then 
Wscript.Echo "Type = Computer Docked" 
End If
Loop