VBNet - Форум - удаление строки из файла

Вопрос: удаление строки из файла Добавлено: 19.12.03 14:39

Автор вопроса: morozov

Уважаемые господа!

Подскажите, как в текстовом файле удалить строку находящуюся в середине или где-то в другом месте файла. А потом записать его.

За ранее благодарен за советы.

Ответить

Ответы Всего ответов: 7

Номер ответа: 1
Автор ответа:

Вопросов: 28
Ответов: 48

Web-сайт: www.av.folder-pro.net
Профиль | | #1

Добавлено: 19.12.03 14:55

Используй, например, ListBox, открываешь текстовый файл и считываешь по строке циклом:

Open FileName For Input As #1
Do While Not EOF(1)
Line Input #1, nStr
List1.AddItem nStr
Loop
Close #1

Потом, после заполнения списка, ищи нужную запись и удаляй (пример поиска по ListBox есть на этом сайте), а потом опять записывай файл:

Open FileName For Output As #2
For i = 0 To List1.ListCount - 1
Print #1, List1.List(i)
Next i
Close #2

Вместо ListBox можно использовать Collection и т.д. иди на различные хитрости. Удачи

Ответить

Номер ответа: 2
Автор ответа:

morozov

Вопросов: 10
Ответов: 7

Профиль | | #2

Добавлено: 19.12.03 15:33

к сожалению Файл имеет размер 10 МБ

я думаю, что ListBox просто загнется.

Ответить

Номер ответа: 3
Автор ответа:

Вопросов: 28
Ответов: 48

Web-сайт: www.av.folder-pro.net
Профиль | | #3

Добавлено: 19.12.03 18:03

Я же говорю, не обязательно использовать ListBox, используй Collection, его уж точно хватит на тысяч 5 строк. А если и этого мало будет, тогда сделай так, чтобы твой десятиметровый файл считывался сразу в несколько таких коллекций, например первую половину файла считывай в один, другую - во второй!

Ответить

Номер ответа: 4
Автор ответа:

morozov

Вопросов: 10
Ответов: 7

Профиль | | #4

Добавлено: 22.12.03 09:22

А можно чуть по подробнее про Collection, как в нее прочитать половину.

или часть файла.

За ранее благодарен.

Ответить

Номер ответа: 5
Автор ответа:

morozov