Цитата Pozia:
Как сделать скрипт, чтобы он проверял все диски (съемные и не съемные) на предмет наличия определенного файла и при нахождении такового выполнял один EXE файл, а при не нахождении выполнял другой EXE файл? »
|
Код:

$sDRV = _DriveGetByTag("WIN51")
If $sDRV=="" Then
MsgBox(0, "Диск не найден", "Запуск файла 1")
; RunWait("file1.exe")
Else
MsgBox(0, "Диск "& $sDRV, "Запуск файла 2")
; RunWait("file2.exe")
EndIf
; Поиск буквы диска по маркерному файлу
; -------------------------------------
Func _DriveGetByTag($sTag, $sType = "ALL")
Local $sDrive = "", $aDrives = DriveGetDrive($sType)
For $i=1 To $aDrives[0]
If DriveStatus($aDrives[$i]) = "READY" Then
If FileExists($aDrives[$i] &"\"& $sTag) Then Return $aDrives[$i]
EndIf
Next
Return SetError(1,0,"")
EndFunc ; ==> _DriveGetByTag