<%@ Language="VBScript" %>
<%
' PXWeb request
URL = "https://pxweb.dtn.com/PXWebSvc/PXServiceWeb.svc/GetDailyHistory?UserID=YOUR_USER&Password=YOUR_PASSWORD&Symbol=@C`##,@W`##,QCL`##,QNG`##&Limit=5"
' Load stylesheet
set xsl = Server.CreateObject( "msxml2.DOMDocument.3.0" )
xsl.load( Server.MapPath( "GetDailyHistoryHtml.xsl" ) )
' Send request to PXWeb
set http = Server.CreateObject( "Microsoft.XMLHTTP" )
http.open "GET", URL, False
http.send ""
' Convert response to HTML table
set xml = http.responseXML
html = xml.transformNode( xsl )
%>
GetDailyHistory
<%= html %>