"; }elseif($Tema_ID==0){ // Saco los datos del foro $PA = " SELECT Titulo "; $PA .= " FROM tbForos "; $PA .= " WHERE Foro_ID = ".$Foro_ID." "; $PA .= " AND bActivo = 1 "; $PA .= $WHERE; $PA .= " LIMIT 1 "; $resultado = execPA($PA); $NumElementos=mysql_affected_rows(); if($NumElementos==1){ $Titulo_Foro = stripslashes(ValorCelda($resultado,0,"Titulo")); $strHtml .= maquetarNegativo("Lo sentimos, el sistema no encontro el tema seleccionado."); $strHtml .= "
Pulsa aquí para volver al foro ".$Titulo_Foro."
"; }else{ $strHtml .= maquetarNegativo("Lo sentimos, el sistema no encontro el tema seleccionado."); $strHtml .= "
Pulsa aquí para volver a la página principal.
"; } }else{ // Saco los datos del foros y mensaje, aprovecho para mirar si el usuario puede ver este foro $PA = " SELECT tbForos.bCerrado bCerrado, tbTemas.bCerrado bTemaCerrado,"; $PA .= " tbForos.Titulo Titulo_Foro, tbTemas.Titulo Titulo_Tema,"; $PA .= " tbTemas.Foro_ID_moveto, tbTemas.Tema_ID_moveto"; $PA .= " FROM tbForos, tbTemas"; $PA .= " WHERE tbForos.Foro_ID = tbTemas.Foro_ID "; $PA .= " AND tbTemas.Foro_ID = ".$Foro_ID." "; $PA .= " AND tbForos.bActivo = 1 "; $PA .= " AND tbTemas.Foro_ID = ".$Foro_ID." "; $PA .= " AND tbTemas.Tema_ID = ".$Tema_ID." "; $PA .= " AND tbTemas.bValidado = 1 "; $PA .= $WHERE; //$PA .= " ORDER BY tbForos.Orden ASC, tbTemas.bDestacado DESC, tbTemas.Orden ASC"; $resultado = execPA($PA); $NumElementos=mysql_affected_rows(); if($NumElementos<=0){ // Saco los datos del foro $PA = " SELECT Titulo "; $PA .= " FROM tbForos "; $PA .= " WHERE Foro_ID = ".$Foro_ID." "; $PA .= " AND bActivo = 1 "; $PA .= $WHERE; $PA .= " LIMIT 1 "; $resultado = execPA($PA); $NumElementos=mysql_affected_rows(); if($NumElementos==1){ //Miremos a ver si esta redireccionado mas de una vez... $PA = " SELECT tbTemas.Foro_ID "; $PA .= " FROM tbForos, tbTemas"; $PA .= " WHERE tbForos.Foro_ID = tbTemas.Foro_ID "; $PA .= " AND tbForos.bActivo = 1 "; $PA .= " AND tbTemas.Tema_ID = ".$Tema_ID." "; $PA .= " AND tbTemas.bValidado = 1 "; $PA .= $WHERE; $PA .= " LIMIT 1"; //$PA .= " ORDER BY tbForos.Orden ASC, tbTemas.bDestacado DESC, tbTemas.Orden ASC"; $resultadoRedir = execPA($PA); $NumElementos=mysql_affected_rows(); if($NumElementos==1){ $Foro_ID_redir =intval(ValorCelda($resultadoRedir,0,"Foro_ID")); if($Foro_ID_redir>0){ header("location: ".SERVER.DOC_ROOT.DIR_FOROS."tema.php?Foro_ID=".$Foro_ID_redir."&Tema_ID=".$Tema_ID); }else{ $Titulo_Foro = stripslashes(ValorCelda($resultado,0,"Titulo")); $strHtml .= maquetarNegativo("Lo sentimos, el sistema no encontro el tema seleccionado."); $strHtml .= "
Pulsa aquí para volver al foro ".$Titulo_Foro."
"; } }else{ $Titulo_Foro = stripslashes(ValorCelda($resultado,0,"Titulo")); $strHtml .= maquetarNegativo("Lo sentimos, el sistema no encontro el tema seleccionado."); $strHtml .= "
Pulsa aquí para volver al foro ".$Titulo_Foro."
"; } }else{ $strHtml .= maquetarNegativo("Lo sentimos, el sistema no encontro el tema seleccionado."); $strHtml .= "
Pulsa aquí para volver a la página principal.
"; } }else{ $Titulo_Foro = stripslashes(ValorCelda($resultado,0,"Titulo_Foro")); $Titulo_Tema = stripslashes(ValorCelda($resultado,0,"Titulo_Tema")); $bCerrado = ValorCelda($resultado,0,"bCerrado"); $bTemaCerrado =intval( ValorCelda($resultado,0,"bTemaCerrado")); // Saco los mensajes de este tema $PA = " SELECT tbMensajes.Mensaje_ID, tbMensajes.Texto, tbMensajes.Autor, tbMensajes.Autor_ID, tbMensajes.EMail, tbMensajes.Fecha, tbMensajes.LinkImagen"; $PA .= " ,tbCliente.ExtensionAvatar "; $PA .= " FROM tbMensajes LEFT JOIN tbCliente ON tbMensajes.Autor_ID=tbCliente.Cliente_ID"; $PA .= " WHERE tbMensajes.bValidado = 1 AND tbMensajes.Tema_ID = ".$Tema_ID." "; $PA .= " ORDER BY tbMensajes.Fecha ASC"; $resultado = execPA($PA); $NumElementos=mysql_affected_rows(); if($NumElementos<=0){ $strHtml .= maquetarNegativo("No hay mensajes en este tema"); }else{ $RegPag = PAGS_MAX_VER_FOROS; $inicio = intval(parametro("inicio")); $final = $inicio+$RegPag; if($final>$NumElementos){ $final=$NumElementos; } if($NumElementos==1){ $strHtml .= "
Se ha encontrado ".$NumElementos." mensaje.
\n"; }else{ $strHtml .= "Se han encontrado ".$NumElementos." mensajes. "; $strHtml .= "Se listan del ".($inicio+1)." al ".$final.":
\n"; } if(!$bCerrado && !$bTemaCerrado){ $strHtml .= ""; } $strHtml .= "| ";
$strHtml .= "Publicado: ".$Fecha." "; if($Autor!=""){ if($Autor_ID>0){ $strHtml .= "Autora: ".$Autor." \n"; //Avatar if(strlen($ExtensionAvatar)>0){ $strHtml .= " ![\"".codeToAlt($Autor)."\"](\"".SERVER.DOC_ROOT.DIR_IMAGENES."no_avatar.jpg\"){kind=avatar} \n"; }else{ $strHtml .= "Autora: ".$Autor." \n"; } } // if($EMail != ""){ // $strHtml .= "E-mail: ".$EMail." "; // } $strHtml .= " | ";
$strHtml .= "";
//Citar
//$strHtml .= " ".nl2br($Texto)." "; $strHtml .= "".$Texto." "; if(trim($LinkImagen)!=""){ $strHtml .= " | ";
$strHtml .= "
Estas en: Foros >