|
|
|
|
- Overview
- How to?
- Creating an RSS stream
- Examples
WINDEV, WEBDEV and WINDEV Mobile allow you to produce and/or consume an RSS feed (Rapid Simple Syndication). An RSS feed is used to produce (make available) a data stream in standard format. This data stream can be read (consumed) by an application. A reader of RSS feed is used to display one or more RSS feeds.
Creating an RSS stream To create an RSS feed: - Declare the rssStream, rssChannel and rssEntry variables.
- Describe the channel with the rssChannel properties.
- Describe the entries with the rssEntry properties.
- Add the channel then its entries into the stream.
Remarks: - A stream is made of channels. A channel is made of entries.
- We recommend that you use functions such as Add, Delete, … to handle the array of entries and the array of channels.
Examples Example for creating a RSS feed: MyStream is rssStream MyChannel is rssChannel MyEntry is rssEntry MyPath is string  // Characteristics of channel MyChannel.Title = "My site" MyChannel.Description = "Example of RSS 2.0 stream" MyChannel.UpdateDate = DateSys() + TimeSys() MyChannel.Link = "http://www.example.org" // Characteristics of entries of channel 1 MyEntry.Author = "pcsoft@pcsoft.fr" MyEntry.Description = "First news" MyEntry.Title = "News #1" // Adds the entry into the channel Add(MyChannel.Entry, MyEntry) // Adds the channel into the stream Add(MyStream.Channel, MyChannel)  // Saves the stream in a file MyPath = CompleteDir(fCurrentDir()) + "Rss.xml" rssSave(MyStream, MyPath)  // Displays the XML file of stream IF NOT ShellExecute(MyPath) THEN Error("ShellExecute('" + MyPath + "'). '" + ErrorInfo() + "'") END Caution: In this example, the additions performed by Add must be performed last to handle the requested element. You also have the ability to use the following code: MyStream is rssStream ChannelNum is int EntryNum is int MyPath is string  MyPath = CompleteDir(fCurrentDir()) + "Rss.xml"  // Describe and add the channel ChannelNum = 1 ChannelNum = Add(MyStream.Channel) MyStream.Channel[ChannelNum].Title = "My site" MyStream.Channel[ChannelNum].Description = "Example of RSS 2.0 stream" MyStream.Channel[ChannelNum].PublicationDate = Today() MyStream.Channel[ChannelNum].Link = "http://www.example.org"  // Describe and add the entry 1 EntryNum = Add(MyStream.Channel[ChannelNum].Entry) MyStream.Channel[ChannelNum].Entry[EntryNum].Title = "First news" MyStream.Channel[ChannelNum].Entry[EntryNum].Description = "News #1" MyStream.Channel[ChannelNum].Entry[EntryNum].Link = "http://www.example.org" MyStream.Channel[ChannelNum].Entry[EntryNum].PublicationDate = Today() EntryNum = Add(MyStream.Channel[ChannelNum].Entry)  // Describe and add the next entry MyEntry is rssEntry dynamic = MyStream.Channel[ChannelNum].Entry[EntryNum] MyEntry.Title = "Second news" MyEntry.Description = "News #2" MyEntry.Link = "http://www.example.org" MyEntry.PublicationDate = Today()  // Saves the stream in a file rssSave(MyStream, MyPath)  // Displays the XML file of stream IF NOT ShellExecute(MyPath) THEN Error("ShellExecute('" + MyPath + "'). '" + ErrorInfo() + "'") END
Related Examples:
|
Unit examples (WINDEV): The RSS functions
[ + ] Using the WLanguage RSS functions. These functions are used to read and create a stream. These functions can be handled by specific types of variables: rssStream, rssChannel,...
|
This page is also available for…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|