Как добавить строку в середину файла

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
ilyaintel2
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 06.05.2006 (Сб) 8:54

Как добавить строку в середину файла

Сообщение ilyaintel2 » 11.05.2006 (Чт) 5:44

Здравствуйте. Помогите пожалуйста решить задачу. Мне нужно в файл к примеру text.log содержащий текст добавить строку. Програмка должна вставлять строку после определенного набора символов, к примеру C:\U\50. Значения строки(вставляемой) должно быть переменной к примеру a$.
Буду очень признателен, если распишите поподробнее, а еще лучше если дадите готовый исходник. Заранее Благодарю.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 11.05.2006 (Чт) 7:39

попытка номер 2?
Весь мир матрица, а мы в нем потоки байтов!

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 11.05.2006 (Чт) 7:52

Если подробнее, то делай так.
Открывай файл для чтения, считывай его построчно в массив (хоть через Line Input, хоть разбивая Split). Затем открывай файл для записи и выводи в него строки. В цикле вывода после вывода строки проверяй If s(i) = "C:\U\50" и если будет верно, то Then Print #1, a$.
Lasciate ogni speranza, voi ch'entrate.

ilyaintel2
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 06.05.2006 (Сб) 8:54

Сообщение ilyaintel2 » 11.05.2006 (Чт) 8:00

Спасибо за совет, но можно расписать по подробнее. Зарание благодарю

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 11.05.2006 (Чт) 8:12

Это не совет, это и есть "подробнее".
Lasciate ogni speranza, voi ch'entrate.

Matew
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 894
Зарегистрирован: 28.06.2004 (Пн) 17:44
Откуда: Дальний Восток, г. Ха

Сообщение Matew » 11.05.2006 (Чт) 8:15

ilyaintel2, какой пункт вызывает затруднение?
Алкоголь и сканеры-ваши враги! Не верите-смотрите аватару :-)

ilyaintel2
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 06.05.2006 (Сб) 8:54

Сообщение ilyaintel2 » 11.05.2006 (Чт) 8:24

Matew писал(а):ilyaintel2, какой пункт вызывает затруднение?


В принципе все. Я раньше писал только на Qbasic, команды знаю в основном оттуда же. Знаю как эту прогу написать на Qbasic, но не знаю команд для написания на Vb.

GB826
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 312
Зарегистрирован: 04.08.2005 (Чт) 0:58
Откуда: Планета #3

Сообщение GB826 » 11.05.2006 (Чт) 8:31

ilyaintel2

Я раньше писал только на pascal'e, но захотелось кушать и пришлось за неделю выучить ОСНОВЫ VB.
Пора уже всем хорошим людям собраться и убить всех плохих людей.

Matew
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 894
Зарегистрирован: 28.06.2004 (Пн) 17:44
Откуда: Дальний Восток, г. Ха

Сообщение Matew » 11.05.2006 (Чт) 8:31

ilyaintel2, эти действия аналогичны. Я тоже начинал с Qbasic-а.
Единственное отличие-это начало работы. Создай проект Standart Exe, положи на форму кнопку. Щелкни на нее 2 раза и в появившейся процедуре пиши код.
Код: Выделить всё
kl = freefile()
Open filename for input as kl...
' и т.д.
Алкоголь и сканеры-ваши враги! Не верите-смотрите аватару :-)

miwutka
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 76
Зарегистрирован: 10.11.2005 (Чт) 16:34
Откуда: Moscow, Elektrostal

Сообщение miwutka » 11.05.2006 (Чт) 8:36

все то же самое.
если не знаешь команд - читай статьи на сайте, есть msdn и пр.

алгоритм такой
1.открыть файл для чтения
2.считать все строки в массив
3.открыть файл для записи
4.в цикле проходим по массиву
5.для каждой строчки проверяем, есть ли в ней нужны набор символов
6.если нет, просто дописываем в файл эту строку
7.если есть, определяем ее положение, делим строку на отрезки - записываем все что ДО, записываем набор символов, записываем ТУ НОВУЮ строку, дописываем последний отрезок строки
8.продолжаем цикл
9.закрываем файл

ilyaintel2
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 06.05.2006 (Сб) 8:54

Сообщение ilyaintel2 » 11.05.2006 (Чт) 11:38

А вы не подскажите, где можно слить толковую книгу. ПЛИИИЗЗ!!!

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 11.05.2006 (Чт) 11:44

ilyaintel2 писал(а):А вы не подскажите, где можно слить толковую книгу. ПЛИИИЗЗ!!!

Попробуй прочитать Правила, под которыми ты подписывался. Или список форумов, который ты постоянно открываешь.
Lasciate ogni speranza, voi ch'entrate.

Matew
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 894
Зарегистрирован: 28.06.2004 (Пн) 17:44
Откуда: Дальний Восток, г. Ха

Сообщение Matew » 11.05.2006 (Чт) 11:47

ilyaintel2, прочитай FAQ, там ного чего есть в том числе и литература.
Алкоголь и сканеры-ваши враги! Не верите-смотрите аватару :-)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, SemrushBot, Yandex-бот и гости: 143

    TopList  
cron