Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ASP - EXEMPLE SIMPLE DE GÉNÉRATION DE FLUX RSS


Information sur la source

Catégorie :Astuces Classé sous : rss, odbc, génération, xml Niveau : Débutant Date de création : 23/08/2004 Date de mise à jour : 23/08/2004 23:48:39 Vu : 9 676

Note :
8,5 / 10 - par 2 personnes
8,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note


Description

Dans cet exemple, nous utiliserons une connexion ODBC dont le DSN est déclaré sur le serveur.
La Table possède les champs suivant :
- ID  : Id de la nouvelle en cours
- AUTEUR : Auteur de la nouvelle en cours
- DATENEWS : Date de la nouvelle en cours
- MESSAGE : Message de la nouvelle


 

Source

  • <%
  • Set objconn= server.CreateObject("ADODB.connection")
  • Set objrec=Server.CreateObject("ADODB.recordset")
  • objconn.open "DSNNouvelles"
  • SQL = "SELECT * FROM NOUVELLES ORDER BY DATENEWS DESC"
  • objrec.ActiveConnection = objconn
  • objrec.Source = SQL
  • objrec.CursorType = 0
  • objrec.CursorLocation = 2
  • objrec.LockType = 3
  • objrec.Open()
  • if Not Objrec.eof Then
  • Response.Charset = "UTF-8"
  • response.ContentType = "text/xml"
  • xml = "<?xml version=""1.0"" encoding=""UTF-8""?><rss version=""2.0""><channel>"
  • xml = xml &"<title>Exemple de flux RSS en ASP</title>"
  • xml = xml &"<link>http://www.aspfr.com</link>"
  • xml = xml &"<description>Les dernières nouvelles</description>"
  • xml = xml &"<managingEditor>adressemail@fournisseur.com</managingEditor>"
  • xml = xml &"<language>fr</language>"
  • xml = xml &"<generator>ASPFR</generator>"
  • xml = xml &"<copyright>ASPFR</copyright>"
  • xml = xml &"<webMaster>ASPFR Webmaster</webMaster>"
  • While not Objrec.eof
  • id = objrec("ID")
  • titre = objrec("AUTEUR") &" - Nouvelle Du Site"
  • news = trim(objrec("MESSAGE"))
  • news = replace(news, "<BR>", "<BR/>")
  • news = replace(news, "&", "&amp;")
  • news = replace(news, "<", "&lt;")
  • news = replace(news, ">", "&gt;")
  • xml = xml &"<item>"
  • xml = xml &"<author>"& objrec("AUTEUR") &"</author>"
  • xml = xml &"<title>"& titre &"</title>"
  • xml = xml &"<link>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</link>"
  • xml = xml &"<pubDate>"& objrec("DATENEWS") &" GMT</pubDate>"
  • xml = xml &"<guid>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</guid>"
  • xml = xml &"<comments>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</comments>"
  • xml = xml &"<description>"
  • xml = xml &" news
  • xml = xml &"</description></item>"
  • objrec.movenext
  • Wend
  • xml = xml &"</channel></rss>"
  • Response.Write xml
  • End If
  • %>
<%
Set objconn= server.CreateObject("ADODB.connection")
Set objrec=Server.CreateObject("ADODB.recordset")
objconn.open "DSNNouvelles"

SQL = "SELECT * FROM NOUVELLES ORDER BY DATENEWS DESC"

objrec.ActiveConnection = objconn
objrec.Source = SQL
objrec.CursorType = 0
objrec.CursorLocation = 2
objrec.LockType = 3
objrec.Open()

if Not Objrec.eof Then 
   Response.Charset = "UTF-8"
   response.ContentType = "text/xml"
   xml = "<?xml version=""1.0"" encoding=""UTF-8""?><rss version=""2.0""><channel>"
   xml = xml &"<title>Exemple de flux RSS en ASP</title>"
   xml = xml &"<link>http://www.aspfr.com</link>"
   xml = xml &"<description>Les dernières nouvelles</description>"
   xml = xml &"<managingEditor>adressemail@fournisseur.com</managingEditor>"
   xml = xml &"<language>fr</language>"
   xml = xml &"<generator>ASPFR</generator>"
   xml = xml &"<copyright>ASPFR</copyright>"
   xml = xml &"<webMaster>ASPFR Webmaster</webMaster>"
   While not Objrec.eof
      id = objrec("ID")
      
      titre = objrec("AUTEUR") &" - Nouvelle Du Site"
      news = trim(objrec("MESSAGE"))
      news = replace(news, "<BR>", "<BR/>")
      news = replace(news, "&", "&amp;")
      news = replace(news, "<", "&lt;")
      news = replace(news, ">", "&gt;")
      
      xml = xml &"<item>"
      xml = xml &"<author>"& objrec("AUTEUR") &"</author>"
      xml = xml &"<title>"& titre &"</title>"
      xml = xml &"<link>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</link>"
      xml = xml &"<pubDate>"& objrec("DATENEWS") &" GMT</pubDate>"
      xml = xml &"<guid>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</guid>"
      xml = xml &"<comments>http://VotreSiteWeb/VotrePagedeLecture.asp?ValeurID="& id &"</comments>"
      xml = xml &"<description>"
      
      xml = xml &" news
      
      xml = xml &"</description></item>"
      objrec.movenext   
   Wend

   xml = xml &"</channel></rss>"
   Response.Write xml
