Как организовать регистрацию?

[zaf]

Хочу чтобы в чате могли регистрироваться
как это организовать

Есть ли какие примеры на этот счет?
Исходный код какойнить программы...

[RayShade]

Хм..

Я даже не знаю, что и посоветовать.

Честно, что ты имеешь в виду под "регистрироваться"?

Ну сделай форму, в ней пусть человек введет свое имя и нажмет кнопку "Войти в чат".

[Maitris]

zaf. Добавлять и хранить в реестре/ini файле.
Хотя действительно, регистрация бывает разная, уточни

[Smert]

Я думаю лучше в ини-файле, в реестре много строк будет, а файл один!

[zaf]

Строка для ввода имени и кнопка войти в чат есть !

Мне нужно чтобы люди могли регистрироваться и данные записывались в файл.
Буден несколько полей в форме регистрации
Логин
Пароль
Имя
Фамилие
Дата дождения
Е-майл адрес
Пол


В файл как можно это все дело записывать?
Чтобы потом можно было прочитать!

Чат Дмитрия Бородина (PHP) данные о пользователях хранит в разных файлах, а мне надо в одном!
Вот пример
[0]логин[1]пароль[2]Имя[3]Фамилие[4]Дата дождения[5]Е-майл адрес[6]Пол[7]
[0]zaf[1]123[2]Рафаэль[3]ОВраы[4]25.01.15[5]zzaaff@mail.ru[6]Муж.[7]
[0]lena[1]len111[2]Лена[3]Дроздова[4]25.01.88[5]lena@mail.ru[6]Жен.[7]

[Роман-вб]

Фамилие мое

[keks-n]

Делай так:

Код: Выделить всё


Private type UserRecord
Логин as string*256
Пароль as string*256
Имя as string*256
Фамилие as string*256
Дата дождения as string*256
Е-майл адрес as string*256
Пол as string*256
End Type


Потом открываешь файл For Binary и читаешь/пишешь эту структуру.

[Роман-вб]

Можешь модуль класса с глобал. переменными.

[keks-n]

Роман-вб
Перечитай:

Мне нужно чтобы люди могли регистрироваться и данные записывались в файл.

И причём тут модуль класса?

[neic]

Я обычно делаю так:
Пользователь проходит регистрацию, на его имя где-то создаёться файл с его данными. Потом читаем его.

Dim j as byte
login_p = text1 ' Text1 - логин
pass_p = text2 ' Text2 - пароль
a = FreeFile
Open "Путь" & "\" & text1 as input as a
Do While Not EOF(A)
Line Input #a,g
j = j + 1
If j = 1 then
login = g
else
pass = g
End IF
Loop
Close #a
If pass = pass_p then
'Идём дальше
else
MsgBox "Не верный пароль"
End If

И т.д.. Прошу без комментов, знаю что много чего нету, но это лучше всякой сылки!

[Al Khamid]

77

[keks-n]

neic

Чат Дмитрия Бородина (PHP) данные о пользователях хранит в разных файлах, а мне надо в одном!

[neic]

А пользователь назвался "\\\.ЗИБА.///", а ты удивляйся, что система не может создать файл с символами "/" и "." в названии...

Файл? С точкой? Нельзя создать? Не смеши меня

neic
Афтор топика писал(а):
Чат Дмитрия Бородина (PHP) данные о пользователях хранит в разных файлах, а мне надо в одном!

Не заметил извиняюсь! тогда можно воспользоваться списком

[keks-n]

Я же уже показывал тип записи фиксированной длины, который спокойно читается и пишется в файл. При загрузке читаем в массив и проверяем на совпадение имён. Не надо придумывать велосипед.

[zaf]

Я же уже показывал тип записи фиксированной длины, который спокойно читается и пишется в файл. При загрузке читаем в массив и проверяем на совпадение имён. Не надо придумывать велосипед.

Привет можеш примерчик сделать plzzz

[keks-n]

zaf
Лови пример. Я решил для твоего удобства организовать всё хранение данных на основе очередного недоделанного KSDAT'а(теперь построен на коллекциях записей, имеющих свой класс), так что ничего в нём не трогай, ибо нужный тебе код в форме; скоро выложу правильную версию KSDAT'а в кирпичах.

[zaf]

спс