код

Spearance 14.01.2003 12:01

^if(def $form:login && $form:pass){
$users[^table::create{name	password
$form:login	$form:pass
}] 
	$htpasswd[^table::create[nameless]{}] 
	^users.menu{ 
		^htpasswd.append{$users.name:^math:crypt[$users.password;^$apr1^$]} 
	} 
	^htpasswd.save[nameless;/parser3/makepass/.htpasswd]
		$response:refresh[$.value[0] $.url[$request:uri]]
}{
	Заполните все поля формы...
}