Send Ping to Yahoo! when RSS Feed is Updated

Download Chilkat HTTP ActiveX

How to ping Yahoo! when an RSS feed has been updated, using the REST interface.

LOCAL loHttp
LOCAL lnSuccess
LOCAL lcResponseText


loHttp = CreateObject('Chilkat.Http')

*  Any string unlocks the component for the 1st 30-days.
lnSuccess = loHttp.UnlockComponent("Anything for 30-day trial")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loHttp.LastErrorText)
    QUIT
ENDIF

*  Yahoo indicates that The REST interface:
*  URL: http://ping.feeds.yahoo.com/rss/ping
*  Parameter(s): u=<site or feed url>
*  HTTP method: GET

*  The RSS2 feed URL for blog.chilkatsoft.com is:
*  http://blog.chilkatsoft.com/?feed=rss2

*  Send the HTTP GET and return the content in a string.

lcResponseText = loHttp.QuickGetStr("http://ping.feeds.yahoo.com/rss/ping?u=http://blog.chilkatsoft.com/?feed=rss2")

? lcResponseText