View previous topic :: View next topic |
Author |
Message |
BigLuck
Joined: 12 Oct 2007 Posts: 6
|
(Separately) Posted: Sat Jan 12, 2008 02:38 Post subject: Как сохранить результат поиска в файлах? |
|
|
Можно ли каким-либо образом сохранить результат поиска (Find Files, с установленной галкой Find text) в виде текстового файла? |
|
Back to top |
|
 |
D1P

Joined: 20 Dec 2004 Posts: 2973 Location: Тбилиси
|
(Separately) Posted: Sat Jan 12, 2008 04:21 Post subject: |
|
|
Т.е. список найденных файлов? Можно: в окне поиска жми Ctrl+C, список скопируется в буфер обмена, оттуда вставляй куда угодно.
Если подразумевается что-то другое, то что? _________________ База знаний о Total Commander
Блог |
|
Back to top |
|
 |
BigLuck
Joined: 12 Oct 2007 Posts: 6
|
(Separately) Posted: Sun Jan 13, 2008 03:57 Post subject: |
|
|
Не список найденных файлов(это я умею), а результат поиска в файлах.
К примеру, прописываем в поле Find text регэксп для поиска мыл [\w\d-.]+@([\w\d-]+(\.[\w\-]+)+)
Нужно, чтобы найденные по этому регэкспу мыла, можно было сохранить в отдельный файл. Т.е. в итоге нужно получить файл со списком емайлов.
Возможно такое реализовать? |
|
Back to top |
|
 |
Моторокер

Joined: 06 May 2005 Posts: 1517 Location: г. Пермь (читается Перьмь)
|
(Separately) Posted: Mon Jan 14, 2008 12:03 Post subject: |
|
|
Вроде бы есть контентные плагины с возможностью задать рег. выражения.
Результат можно будет сохранить в файл. _________________ плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми |
|
Back to top |
|
 |
Volniy

Joined: 15 Dec 2004 Posts: 585 Location: Местный
|
(Separately) Posted: Mon Jan 14, 2008 19:53 Post subject: Re: Как сохранить результат поиска в файлах? |
|
|
BigLuck wrote: | Можно ли каким-либо образом сохранить результат поиска (Find Files, с установленной галкой Find text) в виде текстового файла? |
Результатом поиска по тексту является не сам текст, а список файлов, содержимое которых удовлетворяет условию поиска. Просмотр файла закончится, если будет найдено первое совпадение. В твоем случае если в некотором текстовом файле есть несколько е-мейл адресов, положительный результат поиска - это обнаружение в файле первого из этих адресов. Остальные Тотал уже не волнуют. |
|
Back to top |
|
 |
BigLuck
Joined: 12 Oct 2007 Posts: 6
|
(Separately) Posted: Tue Jan 15, 2008 02:34 Post subject: |
|
|
Моторокер wrote: | Вроде бы есть контентные плагины с возможностью задать рег. выражения.
Результат можно будет сохранить в файл. |
мм, где их можно найти? =)
Если кто подскажет, буду признателен |
|
Back to top |
|
 |
Моторокер

Joined: 06 May 2005 Posts: 1517 Location: г. Пермь (читается Перьмь)
|
|
Back to top |
|
 |
Lev

