CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2012 05 27 19:27:22

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

NEOCIDE PITIMESAJ V1.0

Information sur la source

Note :
Aucune note

Catégorie :E-Mail / Messagerie Niveau :Débutant Date de création :22/05/2003 Date de mise à jour :22/05/2003 14:39:18 Vu :1 837

Auteur : neocide

Ecrire un message privé

Site perso

Commentaire sur cette source (0)

Ajouter un commentaire et/ou une note

Description

Ce script permet de sauvegarder dans un fichier des commentaires que postent les visiteur.
On peut limiter le nombre de commentaires sauvegardés.
Une petite protection contre les trop longs mots qui deforment l'apparence de la page a été creer.

Source

<?
////////////////////////////////////////////////////////////////////////////
// CONFIGURATIONS //
////////////////////////////////////////////////////////////////////////////
$nbrCommentaireSauver = "10";
$nbrCaractMaxParMot = "100";
$messagesFile = "messages.dat";
$indexPage = "Neocide PitiMesaj v1.0.php";
if (!file_exists($messagesFile))
{
$msg = fopen("$messagesFile", "w+");
fclose($msg);
}
////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////
// ECRITURE DANS LE FICHIER //
////////////////////////////////////////////////////////////////////////////
if ($pseudo_message and $msg_message)
{
$tdate = getdate();
$jour = sprintf("%02.2d",$tdate["mday"])."/".sprintf("%02.2d",$tdate["mon"])."/".$tdate["year"];
$heure = sprintf("%02.2d",$tdate["hours"])."h".sprintf("%02.2d",$tdate["minutes"]);
$date_message = "le ".$jour." a ".$heure;
$pseudo_message = htmlentities($pseudo_message);
$pseudo_message = stripslashes($pseudo_message);
$pseudo_message = trim($pseudo_message);
$msg_message = htmlentities($msg_message);
$msg_message = ereg_replace("\n", "<br>", $msg_message);
$msg_message = stripslashes($msg_message);
$msg_message = trim($msg_message);
$contenu_original = file ("$messagesFile");
if ($msg = fopen("$messagesFile", "w"))
{
fputs ($msg, $date_message." | ".$pseudo_message." | ".$msg_message."\n");
while (list ($cle, $var) = each ($contenu_original))
{
if ($cle < $nbrCommentaireSauver-1)
{fputs ($msg, $var);}
}
fclose($msg);
}
else
{
echo "UN ERREUR S'EST PRODUITE";
}
}
////////////////////////////////////////////////////////////////////////////
?>
<html>
<head>
<style type="text/css">
font
{
font-family: Verdana;
font-size: 10px;
color: #000000;
}
</style>
<title>Neocide PitiMesaj</title>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<table width="645" border="0" cellspacing="0" cellpadding="0" align="center">
<tr align="center">
<td><font style="font-size:25px; font:bold;">Neocide PitiMesaj v1.0</font></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td valign="top"align="left"><font>
Ce script permet de sauvegarder dans un fichier des commentaires que postent les visiteur.<br>
On peut limiter le nombre de commentaires sauvegardés.<br>
Une petite protection contre les trop longs mots qui deforment l'apparence de la page a été creer.</font></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td valign="top"align="left">
<table width="750" border="0" cellspacing="0" cellpadding="1" bgcolor="#036905" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="3" bgcolor="#DDFBCE">
<tr valign="top">
<td align="left">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<?
////////////////////////////////////////////////////////////////////////////
// LECTURE DU CONTENU DU FICHIER //
////////////////////////////////////////////////////////////////////////////
$lecture_messagesFile = file ("$messagesFile");
while (list ($cle, $var) = each ($lecture_messagesFile))
{
$extractElement = explode(" | ", $var);
$messageDate = $extractElement[0];
$messagePseudo = $extractElement[1];
$messageMsg = $extractElement[2];
// Une petite inspiration du script :
// Comment'R 1.0 - (c) 2000 Thierry Arsicaud (deltascripts@ifrance.com).
while (ereg("([^ ]{".$nbrCaractMaxParMot."})[^ ]", $messageMsg, $motLong))
{
$motLong = $motLong[1];
$messageMsg = ereg_replace($motLong, $motLong." <br> ", $messageMsg);
}
// Merci Thierry Arsicaud ! :D)
?>
<tr>
<td><font><?echo"<b>$messagePseudo</b>, $messageDate :"?></font></td>
</tr>
<tr>
<td align="left"><font>
<blockquote>
<p><?echo$messageMsg?></p>
</blockquote></font>
</td>
</tr>
<?
////////////////////////////////////////////////////////////////////////////
}
?>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td valign="top"align="left"> </td>
</tr>
<tr>
<td valign="top"align="left">
<table width="650" border="0" cellspacing="0" cellpadding="1" bgcolor="#036905" align="center">
<tr>
<td>
<table width="100%" border="0" cellpadding="3" cellspacing="0" bgcolor="#DDFBCE">
<tr valign="top">
<td align="left">
<?
if ($pseudo_message && !$msg_message)
{
?>
<script language="javascript">alert("Tu as oubliç¾?e mettre ton messsage");</script>
<?
}
if (!$pseudo_message && $msg_message)
{
?>
<script language="javascript">alert("Tu as oubliç¾?e mettre ton pseudo");</script>
<?
}
?>
<form action="<?echo$indexPage?>" method="post">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="13%" align="right" valign="top"><font>Ton psuedo:</font></td>
<td width="87%">
<input type="text" name="pseudo_message" value="<?echo$pseudo_message?>" size="22"></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td align="right" valign="top"><font>Ton message:</font></td>
<td><textarea name="msg_message" cols="60" rows="7"><?echo$msg_message?></textarea></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td> </td>
<td>
<input type="submit" name="Envoyer" value=" Envoyer ">
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td align="center"><font>Script réaliser par Neocide (<a href="mailto:neocide@nomade.fr">neocide@nomade.fr</a>), 97.1 Kreasyon</font></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</body>
</html>

