<%@ Language=VBScript %> <% dim strPageName strPageName = "appearances" %>
Book Signings and Appearances

Author Patrick K. O'Donnell and many of the subjects of his new book will be visiting cities across the United States signing his new book, Operatives, Spies, & Saboteurs. Certain cities will also host book readings or OSS Reunions. Please use the list below to determine where and when these events will take place in your city.

Check back frequently, as dates are being added.

Scheduled Appearances

<% Dim objXML, objRoot Dim strCity, strDate, strLocation, strDescription Set objXML = Server.CreateObject("Microsoft.XMLDOM") objXML.async = False objXML.Load (Server.MapPath("/oss/appearances.xml")) Set objRoot = objXML.documentElement strCity = objRoot.childNodes(0).selectSingleNode("city").text Response.Write "
" Response.Write "

" & strCity & "

" For each childnode in objRoot.childNodes if strCity <> childnode.selectSingleNode("city").text then strCity = childnode.selectSingleNode("city").text Response.Write "

" & strCity & "

" end if strLocation = childnode.selectSingleNode("location").text strDescription = childnode.selectSingleNode("description").text strDate = childnode.selectSingleNode("date").text if lcase(strDate) <> "tbd" then strDate = formatdatetime(childnode.selectSingleNode("date").text,1) & " " & childnode.selectSingleNode("time").text end if Response.Write "
    " Response.Write "" & strDate & "
    " Response.Write strLocation & "
    " Response.Write strDescription & "
    " Response.Write "
" Next Response.Write "
" Set objRoot = Nothing Set objXML = Nothing %>