Me ha emocinado tanto que no tengo por menos que utilizar el sistema para difundir mi dicha, (y otra sensación), por el triunfo de un Mallorquin Español en el Open de Australia. Bravo Rafa Naldal, ERES EL MEJOR!! Gracias por hacernos sentir con tu humildad parte de tu triunfo. Que bien has hablado de Federer, mi madre decía que le encantaba jugando pero que el tio era una máscara suiza. Casí me entusiasmado más cuando Rogerd Federer lloraba o casi porque es una persona que seguro que apreciamos todos. Bravo Rafa je je y esto es el comienzo de muchas sensaciones. La imagen que pongo es de la tele de https://www.cuatro.com/ que la verdad, es que los deportes Manú Carreño es un tio que además de hacerlo de lo mejorcito, nos trae suerte. Podemos!! ¿Cuando ganamos el próximo?
/***
función conectar
que = se conecta a mysql y devuelve el identificador de conexión
***/
$link =mysqli_connect ("db497536567.db.1and1.com", "dbo497536567", "ZARt7QqgHHtt5TRs673rE43") or die ('I cannot connect to the database because: ' . mysqli_error());
mysqli_select_db($link,$db);
function conectar(){
global $HOSTNAME,$USERNAME,$PASSWORD,$DATABASE;
$idcnx = mysqli_connect($HOSTNAME, $USERNAME, $PASSWORD) or DIE (mysqli_error());
mysqli_select_db($idcnx, $DATABASE);
return $idcnx;
}
function generar_xml() {
//nombre del xml.
$nombreFichero = "directorio.xml";
//sql para el xml ( todo los datos )
$sqlFichero = "SELECT id,nome,e_mail,web,tituloweb,clave_usuario FROM systema";
//resultado de consulta de fichero.
$resFichero = mysql_query($sqlFichero) or die("No se puedo actualizar fichero xml");
//revisamos si hay datos.
if(mysqli_num_rows($resFichero) > 0){
$salida = "\n";
//parseamos la información guardándola en $salida.
while($fila = mysqli_fetch_array($resFichero)){
$salida .= "\t\n";
$salida.=" tituloweb='".utf8_encode($fila['tituloweb'])."'";
$salida.=" clave_usuario='".utf8_encode($fila['clave_usuario'])."'";
}
//cerramos la etiqueta principal
$salida.="";
//creación del fichero.
//lo abrimos
$fp = fopen($nombreFichero,"w");
//escribimos el contenido de $salida en el.
fwrite($fp,$salida);
//cerramos el archivo
fclose($fp);
}else{
//si no hay datos borramos el xml.
unlink($nombreFichero);
}
}
$meses = array ("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
//list box con los meses.
function makeMesList($nombre,$selected){
global $meses;
if(!isSet($selected)){$poner = "selected";}
echo"\n\t";
}//fin makeMesList
//list box con números.
function makeNumList($from,$cuantos,$nombre,$selected){
echo"\n\t";
}//fin makeNumList
function formatFecha($fecha){
global $meses;
$mes =substr($fecha, 4, 2);
settype($mes,"integer");
return ($meses[$mes].date( " d,Y", mktime(0,0,0,substr ($fecha, 4, 2),substr ($fecha, 6, 2),substr ($fecha, 0, 4)) ));
} // end func
//actualiza el xml de agenda.
function actualizarXmlAgenda(){
//nombre del xml
$agendaxml = "agenda.xml";
$res = mysqli_query($cnx,"SELECT id,cabecera,texto,web,fecha,foto FROM agenda ORDER BY fecha DESC,id DESC")or die(mysqli_error());
if( mysqli_num_rows ($res) > 0 ){
$salida = "\n";
//organidor por fecha
$cfecha = 0;
while(list($id,$cabecera,$texto,$web,$fecha,$foto) = mysqli_fetch_array($res)){
//revisamos si hay cambio de fecha.
if($fecha != $cfecha){
//si es la primer fecha.
if($cfecha == 0){
//es la primer etiqueta.
$salida .= "\t\n";
}else{
//no es la primer fecha, cerramos la etiqueta anterior y ponemos la nueva.
$salida .="\t\n\t\n";
}
//actualizamos cfecha.
$cfecha = $fecha;
}//fin if de fecha.
//datos normales.
//revisamos si tiene o no imagen.
$fotoUrl = ($foto == "" || $foto == "N/A")?("n/a"):("https://www.cybersanto.es/fotos/$foto");
$salida .= "\t\t\n";
}//fin del while
//fin del xml
$salida .="\t\n";
//abrimos el fichero.
$fp = fopen($agendaxml,"w");
//escribimos el contenido de $salida en el.
fwrite($fp,$salida);
//cerramos el fichero
fclose($fp);
}else{
//no hay registros borramos la agenda
//revisamos si el archivo existe
if( is_file($agendaxml)){
//si existe lo borramos
unlink ($agendaxml);
}
}//fin if/else de resltados
}
// end func
?>
Fatal error: Uncaught Error: Call to undefined function conectar() in /var/www/vhosts/cybersanto.es/httpdocs/muestra.php:9
Stack trace:
#0 /var/www/vhosts/cybersanto.es/httpdocs/noticias/Rafa-Nadal-Campeon-del-Open-de-Australia.php(121): recoge_datos()
#1 {main}
thrown in /var/www/vhosts/cybersanto.es/httpdocs/muestra.php on line 9