End If
%>

Conclusion

Bon coding

Romelard Fabrice (Alias F___)
 

Historique

23 août 2004 23:48:39 :
Correction de petites erreurs.

Commentaires et avis

signaler à un administrateur
Commentaire de ultiny le 29/12/2006 10:28:39

Bonjour,

J'ai essayé de réaliser une page semblable en C#, et pour des raisons de test, pour l'instant je mets mon Xml dans la page Html à la suite de la directive de page.

Dans la partie code (fichier .aspx.cs) je demande à overwriter le charset, le mimetype de la page etc... mais elle s'affiche tout de même sous la forme Html dans IE7 (comme si je n'avais pas changé le ContentType.

Voici mes 3 lignes :

protected void Page_Load(object sender, EventArgs e)
{
    Response.ContentType = "text/xml";
    Response.Charset = "UTF-8";
    Response.ContentEncoding = System.Text.Encoding.UTF8;
}

Quelqu'un connais la raison du problème ?
Merci.

signaler à un administrateur
Commentaire de fabrice69 le 29/12/2006 13:39:21 administrateur CS

Bonjour,

Cette source est en ASP, votre question est sur du .NET en C#, je vous invite donc à la poser sur le forum et non sur cette source.

Cordialement
Romelard Fabrice

signaler à un administrateur
Commentaire de zepokpok le 07/11/2007 17:57:53

Salut !

ta source me semble excellente et exactement ce que je recherche par contre il me manque des bases pour la mettre en place.

quand tu dis : "Dans cet exemple, nous utiliserons une connexion ODBC dont le DSN est déclaré sur le serveur.
La Table possède les champs suivant :"

qu'est ce que ça veut dire ? (je débute)
qu'est ce que je dois faire sur mon serveur concretement ?
dois je créer une vraie base de données ?
pas sous acces j'imagine ?

merci infiniment !

signaler à un administrateur
Commentaire de zora123 le 09/04/2009 11:02:58 7/10

bonjour Fabrice , mon pb est que je dois creer une datatable acces et l'a remplir a partir d'un fichier xml,je viens juste de commencer la programmation en c#  et je suis un peu perdu :-(, pourriez vous m'aider svp , merci et bon courage.

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

génération HTML d'après XML [ par chris53 ] Je dois générer doit marcher pour tous les navigateurs... Les données sont présentes dans un fichier XML.Je souhaite donc générer le document HTML côt RSS et publication [ par gyzmo222 ] Salut,Mon probl&#232;me n'est surement pas tr&#232;s compliqu&#233; mais je ne m'y connais vraiment pas en rss.J'ai r&#233;ussi &#224; cr&#233;er un r Génération d'XML avec ASP.net via une BDD [ par fabienfs ] Bonjour, J'ai conçu une galerie produits en Flash et j'ai besoin de récupérer dynamiquement des donnés via du XML. Pour l'instant mes données sont don flux rss sur page .asp [ par sliverdust ] Bonjour,j'ai utilisé le script  Générer un flux RSS en asp3.En utilisant le script que j'ai légèrement modifier pour l'adapter à mon cas(base access). rss et asp [ par drjey ] Salut j'aimerais savoir comment faire construire une page rss avec des elements tires d'une base de donnee.C'est a dire un fichier rss (xml) qui soit xml [ par imedgamra ] bonjour,je veux créer un flux rss qui s'affiche sur le bureau j'ai installé un lecteur rss(infoscape 1.7) je sais bien que ce lecteur doit consulter u Géréner de l'RSS en ASP : l'extension peut-elle être XML [ par gipp ] Bonjour,Lorque je génére de l'RSS en ASP, l'extension de l'URL est naturellement ".asp" !Je souhaiterai savoir comment faire si je désire que mon URL [ASP][XML] probleme lecture du fichier xml [ par dragonrunne ] Salut,j'ai un soucis avec ce code :    dir = Server.MapPath("..\")    Set objxlang= Server.CreateObject("Microsoft.XMLDOM")    xml_lang="http://www.pl fichier xml [ par marmarak ] miraje suis en train de realiser une application qui consiste a creer un fichier xml pour afficher un flux rss , je veux savoir si ce fichier sera mis XML [ par imedgamra ] Bonjourje code en php pour créer un fichier xml , les informations de ce fichier sont récupérées d'uune base de donnée ,je veux savoir si ce fichier s


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,608 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.