-->
$config=array("","","","","","");
$config['BDServidorLinks']="217.76.131.29";
$config['BDloginLinks']="qs617";
$config['BDPassLinks']="BWnet09";
$config['codigolink']="20";///////////////////////////////////// MODIFICABLE
$config['numeroenlace']="1";///////////////////////////////////// MODIFICABLE
$config['numerotexto']="3";///////////////////////////////////// MODIFICABLE
$CampoEnlace=trim("Url".$config['numeroenlace']);
$CampoTexto=trim("Txt".$config['numerotexto']);
$conn2 = mysql_connect($config['BDServidorLinks'],$config['BDloginLinks'],$config['BDPassLinks']);//selecciono la BBDD
mysql_select_db($config['BDloginLinks'],$conn2); //ECHO "Conectado";
$ssql="SELECT * FROM `INTERCAMBIOLINKS` where (`Relacion` like '%,".$config['codigolink'].",%' OR UCASE(RelacionConTodos)='SI') AND Publicar='SI'"; // echo $ssql;exit();
$rsLinks = mysql_query($ssql,$conn2);
$InicioLetra="";
$RutaFotos="";
$Url=array("");$Literal=array("");
if (mysql_num_rows($rsLinks)==0) {
//ECHO "SIN LINKS ";EXIT();
}else{
//$Url=array("sanromangrupo.com","eurocar2007.com","bocamix2000.com","mesonpaco.com"
//,"carniceriarasan.com","residenciaschampagnat.com","desatascosintecal.com","condicioneslegales"
//,"","","","");
//$Literal=array("Naves, Oficinas, Locales en Salamanca","Mecánicos Compraventa de Automóviles","Hamburguesas a domicilio Salamanca","Carnes a la brasa"
// ,"Carnicerias Salamanca Rasan","Alquileres a Estudiantes en Salamanca","Desatascos y Desatrancos en Salamanca","Calderas de Gas Gasoleo Roca"
//,"","","","");
$kk=0; //ECHO "NUMERO REGISTROS = ".mysql_num_rows($rsLinks)."
";
while ($filaLinks = mysql_fetch_array($rsLinks)) { //$fila = mysql_fetch_object($rs)) {
if ($filaLinks['Codigo']==Null){$Codigo="";}ELSE{$Codigo=$filaLinks['Codigo'];}; //echo "Codigo =".$Codigo."
";
IF ($filaLinks[$CampoEnlace]==Null){
if ($filaLinks['Url1']==Null){$URL="";}else{$URL=$filaLinks['Url1'];}
}ELSE{
$URL=$filaLinks[$CampoEnlace];
}
IF ($filaLinks[$CampoTexto]==Null){
if ($filaLinks['Txt1']==Null){$Txt="";}else{$Txt=$filaLinks['Txt1'];}
}ELSE{
$Txt=$filaLinks[$CampoTexto];
} //ECHO $URL."-".$Txt."
";
if ($URL<>"" and $Txt<>""){
$Url[$kk]=$URL;$Literal[$kk]=$Txt;$kk=$kk+1;
}
}
//EXIT();
$ValoresURL=array("","",""
,"","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","");
$ValoresLiteral=array("","",""
,"","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","","","","","","","","",
"","","");
$kkk=$kk;
For ($i=0;$i<30;$i++) {
if ($ValoresURL[$i]=="") {
}else{
$Url[$kkk]=$ValoresURL[$i];$Literal[$kkk]=$ValoresLiteral[$i];$kkk=$kkk+1;
}
}
}
//EXIT();
$LineaEnBlanco=" ";
?>
$Cad="";
for ($kk = 0; $kk < sizeof($Url); $kk++) {
if ($Url[$kk]<>"") {
$Cad.=$LineaEnBlanco;
$Cad.="
";
$Cad.=" ";
}
}
echo $Cad;?>
".$InicioLetra.$Literal[$kk]." ";
$kk=$kk+1;
IF (ISSET($Url[$kk])) {
$Cad.="".$InicioLetra.$Literal[$kk]." ";
}ELSE{
$Cad.=$LineaEnBlanco;
}
$Cad.="