<%
' load your news.xml file
dim oXML, oXSL, sHTML
set oXML = server.CreateObject("msxml2.domdocument")
oxml.async=false
oxml.load server.MapPath("cms/complian.xml")
dim ID
ID = request.QueryString("ID")
'Pass in name of page and ID to xsl template
oxml.documentElement.setAttribute "Page","default.htm"
if ID <> "" then
oxml.documentElement.setAttribute "ArticleID", ID
end if
set oXSL = server.createObject("msxml2.domdocument")
oXSL.async = false
oXSL.load server.mappath("cms/complianlist.xsl")
sHTML = oXML.TransformNode(oXSL)
%>
Welcome to Bennetts Commercial Ltd.