<?
////////////////////////////////////////////////////////////////////////////
// CONFIGURATIONS                                                         //
////////////////////////////////////////////////////////////////////////////
$nbrCommentaireSauver = "10";
$nbrCaractMaxParMot = "100";


$messagesFile = "messages.dat";
$indexPage = "Neocide PitiMesaj v1.0.php";

if (!file_exists($messagesFile))
         {
          $msg = fopen("$messagesFile", "w+");
          fclose($msg);
         }
////////////////////////////////////////////////////////////////////////////


////////////////////////////////////////////////////////////////////////////
// ECRITURE DANS LE FICHIER                                               //
////////////////////////////////////////////////////////////////////////////

if ($pseudo_message and $msg_message)
    {
     $tdate = getdate();
     $jour = sprintf("%02.2d",$tdate["mday"])."/".sprintf("%02.2d",$tdate["mon"])."/".$tdate["year"];
     $heure = sprintf("%02.2d",$tdate["hours"])."h".sprintf("%02.2d",$tdate["minutes"]);
     $date_message = "le ".$jour." a ".$heure;

     $pseudo_message = htmlentities($pseudo_message);
     $pseudo_message = stripslashes($pseudo_message);
     $pseudo_message = trim($pseudo_message);

     $msg_message = htmlentities($msg_message);
     $msg_message = ereg_replace("\n", "<br>", $msg_message);
     $msg_message = stripslashes($msg_message);
     $msg_message = trim($msg_message);

     $contenu_original = file ("$messagesFile");
     if ($msg = fopen("$messagesFile", "w"))
         {
          fputs ($msg, $date_message." | ".$pseudo_message." | ".$msg_message."\n");
          while (list ($cle, $var) = each ($contenu_original))
                 {
                  if ($cle < $nbrCommentaireSauver-1)
                      {fputs ($msg, $var);}
                 }
          fclose($msg);
         }
     else
         {
          echo "UN ERREUR S'EST PRODUITE";
         }
    }