Joined: 02 Mar 2005 Posts: 392
|
(Separately) Posted: Tue Jan 15, 2008 16:26 Post subject: |
|
|
regexp_wdx 0.1.0.4 - работает только с именами файлов, поэтому не подойдёт
Да и вообще плагины тут не нужны, а нужна какая-нибудь regexp утилита, делающая поиск по файлам с сохранением результата в файл.
Вот на скорую руку накидал скриптик, выкусывающий адреса по вашему выражению из выделенных в тотале файлов. Для работы потребуется TCScript.Helper. В двоичных файлах поиска не будет. Запись в файл делать поленился.
Вешайте на кнопку, выделяйте файлы и запускайте.
Code: | 'mails.vbs
'lev
Dim re, tcs, s, ss,d
On Error Resume Next
Set TCS = CreateObject("TCScript.Helper")
ff = TCS.GetSrcSelectedFiles(-1)
Set d = CreateObject("Scripting.Dictionary")
Set re = New RegExp
re.Global = True
re.IgnoreCase = True
re.MultiLine = False
re.Pattern = "[\w\d-.]+@([\w\d-]+(\.[\w\-]+)+)"
Const ForReading = 1
Set fso = CreateObject("Scripting.FileSystemObject")
For Each file_name In ff
Set ts = fso.OpenTextFile(file_name, ForReading)
s = ts.ReadAll
Set mm=re.Execute(s)
ts.Close
For Each m In mm
If not d.Exists(Trim(m)) Then d.Add Trim(m), 1
Next
Next
For Each m In d.Keys
ss = ss & m & vbCrLf
Next
MsgBox ss |
зы Надеюсь это не для спамрассылок :) |
|
Back to top |
|
 |
BigLuck
Joined: 12 Oct 2007 Posts: 6
|
(Separately) Posted: Wed Jan 16, 2008 02:45 Post subject: |
|
|
Lev, не для спама, регэксп привел как пример
Повесил скрипт на кнопку, работает вроде =)
можно ли сделать такой вывод результата, чтобы была возможность сделать хотя бы CTRL+C , а то ни туда ни сюда =). Лучше конечно бы в файл сохранение. |
|
Back to top |
|
 |
Volniy

Joined: 15 Dec 2004 Posts: 585 Location: Местный
|
(Separately) Posted: Wed Jan 16, 2008 03:38 Post subject: |
|
|
BigLuck wrote: | ...хотя бы CTRL+C , а то ни туда ни сюда =). |
Ну так ты и нажимай CTRL+C когда мессага со списком появится. По крайней мере в XP это работает. |
|
Back to top |
|
 |
BigLuck
Joined: 12 Oct 2007 Posts: 6
|
(Separately) Posted: Sat Jan 26, 2008 23:33 Post subject: |
|
|
Млин а как обойти ограничение? - в окошке с результатами поиска отображается максимум 19-ть строк =( |
|
Back to top |
|
 |
D1P

Joined: 20 Dec 2004 Posts: 2973 Location: Тбилиси
|
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2223 Location: Москва, Россия
|
(Separately) Posted: Mon Jan 28, 2008 10:54 Post subject: |
|
|
BigLuck wrote: | Млин а как обойти ограничение? - в окошке с результатами поиска отображается максимум 19-ть строк =( |
Нужно последнюю строку скрипта
заменить на
_________________ Нет, я не сплю. Я просто медленно моргаю. |
|
Back to top |
|
 |
Siv
Joined: 27 Jan 2015 Posts: 2
|
(Separately) Posted: Tue Jan 27, 2015 22:46 Post subject: |
|
|
Подскажите пож-та можно ли сохранить результаты поиска одинаковых файлов для дальнейшего удаления дубликатов вручную например.
Я ищу дубликаты файлов в папке со множеством подпапок.
В Результаты поиска выдается много файлов с разными именами.
За один раз всё отсортировать не могу, т.к. надо много времени.
Соответственно необходимо оставшуюся несортированную часть сохранить и в следующий раз просто продолжить удалять копии, вместо нового поиска...
Заранее благодарен...
Если не трудно киньте ответ на асю 342-869-913 или мыло sivanski-at-mail-dot-ru
CaptainFlint:
E-mail немножко замаскирован для защиты от спам-ботов. |
|
Back to top |
|
 |
sa
Joined: 29 Apr 2009 Posts: 2684
|
(Separately) Posted: Wed Jan 28, 2015 09:41 Post subject: |
|
|
Siv wrote: | За один раз всё отсортировать не могу, т.к. надо много времени. |
[Off+]
Автоматизировать не получится с помощью диалога для выбора дубликатов, вызываемому по Num+ в результатах поиска?
[Off-] |
|
Back to top |
|
 |
|