Работающий пример

Modjo7 23.09.2008 16:00 / 23.09.2008 16:19

Добавьте в корневой auto.p

@db[code]
^connect[mysql://root@localhost/db]{$code}

Ну и сам код:

@show_messages[]

^db{
	$messages[^table::sql{SELECT id, author, email, date, body FROM gbook}]
}

^if(def $messages){
	<table>
	^messages.menu{
		<tr>
			<td><a href="mailto:$messages.email">$messages.author</a></td>
			<td>$messages.date</td>
			<td><a href="/?do=delete&id=$messages.id">удалить</a></td>
		</tr>
		<tr>
			<td colspan="3">$messages.body</td>
		</tr>
	}
	</table>
}{
	сообщений нема.
}

@auto[]

^if(def $form:do && $form:do eq "delete" && def $form:id){
	
	^db{
		^void:sql{DELETE FROM gbook WHERE id = '$form:id'}
	}
	
	$response:location[http://$env:SERVER_NAME/] 
	
}{
	что-то не так с параметрами...
}

---