Новости | FAQ | Авторы | Документация | В действии | Библиотека |
Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
Ramesses II 07.11.2002 22:13 / 07.11.2002 23:04
Примерно принцип (да не убиёт меня кто-нить из асов...):@save_msg[] $nick[$form:nick] $text[$form:text] # проверяет наличие файла-базы данных ^if(-f "/cfg/dbase.cfg"){ # файл найден -- добавляем к уже существующему новые строки $old_msg[^table::load[/cfg/dbase.cfg]] # составляем таблицу с новыми записями в tab-delimited формате $new_msg_store[^table::create{nick text $nick $text}] # объединяем старое с новым -- здесь или через join или через append ^old_msg.join[$new_msg_store] # сохраняем объединенную базу ^old_msg.save[/cfg/dbase.cfg] }{ # файл НЕ найден -- создаем новую таблицу $new_msg_store[^table::create{nick text $nick $text}] # сохраняем базу ^new_msg_store.save[/cfg/dbase.cfg] }Принцип взят из кода гостевухи. Некоторые поля, значения форм и переменные (как следствия значения форм) отсутствуют по нескольким причинам,