<%
set oXmlDom = Server.CreateObject("Microsoft.XMLDOM")
oXmlDom.load(Server.MapPath("adcLinks.xml"))
set oXslDom = Server.CreateObject("Microsoft.XMLDOM")
oXslDom.async = false
bSucc=oXslDom.load(Server.MapPath("adcLinks.xsl"))
if bSucc then
Response.Write oXmlDom.selectSingleNode("//links").transformNode(oXslDom)
end if
%>
