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 

Как сохранить результат поиска в файлах?
Goto page 1, 2  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы printer-friendly view
View previous topic :: View next topic  
Author Message
BigLuck



Joined: 12 Oct 2007
Posts: 6

Post (Separately) Posted: Sat Jan 12, 2008 02:38    Post subject: Как сохранить результат поиска в файлах? Reply with quote

Можно ли каким-либо образом сохранить результат поиска (Find Files, с установленной галкой Find text) в виде текстового файла?
Back to top
View user's profile Send private message
D1P



Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси

Post (Separately) Posted: Sat Jan 12, 2008 04:21    Post subject: Reply with quote

Т.е. список найденных файлов? Можно: в окне поиска жми Ctrl+C, список скопируется в буфер обмена, оттуда вставляй куда угодно.

Если подразумевается что-то другое, то что?
_________________
База знаний о Total Commander
Блог
Back to top
View user's profile Send private message
BigLuck



Joined: 12 Oct 2007
Posts: 6

Post (Separately) Posted: Sun Jan 13, 2008 03:57    Post subject: Reply with quote

Не список найденных файлов(это я умею), а результат поиска в файлах.
К примеру, прописываем в поле Find text регэксп для поиска мыл [\w\d-.]+@([\w\d-]+(\.[\w\-]+)+)
Нужно, чтобы найденные по этому регэкспу мыла, можно было сохранить в отдельный файл. Т.е. в итоге нужно получить файл со списком емайлов.
Возможно такое реализовать?
Back to top
View user's profile Send private message
Моторокер



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

Post (Separately) Posted: Mon Jan 14, 2008 12:03    Post subject: Reply with quote

Вроде бы есть контентные плагины с возможностью задать рег. выражения.
Результат можно будет сохранить в файл.
_________________
плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми
Back to top
View user's profile Send private message
Volniy



Joined: 15 Dec 2004
Posts: 585
Location: Местный

Post (Separately) Posted: Mon Jan 14, 2008 19:53    Post subject: Re: Как сохранить результат поиска в файлах? Reply with quote

BigLuck wrote:
Можно ли каким-либо образом сохранить результат поиска (Find Files, с установленной галкой Find text) в виде текстового файла?


Результатом поиска по тексту является не сам текст, а список файлов, содержимое которых удовлетворяет условию поиска. Просмотр файла закончится, если будет найдено первое совпадение. В твоем случае если в некотором текстовом файле есть несколько е-мейл адресов, положительный результат поиска - это обнаружение в файле первого из этих адресов. Остальные Тотал уже не волнуют.
Back to top
View user's profile Send private message
BigLuck



Joined: 12 Oct 2007
Posts: 6

Post (Separately) Posted: Tue Jan 15, 2008 02:34    Post subject: Reply with quote

Моторокер wrote:
Вроде бы есть контентные плагины с возможностью задать рег. выражения.
Результат можно будет сохранить в файл.

мм, где их можно найти? =)
Если кто подскажет, буду признателен
Back to top
View user's profile Send private message
Моторокер



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

Post (Separately) Posted: Tue Jan 15, 2008 10:11    Post subject: Reply with quote

BigLuck wrote:
мм, где их можно найти? =)

Где и остальные – на сайте Тотал Коммандер по русски.
Контентные плагины / Content plugins
По описанию подходит Script Content Plugin 0.1.0.1
Возможно, regexp_wdx 0.1.0.4
BigLuck wrote:
Если кто подскажет, буду признателен

Номер кошелька на моём сайте.

А не проще ли слить файлы в один и искать уже в нём? Например средствами Word?
_________________
плагины для Total Commander, статьи Graphics Converter; NSCopy; SEO HTML; KillOK; Плагин на Delphi
ПармаСруб - строительство домов и бань в Перми
Back to top
View user's profile Send private message
Lev



Joined: 02 Mar 2005
Posts: 392

Post (Separately) Posted: Tue Jan 15, 2008 16:26    Post subject: Reply with quote

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
View user's profile Send private message
BigLuck



Joined: 12 Oct 2007
Posts: 6

Post (Separately) Posted: Wed Jan 16, 2008 02:45    Post subject: Reply with quote

Lev, не для спама, регэксп привел как пример
Повесил скрипт на кнопку, работает вроде =)
можно ли сделать такой вывод результата, чтобы была возможность сделать хотя бы CTRL+C , а то ни туда ни сюда =). Лучше конечно бы в файл сохранение.
Back to top
View user's profile Send private message
Volniy



Joined: 15 Dec 2004
Posts: 585
Location: Местный

Post (Separately) Posted: Wed Jan 16, 2008 03:38    Post subject: Reply with quote

BigLuck wrote:
...хотя бы CTRL+C , а то ни туда ни сюда =).

Ну так ты и нажимай CTRL+C когда мессага со списком появится. По крайней мере в XP это работает.
Back to top
View user's profile Send private message
BigLuck



Joined: 12 Oct 2007
Posts: 6

Post (Separately) Posted: Sat Jan 26, 2008 23:33    Post subject: Reply with quote

Млин а как обойти ограничение? - в окошке с результатами поиска отображается максимум 19-ть строк =(
Back to top
View user's profile Send private message
D1P



Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси

Post (Separately) Posted: Sun Jan 27, 2008 12:46    Post subject: Reply with quote

Да неважно, сколько отображается. Скопируется всё. Выделять ничего не надо, просто Ctrl+C.
_________________
База знаний о Total Commander
Блог
Back to top
View user's profile Send private message
Batya



Joined: 15 Dec 2004
Posts: 2218
Location: Москва, Россия

Post (Separately) Posted: Mon Jan 28, 2008 10:54    Post subject: Reply with quote

BigLuck wrote:
Млин а как обойти ограничение? - в окошке с результатами поиска отображается максимум 19-ть строк =(

Нужно последнюю строку скрипта
Code:
MsgBox ss

заменить на
Code:
WScript.Echo ss

_________________
Нет, я не сплю. Я просто медленно моргаю.
Back to top
View user's profile Send private message
Siv



Joined: 27 Jan 2015
Posts: 2

Post (Separately) Posted: Tue Jan 27, 2015 22:46    Post subject: Reply with quote

Подскажите пож-та можно ли сохранить результаты поиска одинаковых файлов для дальнейшего удаления дубликатов вручную например.

Я ищу дубликаты файлов в папке со множеством подпапок.
В Результаты поиска выдается много файлов с разными именами.
За один раз всё отсортировать не могу, т.к. надо много времени.
Соответственно необходимо оставшуюся несортированную часть сохранить и в следующий раз просто продолжить удалять копии, вместо нового поиска...

Заранее благодарен...
Если не трудно киньте ответ на асю 342-869-913 или мыло sivanski-at-mail-dot-ru

CaptainFlint:
E-mail немножко замаскирован для защиты от спам-ботов.
Back to top
View user's profile Send private message
sa



Joined: 29 Apr 2009
Posts: 2563

Post (Separately) Posted: Wed Jan 28, 2015 09:41    Post subject: Reply with quote

Siv wrote:
За один раз всё отсортировать не могу, т.к. надо много времени.

[Off+]
Автоматизировать не получится с помощью диалога для выбора дубликатов, вызываемому по Num+ в результатах поиска?
[Off-]
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы All times are GMT + 4 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group