Модераторы: Akella, bartram

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Поиск слов по маске в файлах, нужна прога 
:(
    Опции темы
Delphist
  Дата 16.2.2010, 11:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Привет, всем. Возникла необходимость в программе следующей функциональности. Нужно организовать поиск слов в файле согласно заданной маске. Например, есть файл или группа файлов, я в программе в поле искать пишу к примеру маску e-mail'ов: 
*@*.* - и программа находит все e-mail адреса в этих файлах.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Akina
Дата 16.2.2010, 11:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 13
Всего: 454



По-моему, быстрее самому такое написАть - делов-то на десяток строк.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Delphist
Дата 16.2.2010, 11:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(Akina @  16.2.2010,  12:15 Найти цитируемый пост)
По-моему, быстрее самому такое написАть - делов-то на десяток строк

я понимаю, что все можно самому, но должны же быть уже готовые решения, что по сто раз писАть одно и тоже


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Delphist
Дата 16.2.2010, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(Akina @  16.2.2010,  12:15 Найти цитируемый пост)
По-моему, быстрее самому такое написАть - делов-то на десяток строк. 

если элементарно, то дал бы эти 10 строчек


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Akina
Дата 16.2.2010, 13:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 13
Всего: 454



Finder.vbs
Код

Option Explicit

Dim fn
Dim fso
Dim f
Dim s
Dim patt
Dim regEx
Dim Match
Dim Matches
Dim RetStr

Const ForReading = 1

fn = InputBox("Filename to search in?","Source file","c:\folder\filename.txt")
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(fn, ForReading)
s = Replace(f.ReadAll,vbCRLF," ")
f.Close
patt = InputBox("Pattern to search for?","Pattern","\s\w+@\w+\.\w+\s")
Set regEx = New RegExp
regEx.Pattern = patt
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(s)
For Each Match in Matches
   RetStr = RetStr & Match.Value & vbCRLF
Next
fn = InputBox("Filename to write to?","Destination file","c:\folder\filename.txt")
Set f = fso.CreateTextFile(fn, True)
f.Write RetStr 
f.Close



--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Samotnik
Дата 16.2.2010, 15:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Super star !
****


Профиль
Группа: Awaiting Authorisation
Сообщений: 7192
Регистрация: 4.11.2006
Где: Минск City

Репутация: 28
Всего: 191



А чЕм тОтал коммАндер нЕ устрАивает ? 
PM MAIL   Вверх
Akina
Дата 16.2.2010, 15:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 13
Всего: 454



Вероятно, тем, что он указывает факт наличия регэкспа в файле - но не более.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Delphist
  Дата 16.2.2010, 16:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(Akina @  16.2.2010,  16:05 Найти цитируемый пост)
Вероятно, тем, что он указывает факт наличия регэкспа в файле - но не более. 

Вообщем сворганил сам, кому нужно пользуйтесь


Присоединённый файл ( Кол-во скачиваний: 18 )
Присоединённый файл  BredMail.exe 535,50 Kb


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Delphist
  Дата 16.2.2010, 16:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Мне просто нужен был простой поиск e-mail'ов в любых файлах. Если кто знает где в нете можно  бесплатно выкладывать  свои проги на порталах типа freesoft, то выкладывайте супер BredMail smile  не стесняясь. А то я сегодня весь инет облазил, а подобной проги не нашел, поэтому на благо человечества и написал.

Это сообщение отредактировал(а) Delphist - 16.2.2010, 17:04


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Akina
Дата 16.2.2010, 17:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 13
Всего: 454



Спалившись на создании спамерских мэйл-БД, я бы на твоём месте так сильно не радовался...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
bazilio77
Дата 16.2.2010, 20:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 10.2.2010

Репутация: нет
Всего: нет



Цитата(Delphist @ 16.2.2010,  11:08)
Привет, всем. Возникла необходимость в программе следующей функциональности. Нужно организовать поиск слов в файле согласно заданной маске. Например, есть файл или группа файлов, я в программе в поле искать пишу к примеру маску e-mail'ов: 
*@*.* - и программа находит все e-mail адреса в этих файлах.

Смотри классику

grep
awk

PM MAIL   Вверх
Delphist
Дата 16.2.2010, 23:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(Akina @  16.2.2010,  18:54 Найти цитируемый пост)
Спалившись на создании спамерских мэйл-БД, я бы на твоём месте так сильно не радовался... 

Я не создатель спамерских майл-БД  smile

Добавлено @ 23:36
Цитата(bazilio77 @  16.2.2010,  21:26 Найти цитируемый пост)
grep
awk

А примерчик можно  smile 

Это сообщение отредактировал(а) Delphist - 17.2.2010, 00:32


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Delphist
  Дата 18.2.2010, 09:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(bazilio77 @  16.2.2010,  21:26 Найти цитируемый пост)
grep
awk

bazilio77, мы все с нетерпением ждем вашего ответа.



--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Akina
Дата 18.2.2010, 09:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 13
Всего: 454





--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Delphist
Дата 18.2.2010, 14:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2145
Регистрация: 3.2.2004
Где: всегда в сети

Репутация: нет
Всего: 3



Цитата(Akina @  18.2.2010,  10:51 Найти цитируемый пост)
http://www.google.ru/search?hl=ru&neww...mp;aq=f&oq=
http://www.google.ru/search?hl=ru&neww...mp;aq=f&oq=

Пример для моей задачи как будет выглядеть???


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программное обеспечение"
Deface
Akella

Запрещается!

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

2. Давать ссылки на взломанные продукты

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, Akella, bartram.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программное обеспечение | Следующая тема »


 




[ Время генерации скрипта: 0.0578 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.