Artem_Butenko
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
@Echo Off
CHCP 1251 >Nul
SetLocal EnableExtensions
For /F "Tokens=1,2 Delims==" %%i In ('WMIC LogicalDisk Get Name^,VolumeSerialNumber^,DriveType /Value^|Find "="') Do (
Call :ShowDrive "%%i" %%j
)
Echo Количество подключенных дисков: %count%
Pause >nul
Exit /B 1
:ShowDrive
If "%~1"=="DriveType" (
If "%2"=="0" Set DT=Unknown
If "%2"=="1" Set DT=No Root Directory
If "%2"=="2" Set DT=Removable Disk
If "%2"=="3" Set DT=Local Disk
If "%2"=="4" Set DT=Network Drive
If "%2"=="5" Set DT=Compact Disc
If "%2"=="6" Set DT=RAM Disk
)
If "%~1"=="Name" (Echo Disk %2 - %DT% & Set /a Count +=1)
Exit /B 1 |