////////////////////////////////////////////////////////////////////////////
?>
<html>
<head>
<style type="text/css">
font
  {
   font-family: Verdana;
   font-size: 10px;
   color: #000000;
  }
</style>
<title>Neocide PitiMesaj</title>
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<br>
<table width="645" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr align="center">
    <td><font style="font-size:25px; font:bold;">Neocide PitiMesaj v1.0</font></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td valign="top"align="left"><font>
      Ce script permet de sauvegarder dans un fichier des commentaires que postent les visiteur.<br>
      On peut limiter le nombre de commentaires sauvegardés.<br>
      Une petite protection contre les trop longs mots qui deforment l'apparence de la page a été creer.</font></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td valign="top"align="left">

      <table width="750" border="0" cellspacing="0" cellpadding="1" bgcolor="#036905" align="center">
        <tr>
          <td>

            <table width="100%" border="0" cellspacing="0" cellpadding="3" bgcolor="#DDFBCE">
              <tr valign="top">
                <td align="left">

                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <?
////////////////////////////////////////////////////////////////////////////
// LECTURE DU CONTENU DU FICHIER                                          //
////////////////////////////////////////////////////////////////////////////

$lecture_messagesFile = file ("$messagesFile");
while (list ($cle, $var) = each ($lecture_messagesFile))
       {
        $extractElement = explode(" | ", $var);
        $messageDate = $extractElement[0];
        $messagePseudo = $extractElement[1];
        $messageMsg = $extractElement[2];

        // Une petite inspiration du script :
        // Comment'R 1.0 - (c) 2000 Thierry Arsicaud (deltascripts@ifrance.com).
        while (ereg("([^ ]{".$nbrCaractMaxParMot."})[^ ]", $messageMsg, $motLong))
               {
                $motLong = $motLong[1];
                $messageMsg = ereg_replace($motLong, $motLong." <br> ", $messageMsg);
               }
        // Merci Thierry Arsicaud !  :D)
?>
                    <tr>
                      <td><font><?echo"<b>$messagePseudo</b>, $messageDate :"?></font></td>
                    </tr>
                    <tr>
                      <td align="left"><font>
                        <blockquote>
                          <p><?echo$messageMsg?></p>
                        </blockquote></font>
                      </td>
                    </tr>
                    <?
////////////////////////////////////////////////////////////////////////////
       }
?>
                  </table>

                </td>
              </tr>

            </table>

          </td>
        </tr>
      </table>

  </td>
  </tr>
  <tr>
    <td valign="top"align="left">&nbsp;</td>
  </tr>
  <tr>
    <td valign="top"align="left">

      <table width="650" border="0" cellspacing="0" cellpadding="1" bgcolor="#036905" align="center">
        <tr>
          <td>

            <table width="100%" border="0" cellpadding="3" cellspacing="0" bgcolor="#DDFBCE">
              <tr valign="top">
                <td align="left">
<?
if ($pseudo_message && !$msg_message)
    {
?>
<script language="javascript">alert("Tu as oubliç¾?e mettre ton messsage");</script>
<?
    }
if (!$pseudo_message && $msg_message)
    {
?>
<script language="javascript">alert("Tu as oubliç¾?e mettre ton pseudo");</script>
<?
    }
?>
                  <form action="<?echo$indexPage?>" method="post">
                    <table width="100%" border="0" cellpadding="0" cellspacing="0">
                      <tr>
                        <td width="13%" align="right" valign="top"><font>Ton psuedo:</font></td>
                        <td width="87%">
                        <input type="text" name="pseudo_message" value="<?echo$pseudo_message?>" size="22"></td>
                      </tr>
                      <tr>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr>
                        <td align="right" valign="top"><font>Ton message:</font></td>
                        <td><textarea name="msg_message" cols="60" rows="7"><?echo$msg_message?></textarea></td>
                      </tr>
                      <tr>
                        <td colspan="2">&nbsp;</td>
                      </tr>
                      <tr>
                        <td>&nbsp;</td>
                        <td>
                          <input type="submit" name="Envoyer" value="   Envoyer   ">
                        </td>
                      </tr>
                    </table>
                  </form>

                </td>
              </tr>
            </table>

          </td>
        </tr>
      </table>

    </td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td align="center"><font>Script réaliser par Neocide (<a href="mailto:neocide@nomade.fr">neocide@nomade.fr</a>), 97.1 Kreasyon</font></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>

