| View previous topic :: View next topic |
| Author |
Message |
KOROLEV_SD
Joined: 30 Oct 2008
Posts: 5
|
 (Separately) Posted: Thu Oct 30, 2008 11:05 Post subject: Как выделить нужное количество файлов |
 |
|
У меня в директории 50 000 файлов
Нужно выделить(для копирования, удаления ... ) 20000 любых файлов.
Особых признаков у файлов нет.  |
|
| Back to top |
|
 |
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
|
| Back to top |
|
|
KOROLEV_SD
Joined: 30 Oct 2008
Posts: 5
|
| (Separately) Posted: Thu Oct 30, 2008 11:30 Post subject: |
|
|
Уточняю вопрос
КАК выделить нужное количество файлов в директории ?
Жать N*10**4 раз insert не предлагать !!!! |
|
| Back to top |
|
|
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
|
| Back to top |
|
|
CaptainFlint
Joined: 14 Dec 2004
Posts: 6192
Location: Москва
|
| (Separately) Posted: Thu Oct 30, 2008 14:14 Post subject: |
|
|
KOROLEV_SD
Выделяешь все, открываешь групповое переименование (Ctrl+M), задаёшь маской переименования обычный счётчик [C], смотришь, какой файл оказался 20001-м, закрываешь диалог группового переименования, переходишь к тому файлу, жмёшь Shift+End — все файлы от начала до 20000-ного остались выделены, с остальных выделение снято.
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
| Back to top |
|
|
Вахмурка
Joined: 27 Dec 2004
Posts: 2586
Location: Большая деревня Москва
|
|
| Back to top |
|
|
KOROLEV_SD
Joined: 30 Oct 2008
Posts: 5
|
| (Separately) Posted: Fri Oct 31, 2008 15:03 Post subject: |
|
|
| CaptainFlint wrote: | KOROLEV_SD
Выделяешь все, открываешь групповое переименование (Ctrl+M), задаёшь маской переименования обычный счётчик [C], смотришь, какой файл оказался 20001-м, закрываешь диалог группового переименования, переходишь к тому файлу, жмёшь Shift+End — все файлы от начала до 20000-ного остались выделены, с остальных выделение снято. |
Можно с этого места
задаёшь маской переименования обычный счётчик [C],
чуть поподробнее
Спасибо |
|
| Back to top |
|
|
CaptainFlint
Joined: 14 Dec 2004
Posts: 6192
Location: Москва
|
| (Separately) Posted: Fri Oct 31, 2008 15:29 Post subject: |
|
|
| KOROLEV_SD wrote: | Можно с этого места
задаёшь маской переименования обычный счётчик [C],
чуть поподробнее |
Можно. В справке всё очень даже подробно.
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
| Back to top |
|
|
Моторокер
Joined: 06 May 2005
Posts: 1517
Location: г. Пермь (читается Перьмь)
|
| (Separately) Posted: Fri Oct 31, 2008 15:53 Post subject: |
|
|
KOROLEV_SD
Сразу после открытия инструмента группового переименования в поле «Маска для: имени файла» текст
[N]
Ниже есть кнопка «[C] Счётчик»
Нажми кнопку, чтобы вместо [N] стало [C]
В столбце «Новое имя» можно увидеть новые имена файлов. Вместо прежних имён будут только цифры. Ориентируйся на нужную цифру.
Запомни имя файла, закрой диалог (Отмена, а не ОК ), найди его в списке, выдели.
Выделить нужные файлы можно так:
Нажми Shift, перемотай список мышью к началу, щёлкни на первом файле, отпусти Shift.
_________________
плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми |
|
| Back to top |
|
|
KOROLEV_SD
Joined: 30 Oct 2008
Posts: 5
|
| (Separately) Posted: Sat Nov 01, 2008 12:55 Post subject: |
|
|
Спаибо Моторокер !
Было бы хорошо, если бы в Define Selection добавить условие
Выделить первые N записей
Это предложение для разработчиков
Может быть есть и другие способы ? |
|
| Back to top |
|
|
Tol!k
Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас
|
| (Separately) Posted: Sat Nov 01, 2008 13:26 Post subject: |
|
|
| Quote: | | Может быть есть и другие способы ? |
Есть. Поставь курсор на первый файл, зажми Shift,
и щёлкай мышью по полосе прокрутки\файлам, пока в строке состояния не будет
...файлов: <сколько нужно>... |
|
| Back to top |
|
|
KOROLEV_SD
Joined: 30 Oct 2008
Posts: 5
|
| (Separately) Posted: Sat Nov 01, 2008 14:05 Post subject: |
|
|
Tol!k !
Вам видимо платят за click 
См выше. |
|
| Back to top |
|
|
Tol!k
Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас
|
| (Separately) Posted: Sat Nov 01, 2008 14:22 Post subject: |
|
|
А кто сказал, что будет легко? Просил "другие способы", получи.
Кстати, этот способ на 2 порядка быстрее, чем "жать N*10**4 раз insert"
| Quote: | | Вам видимо платят за click |
К сожалению нет. |
|
| Back to top |
|
|
Lev
Joined: 02 Mar 2005
Posts: 392
|
| (Separately) Posted: Sat Nov 01, 2008 16:33 Post subject: |
|
|
Инсёртонажиматор
| Code: | 'selector.vbs
Set TCS = CreateObject("TCScript.Helper")
For i=1 To 20000
TCS.SendKeystroke "{Insert}"
Next |
|
|
| Back to top |
|
|
Volniy
Joined: 15 Dec 2004
Posts: 585
Location: Местный
|
| (Separately) Posted: Sun Nov 02, 2008 02:25 Post subject: |
|
|
Lev
Прикольный эффект 
Ну, уж если использовать Helper, тогда уж лучше будет вот так:
| Code: | 'selector+.vbs
Const NumbFiles = 20000 ' Число выделяемых файлов
Dim Files, TCS, Selection
Set TCS = CreateObject("TCScript.Helper")
TCS.Wait = True
TCS.Sendcommand 3302
Files = TCS.GetSrcSelectedFiles(False)
ReDim Preserve Files(NumbFiles - 1)
Selection = Join(Files,vbCrLf)
TCS.SetTextToClip CStr(Selection)
TCS.Sendcommand 2033
Set TCS = Nothing |
|
|
| Back to top |
|
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
