Can you automatically check if there is a removable disk in batch? - batch-file

Question

I wanted to write a program in batch, which recognizes if you put in a USB stick and then automatically copies a folder. The copying was easy, but I'm struggling with recognizing the USB stick.
I've done this one but what if the USB stick has another letter and there's a hard drive on the letter "E". Also it checks only every 2 minutes. It would be nice if the program could instantly recognize the USB stick.
The code I have tried:
#echo off
goto search
:search
IF EXIST E: GOTO E
timeout /T 120 /nobreak
goto search
:F
xcopy /s F:\test\*.* C:\Users\sebas\Desktop\copied\*.*
exit

Answer 1

USB drives are removable disks, and can be found as follows:
Prompt>wmic logicaldisk get DeviceID, Description
Description DeviceID
Local Fixed Disk C:
Removable Disk D:
CD-ROM Disc E:
Removable Disk F:

Answer 2

You can get exactly the removable disks using this:
wmic logicaldisk get deviceid, description | find "Removable"

Answer 3

Using the link mark provided, this is How you would store the driveletter into a text file, then launch your batch program.
Include a bit of code in your Batch to recover the drive Letter and apply it to a Variable:
<StoreDriveLeterFilepath.txt (
Set /p Drive_Letter=
)
Adjust your XCOPY line to make use of the variable.
xcopy /s %Drive_Letter%\test\*.* C:\Users\sebas\Desktop\copied\*.*
The vbs code modified to store the drive into .txt and launch your Batch program.
Insert your Batch's Filepath where indicated
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
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