<%@ LANGUAGE=JScript %> View Log Reports
<% fso = new ActiveXObject("Scripting.FileSystemObject"); fold = fso.GetFolder(Server.MapPath(".")+"/data/"); for (files = new Enumerator(fold.files); !files.atEnd(); files.moveNext()) { var curfile = files.item(); logname = curfile.name var pagename = null; try { xdoc = new ActiveXObject("Microsoft.XmlDom"); xdoc.async=false xdoc.load(Server.MapPath(".")+"/data/"+curfile.name) if (xdata = xdoc.firstChild) pagename = get_node_value(xdoc,"document"); } catch(e){continue;} if (pagename && logname) { Response.Write('View Report   '+logname+'  ('+pagename+')  
'); } } function get_node_value(doc,name) { if ((tobj = doc.getElementsByTagName(name)).length>0) return tobj[0].text; else return null; } %>