Ver Mensaje Individual
  #4 (permalink)  
Antiguo 28/07/2005, 14:08
Avatar de MaBoRaK
MaBoRaK
 
Fecha de Ingreso: abril-2003
Ubicación: La Paz - Bolivia
Mensajes: 2.003
Antigüedad: 21 años
Puntos: 35
loading...........


Código PHP:
function rss_enviar($_formato,$_rss_query,$title)
{
        //        $title="Leimnud - Manuales personales";
        $t=$_SERVER['SERVER_NAME'].$_SERVER['PHP_SELF'];
        $ty=explode("/",$t);
        array_pop($ty);
        //        $link="http://".implode("/",$ty)."/".INDEX;
        $linka="http://".implode("/",$ty)."/".INDEX;
        $_link="http://".implode("/",$ty)."/";
        if($_formato=='atom')
        {
                $_atom="<?xml version="1.0\" encoding=\"utf-8\"?>\n";
                
$_atom.="<feed version=\"0.3\" xmlns=\"http://purl.org/atom/ns#\">\n";
                
$_atom.="<title>".rss_encoding($title,true)."</title>\n";
                
$_atom.="<link rel=\"alternate\" type=\"text/html\" href=\"".$linka."\"/>\n";
                
$_atom.="<modified>".date("Y-m-d")."</modified>\n";
                
$_atom.="<author>\n";
                
$_atom.="<name>[email protected]</name>\n";
                
$_atom.="</author>\n";
        }
        if(
$_formato=='rdf')
        {
                
$_rdf="<?xml version=\"1.0\"?>\n";
                
$_rdf.="<rdf:RDF \n";
                
$_rdf.="xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\" \n";
                
$_rdf.="xmlns=\"http://my.netscape.com/rdf/simple/0.9/\" \n";
                
$_rdf.="xmlns:dc=\"http://purl.org/dc/elements/1.1/\" \n";
                
$_rdf.="xmlns:content=\"http://purl.org/rss/1.0/modules/content/\">\n";
                
$_rdf.="<channel>\n";
                
$_rdf.="<title>".rss_encoding($title,true)."</title>\n";
                
$_rdf.="<description>Sistema Leimnud</description>\n";
                
$_rdf.="<link>".$linka."</link>\n";
                
$_rdf.="<dc:date>".date("Y-m-d")."</dc:date>\n";
                
$_rdf.="</channel>\n";
        }
        if(
$_formato=='rss')
        {
                
$_rss="<?xml version=\"1.0\" encoding=\"utf-8\"?>\n";
                
$_rss.="<rss version=\"2.0\" \n";
                
$_rss.="   xmlns:admin=\"http://webns.net/mvcb/\"\n";
                
$_rss.="   xmlns:ag=\"http://purl.org/rss/1.0/modules/aggregation/\"\n";
                
$_rss.="   xmlns:atom=\"http://purl.org/atom/ns\"\n";
                
$_rss.="   xmlns:annotate=\"http://purl.org/rss/1.0/modules/annotate/\"\n";
                
$_rss.="   xmlns:audio=\"http://media.tangent.org/rss/1.0/\"\n";
                
$_rss.="   xmlns:blogChannel=\"http://backend.userland.com/blogChannelModule\"\n";
                
$_rss.="   xmlns:cc=\"http://web.resource.org/cc/\"\n";
                
$_rss.="   xmlns:company=\"http://purl.org/rss/1.0/modules/company\"\n";
                
$_rss.="   xmlns:content=\"http://purl.org/rss/1.0/modules/content/\"\n";
                
$_rss.="   xmlns:cp=\"http://my.theinfo.org/changed/1.0/rss/\"\n";
                
$_rss.="   xmlns:creativeCommons=\"http://backend.userland.com/creativeCommonsRssModule\"\n";
                
$_rss.="   xmlns:dc=\"http://purl.org/dc/elements/1.1/\"\n";
                
$_rss.="   xmlns:dcterms=\"http://purl.org/dc/terms/\"\n";
                
$_rss.="   xmlns:email=\"http://purl.org/rss/1.0/modules/email/\"\n";
                
$_rss.="   xmlns:ev=\"http://purl.org/rss/1.0/modules/event/\"\n";
                
$_rss.="   xmlns:geo=\"http://www.w3.org/2003/01/geo/wgs84_pos#\"\n";
                
$_rss.="   xmlns:geourl=\"http://geourl.org/rss/module/\"\n";
                
$_rss.="   xmlns:icbm=\"http://postneo.com/icbm\"\n";
                
$_rss.="   xmlns:image=\"http://purl.org/rss/1.0/modules/image/\"\n";
                
$_rss.="   xmlns:itunes=\"http://www.itunes.com/DTDs/Podcast-1.0.dtd\"\n";
                
$_rss.="   xmlns:l=\"http://purl.org/rss/1.0/modules/link/\"\n";
                
$_rss.="   xmlns:foaf=\"http://xmlns.com/foaf/0.1/\"\n";
                
$_rss.="   xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\"\n";
                
$_rss.="   xmlns:rdfs=\"http://www.w3.org/2000/01/rdf-schema#\"\n";
                
$_rss.="   xmlns:ref=\"http://purl.org/rss/1.0/modules/reference/\"\n";
                
$_rss.="   xmlns:reqv=\"http://purl.org/rss/1.0/modules/richequiv/\"\n";
                
$_rss.="   xmlns:rss091=\"http://purl.org/rss/1.0/modules/rss091#\"\n";
                
$_rss.="   xmlns:search=\"http://purl.org/rss/1.0/modules/search/\"\n";
                
$_rss.="   xmlns:slash=\"http://purl.org/rss/1.0/modules/slash/\"\n";
                
$_rss.="   xmlns:ss=\"http://purl.org/rss/1.0/modules/servicestatus/\"\n";
                
$_rss.="   xmlns:str=\"http://hacks.benhammersley.com/rss/streaming/\"\n";
                
$_rss.="   xmlns:sub=\"http://purl.org/rss/1.0/modules/subscription/\"\n";
                
$_rss.="   xmlns:sy=\"http://purl.org/rss/1.0/modules/syndication/\"\n";
                
$_rss.="   xmlns:taxo=\"http://purl.org/rss/1.0/modules/taxonomy/\"\n";
                
$_rss.="   xmlns:thr=\"http://purl.org/rss/1.0/modules/threading/\"\n";
                
$_rss.="   xmlns:wiki=\"http://purl.org/rss/1.0/modules/wiki/\"\n";
                
$_rss.="   xmlns:xhtml=\"http://www.w3.org/1999/xhtml\">\n";
                
$_rss.="<channel>\n";
                
$_rss.="<title>".rss_encoding($title,true)."</title>\n";
                
$_rss.="<link>".$linka."</link>\n";
                
$_rss.="<description>Sistema Leimnud</description>\n";
                
$_rss.="<docs>http://backend.userland.com/rss</docs>\n";
                
$_rss.="<generator>Leimnud RSS Creator</generator>\n";
                
$_rss.="<copyright>maborak.design</copyright>\n";
                
$_rss.="<webMaster>[email protected]</webMaster>\n";
                
$_rss.="<dc:language>en-us</dc:language>\n";
                
$_rss.="<dc:creator>Me ([email protected])</dc:creator>\n";
                
$_rss.="<dc:rights>Copyright 2005 Me</dc:rights>\n";
                
$_rss.="<dc:date>".date("Y-m-d")."</dc:date>\n";
                
$_rss.="<admin:generatorAgent rdf:resource=\"http://www.movabletype.org/?v=2.5\" />\n";
                
$_rss.="<admin:errorReportsTo rdf:resource=\"mailto:[email protected]\"/>\n";
        }
        while (
$l=mysql_fetch_array($_rss_query)) {
                if(
$_formato=='atom')
                {
                        
$_atom.="<entry>\n";
                        
$_atom.="<title>[".rss_encoding(CATEGORIA_pedircategoria($l['categoria']),true)."]-".rss_encoding($l['titulo'],true)."</title>\n";
                        
$_atom.="<link rel=\"alternate\" type=\"text/html\" href=\"http://".implode("/",$ty)."/".VER_PROCESADOR."&amp;articulo=".$l['ID']."\"/>\n";
                        
$_atom.="<issued>".$l['fecha']."</issued>\n";
                        
$_atom.="<modified>".$l['fecha']."</modified>\n";
                        
$_atom.="</entry>\n";
                }
                if(
$_formato=='rdf')
                {
                        
$_rdf.="<item>\n";
                        
$_rdf.="<title>[".rss_encoding(CATEGORIA_pedircategoria($l['categoria']),true)."]-".rss_encoding($l['titulo'],true)."</title>\n";
                        
$_rdf.="<link>http://".implode("/",$ty)."/".VER_PROCESADOR."&amp;articulo=".$l['ID']."</link>\n";
                        
$_rdf.="<content:encoded><![CDATA[
                                <style type=\"text/css\">
                                       @import url("
.$_link."white.linux.css);
                                </style>
                                <div  style=\"font-size:8pt;color:#000000;\">"
.salida(rss_encoding($l['articulo_preview'],false)).rss_encoding(ARTICULO_attach_files($l['ID']),false)."</div>
                                ]]></content:encoded>\n"
;
                        
$_rdf.="<dc:date>".$l['fecha']."</dc:date>\n";
                        
$_rdf.="</item>\n";
                }
                if(
$_formato=='rss')
                {
                        
$_rss.="<item>\n";
                        
$_rss.="<title>[".rss_encoding(CATEGORIA_pedircategoria($l['categoria']),true)."]-".rss_encoding($l['titulo'],true)."</title>\n";
                        
$_rss.="<category>".rss_encoding(CATEGORIA_pedircategoria($l['categoria']),true)."</category>\n";
                        
$_rss.="<link>http://".implode("/",$ty)."/".VER_PROCESADOR."&amp;articulo=".$l['ID']."</link>\n";
                        
$_rss.="<description>".rss_encoding($l['titulo'],true)."</description>\n";
                        
$_rss.="<content:encoded><![CDATA[
                                <style type=\"text/css\">
                                       @import url("
.$_link."white.linux.css);
                                </style>
                                <div  style=\"font-size:8pt;color:#000000;\">"
.salida(rss_encoding($l['articulo_preview'],false)).rss_encoding(ARTICULO_attach_files($l['ID']),false)."</div>
                                ]]></content:encoded>\n"
;
                        
$_rss.="<dc:subject>".rss_encoding(CATEGORIA_pedircategoria($l['categoria']),true)."</dc:subject>\n";
                        
$_rss.="<dc:date>".$l['fecha']."</dc:date>\n";
                        
$_rss.="</item>\n";
                }

        }

        if(
$_formato=='atom')
        {
                
$_atom.="</feed>";
                return 
$_atom;
        }
        if(
$_formato=='rdf')
        {
                
$_rdf.="</rdf:RDF>";
                return 
$_rdf;
        }
        if(
$_formato=='rss')
        {
                
$_rss.="</channel>\n";
                
$_rss.="</rss>";
                return 
$_rss;
        }
        return 
false;
}

connection closed.
__________________

Maborak Technologies