Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для El Sanchez

Ветеран


Contributor


Сообщения: 1274
Благодарности: 1030

Профиль | Отправить PM | Цитировать


SendMessage, я бы добавил бы еще в сортировку свойство mediatype, дабы не копировать на флоппи, и какой-никакой пользовательский интерфейс
Код: Выделить весь код
@Echo Off
Set Source=C:\temp\list.log

SetLocal EnableDelayedExpansion
For /F "Tokens=2 Delims==" %%A In ('WMIC LogicalDisk Where ^(DriveType^=2 And MediaType^=NULL^) Get Name /Value') Do (
	Set /A Cnt+=1
	Set Usb!Cnt!=%%A
	Echo.!Cnt!. Copy to drive %%A
)
Echo.
Set /P "Answer=Please, select drive... "
Set Usb%Answer% 1>nul 2>&1&&Copy /Y "%Source%" !Usb%Answer%!||Echo Wrong choice. Try again.
EndLocal

Отправлено: 18:40, 06-12-2010 | #9