/////// Pasa la palabra clave del tema por la url $palabra = $_GET['palabra']; /////// echo ''; echo ''; echo '
'; echo ''; echo ''; echo ''; echo '| ';
/////// Separador
echo' '; echo "Frases de " . $palabra . " "; echo ' '; /////// $archivo = fopen("archivo.dat","r"); $numeroregistrosenarchivo = 0; while(!feof($archivo)) { $fecha=fgets($archivo); $fecha = trim ( $fecha ); $empresa=fgets($archivo); $empresa = trim ( $empresa ); $titulo=fgets($archivo); $titulo = trim ( $titulo ); $notadeprensa=fgets($archivo); $notadeprensa = trim ( $notadeprensa ); $url=fgets($archivo); $url = trim ( $url ); $tema=fgets($archivo); $tema = trim ( $tema ); $eliminar = $url; $editar = $url; if ($fecha != '') { if ($tipoweb == 1) { echo'' . $titulo . ' '; echo '' . $fecha . ' | Eliminar | Editar '; } if (($tipoweb == 2) || ($tipoweb == 3)) { $palabra = strtolower ( $palabra ); //// Pasa a minúsculas $titulosinmayusculas = strtolower ( $titulosinmayusculas ); //// Pasa a minúsculas ///// Palabras con acentos, eñes, dieresis; pasarlas a minúsculas $titulosinmayusculas = ereg_replace ( "Ñ" , "ñ" , $titulo ); $titulosinmayusculas = ereg_replace ( "Á" , "á" , $titulo ); $titulosinmayusculas = ereg_replace ( "É" , "é" , $titulo ); $titulosinmayusculas = ereg_replace ( "Í" , "í" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ó" , "ó" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ú" , "ú" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ä" , "ä" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ë" , "ë" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ï" , "ï" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ö" , "ö" , $titulo ); $titulosinmayusculas = ereg_replace ( "Ü" , "ü" , $titulo ); ///// if (strstr($titulosinmayusculas,$palabra)) //////// Lista si está esa palabra en la frase { ////////////////////////// Inserta la imagen "NUEVA", para indicar que la frase es nueva de hoy $imagenfrasenueva = ''; $fechahoyreal = date("d-m-Y"); $fechahoyreal = trim ( $fechahoyreal ); if ($fecha == $fechahoyreal ) { $imagenfrasenueva = ' ';
}
//////////////////////////
echo' ' . $imagenfrasenueva . '' . $titulo . ''; echo' (' . $empresa . ') '; ///////// echo ' ' . $fecha . ' | Eliminar | Editar '; } } if ($tipoweb == 4) { echo'' . $titulo . ' '; echo '' . $fecha . ' | Eliminar | Editar '; } } $numeroregistrosenarchivo = $numeroregistrosenarchivo +1; } echo ' '; echo " |
| Frases'; echo ' | '; echo ' |