u229
Applications Home|Email

 Create Atom 1.0 Feeds With Classic ASP

This vbscript class implements most features described by the Atom 1.0 reference.

 

Minimum code needed to create a valid Atom 1.0 feed:

Set oAtom = New cCreateAtomFeed

With oAtom
    .SavePath = Server.MapPath("atom.xml")
    .Title "My Atomic News Service", "text"
    .ID = "http://www.yourdomain.com/"
    .Updated = "2006-04-12T23:20:50Z"
    Call .CreateAtomFeed(oRecordset)

End With

All features available for the feed header:

Set oAtom = New cCreateAtomFeed

With oAtom
    '// THE ATOM HEADER:
    .SavePath = Server.MapPath("atom.xml")
    .Title "My Atomic News Service", "text"
    .ID = "http://www.yourdomain.com/"
    .Updated = "2006-04-12T23:20:50Z"
    .Author "Elvis Presley", "elvis@presley.com", "http://www.elvis-presley.com/"
    .LinkSelf = "http://www.yourdomain.com/atom.asp"
    .LinkAlternate = "http://www.yourdomain.com/"
    .Stylesheet = "style.css"
    .SubTitle "My Sub Title Goes Here.", "text"
    .Contributor "Priscilla Presley", "priscilla@presley.com", "http://www.priscilla-presley.com/"
    .Rights "Copyright (c) 2006, Your Name", "text"
    .Generator "u229Atom", "http://www.u229.no/stuff/atom/", "1.0"
    .Category = "Sports, Football"
    .Icon = "http://www.mydomain.com/icon.jpg"
    .Logo = "http://www.mydomain.com/logo.jpg"

    '// THE ATOM BODY:
    Call .CreateAtomFeed(oRecordset)

End With

[Valid Atom 1.0]

 

PRICE: FREE.

 View cCreateAtomFeed.txt

 Download demo project

Therefore: For that or this for it.
© www.u229.no