Пример:
В файле:
Абакан
абаканский
Абакум
абандон
аббат
аббатский
…….
Найти:
абандон
Можно ли это сделать c помощью FSO?
FSO-как найти строчку в TXT файле?
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 9
• Страница 1 из 1
- Александр80
- Bonachón
- Сообщения: 659
- Зарегистрирован: 20.03.2004 (Сб) 23:50
- Откуда: г.Москва
FSO-как найти строчку в TXT файле?
Александр80 » 18.02.2005 (Пт) 21:24
Подскажите пожалуйста. Есть файл “Test.TXT” в нем имеется информация, записанная построчно… Файл большой 7 мб (Примерно 160 000 строк). Мне нужно в нем найти определенную строчку…
Пример:
В файле:
Абакан
абаканский
Абакум
абандон
аббат
аббатский
…….
Найти:
абандон
Можно ли это сделать c помощью FSO?
Пример:
В файле:
Абакан
абаканский
Абакум
абандон
аббат
аббатский
…….
Найти:
абандон
Можно ли это сделать c помощью FSO?
- Amed
- Алфизик
- Сообщения: 5346
- Зарегистрирован: 09.03.2003 (Вс) 9:26
Amed » 18.02.2005 (Пт) 21:29
В модели FSO нет метода "FindString"... Я бы сначала грузанул файл в TextStream, а уж в нём и искал циклом...
[edit]А можно и InStr искать, как намекает RayShade
[/edit]
[edit]А можно и InStr искать, как намекает RayShade
[/edit]Последний раз редактировалось Amed 19.02.2005 (Сб) 21:35, всего редактировалось 2 раз(а).
- Александр80
- Bonachón
- Сообщения: 659
- Зарегистрирован: 20.03.2004 (Сб) 23:50
- Откуда: г.Москва
Александр80 » 18.02.2005 (Пт) 21:33
Amed писал(а):В модели FSO нет метода "FindString"... Я бы сначала грузанул файл в TextStream, а уж в нём и искал циклом...
Спасибо, попробую...
- Ramzes
- Скромный человек
-
- Сообщения: 5004
- Зарегистрирован: 12.04.2003 (Сб) 11:59
- Откуда: Из гробницы :)
Ramzes » 19.02.2005 (Сб) 13:12
Только для ОЧЕНЬ БЫСТРЫХ КОМПОВ 
Пробовать только на очень быстрых компах
- Код: Выделить всё
open "c:\text.txt" for input as #1
do until efo(1)
line input #1,txt
if txt = "То что ты ищеш" then
tempstr = txt
loop
close #1
Пробовать только на очень быстрых компах
- KDima
- Постоялец
-
- Сообщения: 759
- Зарегистрирован: 14.07.2004 (Ср) 23:14
- Откуда: СПб
KDima » 19.02.2005 (Сб) 15:14
Ramzes
Так любой может!
Хотя возможно это единственый способ...
Так любой может!
Хотя возможно это единственый способ...
Хороший прогер не тот, кто всё знает, хороший прогер знает, где найти знание.
Последний раз редактировалось: Administrator (15.07.2004 (Вт) 00:01), всего редактировалось 999 раз(а)
Последний раз редактировалось: Administrator (15.07.2004 (Вт) 00:01), всего редактировалось 999 раз(а)
- GSerg
- Шаман
- Сообщения: 14286
- Зарегистрирован: 14.12.2002 (Сб) 5:25
- Откуда: Магадан
GSerg » 19.02.2005 (Сб) 18:07
Нет, на отсортированном файле это далеко не единственный способ 
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас
- RayShade
- Scarmarked
-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
RayShade » 19.02.2005 (Сб) 21:27
Вот такой еще может быть вариант:
- Код: Выделить всё
textfound = instr(text_to_search,fso.getfile("c:\123.txt").openastextstream(ioreading).readall,1)
I don't understand. Sorry.
Пошел пробовать...
Сообщений: 9
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Majestic-12 [Bot] и гости: 11