RSS of User's Checked out Items
Oct 11th, 2004 by Karen
RSS of User's Checked out Items
After several hours of work this week I got an RSS feed of checked out
books for a user created. It took quite a bit of playing but it is
working quite well now. The difficult part wasn't writing an XSL to
transform the XML I received from my catalog but rather sending the
catalog the proper instructions to send back the XML of a user's
checked out books.
Now
I am working on getting a search page which uses the XML server for our
catalog working. I have most of the code written but need to do some
more testing to before I am ready to go live. It is amazing how many
different applications there are for XML in today's libraries! Each day
I am learning a little bit more. Below is a snippet of code in ASP
which will gather XML from another server and transform it. You can
also get XML from another server and manipulate it with the DOM (which I will talk about in another post).
Dim xmlhttp
Set xmlhttp = Server.CreateObject(”Microsoft.XMLHTTP”)
xmlhttp.Open “POST”, http://www.librarywebchic.net/rss.xml, false
xmlhttp.Send
set xslt = Server.CreateObject(”MSXML2.XSLTemplate.4.0″)
set xslDoc = Server.CreateObject(”Msxml2.FreeThreadedDOMDocument.4.0″)
set xmlDoc = Server.CreateObject(”Msxml2.DOMDocument.4.0″)
Dim xslProc
xslDoc.async = false
xslDoc.resolveExternals = false
xslDocName = “lstuff.xsl.xsl”
xslDoc.load (Server.MapPath(xslDocName))
xslDoc.validateOnParse = False
set xslt.stylesheet = xslDoc
xmlDoc.async = false
xmlDoc.resolveExternals = false
xmlDoc.loadxml (xmlhttp.ResponseText)
set xslProc = xslt.createProcessor()
xslProc.input = xmlDoc
xslProc.transform()
response.write xslProc.output
set xmlhttp = nothing
set xslt = nothing
set xslDoc = nothing
set xmlDoc = nothing
set xslProc = nothing
I'm pretty happy with what I have developed thus far.
I'll post a more complete demo later this week using a test account on
our development server.
