~dont_cache() ~include('../config.tmpl') ~include('../updateuser.tmpl') ~if(~get('is_admin')==0,~http_error(404)) ~defunc("removecomments",' ~list(~get('database'),"select id from comments where com_parent='~addslashes(~sparam(1))'",'LM',' ~list(~get('database'),'delete from comments where id="~addslashes(~fld('id'))"') ~call("removecomments",~fld('id')) ') ~list(~get('database'),'delete from comments where id="~addslashes(~sparam(1))"') ') ~set('user_id_tmp',~getget('user_id')) ~include("../site/header.tmpl") Virage des commentaires... ~list(~get('database'),"select id from comments where user_id='~addslashes(~get('user_id_tmp'))'",'LM',' ~call("removecomments",~fld('id')) ') Virages des journaux + commentaires... ~defunc('removejournal',' ~list(~get('database'),"delete from users_journal where id='~addslashes(~sparam(1))'") ~list(~get('database'),"delete from comments where res_type=~integer(~get('res_type_journal')) and news_id=~integer(~sparam(1))") ') ~list(~get('database'),"select id from users_journal where user_id='~addslashes(~get('user_id_tmp'))'",'LM',' ~call('removejournal',~fld('id')) ') ~include("../site/footer.tmpl")