Ver Mensaje Individual
  #5 (permalink)  
Antiguo 04/06/2004, 13:19
oecarlitoz
Invitado
 
Mensajes: n/a
Puntos:
:: Hola cluster aqui te dejo mi codigo completo

Hola cluster, sabes he tratado de colocar la idea que me dices pero me da error no se si pùedes ver. aqui te dejo el codigo completo y el link para que lo puedas probar, como te daras cuenta los nuevos mensajes van quedanto en la ultima parte y yo quisieras que este en la parte superior.

El link donde lo puedes probar es este: www.cperu.net/a/articulo.php
Código PHP:
<HTML><BODY>
<FORM METHOD="Post" ACTION="<?=$PHP_SELF?>">
<div align="center"><B> <font size="3" face="Arial, Helvetica, sans-serif">Deja
tu marca:</font></B><font size="3" face="Arial, Helvetica, sans-serif"><br>
</font><font size="4" face="Arial, Helvetica, sans-serif"> </font> <b><font size="2" face="Arial, Helvetica, sans-serif">Nombre:
<INPUT NAME="nombre" TYPE="Text" id="nombre" SIZE=60 MAXLENGTH=60 style="font-size:10px;font-family:verdana;">
<br>
Mensaje:
<textarea name="opinion" cols="60" style="font-size:10px;font-family:verdana;"></textarea>
<br>
<INPUT TYPE="Submit" VALUE="Enviar Opinión">
</font></b></div>
</FORM>


</CENTER>
<div align="center">
  <TABLE WIDTH="48%" BORDER=0 ALIGN="Center" CELLPADDING=1 cellspacing="1" bgcolor="#006699">
    <TR> 
      <TD> <div align="center"><b><font color="#FFFFFF" size="2" face="Arial, Helvetica, sans-serif">MENSAJES 
          YA EXISTENTES</font></b></div></TD>
    </TR>
    <TR> 
      <TD bgcolor="#FFFFFF"> <table width="100%" border="0" cellpadding="1" cellspacing="1" bgcolor="#CCCCCC">
          <?
//Entre las comillas definimos el archivo que guardara las opiniones
$file "opiniones.txt"

//Se tramita el formulario y se guardan los nuevos datos.
if(!empty($opinion))
{
$fichero fopen($file"a");
fwrite($fichero"$nombre////$opinion\n");
fclose($fichero);

}

//Se inicia el proceso de impresion de los datos
if(file_exists($file)&&is_file($file))
{
$fichero fopen($file"r");

//Se extraen todas las lineas.
while(!feof($fichero))
{
$cadena fgets($fichero4096);
list(
$nom$men)=split('////'$cadena);

//Se elimina la lectura de los \n \r
if(!empty($cadena)){
?>
          <tr bgcolor="#FFFFFF"> 
            <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Nombre:</b></font><font size="1" face="Arial, Helvetica, sans-serif"> 
              <?=$nom?>
              </font></td>
            <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><b>Opini&oacute;n:<br>
              </b> </font><font size="1" face="Arial, Helvetica, sans-serif"> 
              <?=$men?>
              </font></td>
          </tr>
          <? }
}
//END WHILE
fclose($fichero);
}

?>
        </table></TD>
    </TR>
  </TABLE>
</div>
</BODY> </HTML>
espero que me puedas ayudar saludos