Автозапуск съемного диска
Автозапуск был отключен в Windows. Я ищу альтернативу. Я получил этот скрипт AutoIt:
$DBT_DEVICEARRIVAL = "0x00008000"
$WM_DEVICECHANGE = 0x0219
GUICreate("")
GUIRegisterMsg($WM_DEVICECHANGE , "MyFunc")
Func MyFunc($hWndGUI, $MsgID, $WParam, $LParam)
If $WParam == $DBT_DEVICEARRIVAL Then
MsgBox(4096, "Info", "My Drive has been Inserted, Backup My Files!")
EndIf
EndFunc
While 1
$GuiMsg = GUIGetMsg()
WEnd
Вскоре после подключения появилось окно сообщения. Теперь для запуска файла я заменил
MsgBox(4096, "Info", "My Drive has been Inserted, Backup My Files!")
от
Run ("F:\path\to\my\file.cmd")
А что поменять так file.cmd
может быть запущен на компьютерах, которые назначают букву диска, отличную от F:
?
1 ответ
Я искал некоторые WAVE-файлы на съемном устройстве (SD-карта) с этим кодом:
#include <Array.au3>
; Register search function
Global $DBT_DEVICEARRIVAL = "0x00008000"
Global $WM_DEVICECHANGE = 0x0219
Global $drives = DriveGetDrive("REMOVABLE")
GUIRegisterMsg($WM_DEVICECHANGE, "searchOnSD")
; check all already known removable devices
If UBound($drives) > 0 Then
For $drive In $drives
If StringRegExp($drive, "^[[:alpha:]]:$") Then check($drive)
Next
EndIf
; search for WAV-file on SD-Card
Func searchOnSD($hWndGUI, $MsgID, $WParam, $LParam)
If $WParam == $DBT_DEVICEARRIVAL Then
$newDrives = DriveGetDrive("REMOVABLE")
$drive = $newDrives
For $i = 0 To UBound($drives) - 2
_ArrayDelete($drive, 0)
Next
If UBound($drive) > 0 Then
$drive = $drive[0]
If StringRegExp($drive, "^[[:alpha:]]:$") Then
ConsoleWrite("new removable (" & $drive & ") found." & @CR)
check($drive)
EndIf
EndIf
EndIf
$drives = DriveGetDrive("REMOVABLE")
EndFunc ;==>searchOnSD
в check($drive)
Функция, которую я затем выполнил что-то с файлом WAVE после оценки DriveStatus($drive) == "READY" And FileExists($wavFile)
,