[amel27]

Код:

$sSerial = "3634030921"
$sDrive  = ""
$aDrives = DriveGetDrive ("REMOVABLE")

If IsArray($aDrives) Then
   For $i=1 To $aDrives[0]
      If DriveGetSerial($aDrives[$i]) == $sSerial Then $sDrive = $aDrives[$i]
   Next
EndIf

If $sDrive == "" Then Exit MsgBox(16, "Ошибка", "Не найден требуемый диск")