| Новости | FAQ | Авторы | Документация | В действии | Библиотека |
| Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
AL 01.02.2006 12:41
@auth[]
^auth_form[]
^if(def $form:go){
$login[^form:login.lower[]]
$pswd[^form:pswd.lower[]]
$crpswd[^table::sql{SELECT c_id, pswd FROM auth WHERE login='$login'}]
^if(^math:crypt[$pswd;$crpswd.pswd] eq $crpswd.pswd){
$cookie:ind[
$.value[$crpswd.c_id]
$.expires(60)
]
$cookie:ind2[
$.value[$crpswd.pswd]
$.expires(60)
]
$cookie:logon[
$.value[1]
$.expires(60)
]
}{
# $response:location[http://$env:SERVER_NAME/error.html]
$crpswd.pswd, ^math:crypt[$pswd;$crpswd.pswd]
}
}В БД лежит $apr1$1KDv