</body>
</html>

Conclusion

Script réaliser par Neocide (neocide@nomade.fr), 97.1 Kreasyon

Sources du même auteur

ECRIR EN DEBUT DE FICHIERS SANS EFFACER LE RESTE - NEOCIDE

NEOCIDE MP3RENAMMER V1.1

NEOCIDE GALERIEAUTOMATIQUE SANS MYSQL V2.2

Toutes les sources de neocide

Sources de la même categorie

FORM TO MAIL AVEC PROTECTION PAR TOKEN ET CAPTCHA CONTRÔLES ... par cod57

FORMULAIRE VERS COURRIEL BASIQUE AVEC CONTRÔLE CAPTCHA ANTI ... par cod57

CHAT EN PHP ET JQUERY par pitchoubrazil

FORMULAIRE DE CHOIX MULTI-CONTACT VALIDE XHTML 1.0 TRANSITIO... par aventurier19

WEB MESSENGER par EvildarkEurope

Toutes les sources de la catégorie E-Mail / Messagerie

Commentaires et avis

Aucun commentaire pour le moment.

Ajouter un commentaire

Nos sponsors

Derniers Blogs

IMAGINE CUP 2012, MAKE A SIGN EN FINALE par junarnoalg

KINECT 1.5 IS OUT ! par Vko

LES ACTUALITéS DE LA SEMAINE SUR C2I.FR (14 MAI - 20 MAI) par richardc

REACTIVE EXTENSIONS : CONSOMMER DES SERVICES AVEC RX PARTIE 3, LES PIèGES à éVITER par Groc

SHAREPOINT BLOG SITE, PROBLèME D'ARCHIVES par junarnoalg

Forum

RE : REMPLIR UN TABLEAU à PARTIR DE LA FIN par Jeromedu79

RE : MYSQL_FETCH_ASSOC par moumenxavi

RE : MYSQL_FETCH_ASSOC par inwebo

RE : REMPLIR UN TABLEAU à PARTIR DE LA FIN par inwebo

RE : CHANGER LE CONTENU D'UNE PAGE WEB EN PHP EN CLIQUAN SUR UN BOUTON (J'AI BESOIN D'AIDE) par inwebo

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Realisation d-une version 2 d-un site e-commerce existant sous prestashop-REPUBLICATION
Budget : 5 000€
Recherche Infogerance Serveur Debian Linux
Budget : 1 800€
Creation d-un site vitrine avec MagentO
Budget : 2 000€

Logiciels

sDEVIS-FACTURES vlPRO (8.1.0.3)
SDEVIS-FACTURES VLPRO (8.1.0.3)

sDEVIS-FACTURES vlPRO a été mis au point pour les particuliers, créateurs, entrepreneurs, artisa...

Cliquez pour télécharger sDEVIS-FACTURES vlPRO
974 Application Server (12.2.4.6)
974 APPLICATION SERVER (12.2.4.6)

Développez de puissantes applications dans un environnement de 'cloud computing', clusterisé, séc...

Cliquez pour télécharger 974 Application Server
vPicture (1.4.2.1)
VPICTURE (1.4.2.1)

Avec vPicture, hébergez vos images facilement et rapidement. vPicture est un utilitaire simple, ...

Cliquez pour télécharger vPicture
Easy-Planning (2.2.1.6)
EASY-PLANNING (2.2.1.6)

Easy-Planning permet de créer des plannings sous la représentation de diagrammes et est adapté au...

Cliquez pour télécharger Easy-Planning
COM-BACKUP (2.0)
COM-BACKUP (2.0)

COM-BACKUP est un logiciel de sauvegarde qui permet de planifier les sauvegardes de vos dossiers ...

Cliquez pour télécharger COM-BACKUP