Хотябы скажите есть в моём коде ошибка, если нет где она? ;)

Oleg 30.11.2004 21:18 / 30.11.2004 21:19

@page[]
# Достаём сущ. id и сопоставляем в БД каждому id случайное неповторяющееся число
$test[^table::sql{SELECT id FROM bn}]
^test.menu{
	^void:sql{UPDATE `bn`
			  SET `key`='^key_test[]'
			  WHERE id=$test.id}
			  
}OK

# Проверяем число на существование в БД, если существует вызываем самого себя ещё раз
@key_test[][test]
$result[^keygen[]]
$test[^table::sql{SELECT id FROM bn WHERE `key`="$result"}]
^if(def $test.id){$result[^key_test[]]}

# Генерируем случайное число скажем в 10 символов
@keygen[]
$result[^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)^math:random(1000)]
$result[^result.mid(0;10)]

# ps: Как ни странно но например на 3х символах ошибки не возникает
# pps: Обратите внимание есть проверка на повторяемость числа однако она срабатывает не всегда