Создание базы данных на основе текстового файла.

@Маньяк · Регистрация: 03.07.2015

Студворк — интернет-сервис помощи студентам

Привет всем!
Короче так. Что мне нужно, это база данных на основе текстового файла. Нашел как это сотворить, сотворил, все вроде пашет. Но почему то при повторном запуске программы все что былов этой базе затираеться, а на место этого вставляеться новое. Объясню. Я хочу чтоб в прогу можно было заходить по логинупаролю, а потом можно было уже залогинившись добавить нового пользователя. Ну вот он его добавляет, все ок, но при повторном запуске когда пытаюсь добавить ещё одного, предыдущий затираеться. Почему так происходит и как это поправить?
Да, чуть не забыл - вот код для всей этой байды

Code
1
2
3
4
5
6
7
Private Sub cmdProceed_Click()
Open 'C:Program FilesMicrosoft Visual StudioVB98Secret ProjectUserDB.txt' For Output As #2
Print #2, 'Login:'; txtNewLogin.Text & Chr$(175)
Print #2, 'Password:'; txtNewPassword.Text & Chr$(175)
Close #2
MsgBox 'New user added successfully!'
End Sub

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

25.05.2011, 09:42

Ты же сам так открываешь! Чтобы стирались старые значения! попробуй так

Code
1
Open 'C:Program FilesMicrosoft Visual StudioVB98Secret ProjectUserDB.txt' For Append As #2

25.05.2011, 17:57

Совершенно верно. Дело в том, что существуют различные режимы открытия фала, т.е файл последовательного доступа(о котором идёт речь) можно открыть с параметром доступа Input(для ввода), Output(для вывода,если файл с таким именем уже есть, то он будет перезаписан),Append(для добавления). А вообще это азы, купи книгу и начни читать, пользуйся хелпом.

@ORST · 27.05.2011, 10:59

Дело в том, когда ты пишеш:
***********************************
Open 'C:.....' for output as #1
...
...
...
***********************************
У тебя старый файл с таким - же именем стираеться,
а место него появляеться новый.

Для дозаписи файла необходимо писать:
************************************
on error resume next 'В случае ошибки оператор пропускаеться
Open 'C:.....' for append as #1
print #1, 'Твоя переменная
...
...
...
close #1
...
...
**********************************
Вот тогда он запишеться нормально

My web: www.orstprogramms.narod.ru
www.osbasic.boom.ru

Новые блоги и статьи Все статьи Все блоги /
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .

olegich
	25.05.2011, 17:57
	Совершенно верно. Дело в том, что существуют различные режимы открытия фала, т.е файл последовательного доступа(о котором идёт речь) можно открыть с параметром доступа Input(для ввода), Output(для вывода,если файл с таким именем уже есть, то он будет перезаписан),Append(для добавления). А вообще это азы, купи книгу и начни читать, пользуйся хелпом.

@ORST 1 / 1 / 0 Регистрация: 01.05.2011 Сообщений: 203
	27.05.2011, 10:59
	Дело в том, когда ты пишеш: ********************************* Open 'C:.....' for output as #1 ... ... ... ******************************* У тебя старый файл с таким - же именем стираеться, а место него появляеться новый. Для дозаписи файла необходимо писать: ******************************** on error resume next 'В случае ошибки оператор пропускаеться Open 'C:.....' for append as #1 print #1, 'Твоя переменная ... ... ... close #1 ... ... ******************************** Вот тогда он запишеться нормально My web: www.orstprogramms.narod.ru www.osbasic.boom.ru 0