Source of sendXml.asp

<% Option Explicit %>
<html>
<head>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  <title>XML page #1</title>
</head>
<!-- #include file=XMLlibrary.asp -->
<body>
<%
Dim XDoc,xmlFileName,xmlStyleSheet
 
Set XDoc = Server.CreateObject("MSXML2.DOMDocument")
XDoc.Load(Server.MapPath(Request("file")))
xmlStyleSheet = Null
If Request("xsl") <> "" Then xmlStyleSheet = Request("xsl")
OutputXMLResponse XDoc,xmlStyleSheet
%>
</body>
</html>