Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Консольная программа для смены буквы диска (флешки) 
Author Message
Tol!k



PostPosted: Thu Jun 21, 2012 21:21    Post subject: Reply with quote

Code:
@echo off &setlocal enableextensions &chcp 1251 >nul

set Label=Иванов Петров Сидоров

for %%a in (Z Y X W V U T S R Q P O N M L K J I H G F E D) do (
   if exist %%a:\. for /f "tokens=6,*" %%b in ('vol %%a:') do (
      for %%l in (%Label%) do if /i "%%c"=="%%~l" set "Drive=%%a"
   )
)
if not "%Drive%"=="" (echo Letter: %Drive%) else (echo Label not found.)
if not "%Drive%"=="" if exist "ReMount.exe" (
   %ComSpec% /C "ReMount.exe" -ReMount %Drive%: R: -f
) else (
   echo File ReMount.exe is not exist.
)
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group