{\rtf1\ansi\ansicpg1252\deff0\deflang1036{\fonttbl{\f0\fswiss\fcharset0 Arial;}} {\*\generator Msftedit 5.41.15.1507;}\viewkind4\uc1\pard\f0\fs20
\par "; #$msg=$_POST["msg"]; \par #recup\'e8re le message du formulaire \par if(!empty($msg)) \{ $msgs=$msg; $msg=stripslashes($msgs); \}\par # permet d'\'e9cire les +\par $d1=date("d\\\'e0H\\hi"); #formate la date\par $f=file("mini.txt"); $file=fopen("mini.txt","w+"); \par # ouvre ou cr\'e9e le fichier mini.txt \par $e=0; $c=count($f);if ($c>15) \{ $e=1; \} \par # limite \'e0 15 messages stock\'e9s \par for ($a=$e; $a<$c; $a++) \{if (strlen($f[$a])>2) \{fwrite($file,$f[$a]); \}\}\par # recopie 14 derniers messages\par if(!empty($msg)) \{fwrite($file,"$d1 $msg\\n");\} #ajoute le nouveau\par for ($a=$e; $a<$c; $a++) \{echo($br); echo ($f[$a]); \}\par # affiche les 14 derniers msg \'e0 l'\'e9cran\par if (!empty($msg)) \{echo ($br); echo ("$d1 $msg\\n");\}\par # affiche le dernier envoy\'e9\par fclose($file); # ferme le fichier mini.txt\par \par # chargement de fichiers et liste sur minim.txt\par if(!empty($HTTP_POST_FILES['pix'])) \{\par $tp= $HTTP_POST_FILES['pix']['tmp_name'];\par $tt= $HTTP_POST_FILES['pix']['type'];\par $tn= $HTTP_POST_FILES['pix']['name']; \par $ts= $HTTP_POST_FILES['pix']['size'];\par $su=strrchr($tn,".");\par if ($tp == "none") \{echo "echec fichier d\'e9passe 500 ko ";exit();\} #10\par \par # contr\'f4le de type des fichiers \par $tyfi="non autoris\'e9 car extension ".$su;\par if( ereg("image",$tt) or ereg("audio",$tt) or ereg("video",tt) \par or ereg("text",tt) ) \{$tyfi="autoris\'e9";\} \par if($su==".ps")\{$tyfi="autoris\'e9";\}\par if($su==".pdf")\{$tyfi="autoris\'e9";\}\par if($su==".txt")\{$tyfi="autoris\'e9";\}\par if($su==".rtf")\{$tyfi="autoris\'e9";\} \par if($su==".htm")\{$tyfi="autoris\'e9";\}\par if($su==".html")\{$tyfi="autoris\'e9";\} \par if($su==".doc")\{$tyfi="autoris\'e9";\} \par # contr\'f4le de dimensions d'images #20\par \par if (ereg("image",$tt))\{#o1 \par $imsiz=getimagesize($tp);$la=$imsiz[0];$ha=$imsiz[1];$mim=$imsiz['mime'];\par echo ("