Highcharts not rendering after post ajax request
<p>I have 2 asp pages, in the first one I have a form that I inform a parameter using AJAX and send it to the second asp page that connect to a MSSQL database, run a query using a date parameter came from the first ASP page and return the Query result to ASP Variables and then populates Highcharts.</p>

<p>Graphics works fine passing variables throght querystrings, but Using AJAX the graphics wont draw,no error, simples returns a blank graphic.</p>

<p>TESTE.ASP
<div class="snippet" data-lang="js" data-hide="false">
<div class="snippet-code">
<pre class="snippet-code-html lang-html prettyprint-override"><code>&lt;!--#include virtual ="/BI/header.asp"--&gt;
&lt;!--#include virtual ="/BI/sidebar.asp"--&gt;
&lt;%
%&gt;
&lt;html&gt;
&lt;head&gt;

&lt;meta name="viewport" content="width=device-width, initial-scale=1"&gt;
&lt;meta name="viewport" content="width=device-width, initial-scale=1.0, minimum-scale=1.0, maximum-scale=1.0, user-scalable=no"&gt;

&lt;script&gt;
function OnCheckAvailability()
{
if(window.XMLHttpRequest)
{
oRequest = new XMLHttpRequest();
}
else if(window.ActiveXObject)
{
oRequest = new ActiveXObject("Microsoft.XMLHTTP");
}

oRequest.open("POST", "vendas.asp", true);
oRequest.onreadystatechange = UpdateCheckAvailability;

oRequest.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");
oRequest.send("strCmd=availability&amp;strData1=" + document.form1.data1.value);
}

function UpdateCheckAvailability()
{
document.getElementById("Available").innerHTML = oRequest.responseText;
}
&lt;/script&gt;

&lt;/head&gt;
&lt;body&gt;

&lt;center&gt;
&lt;div&gt;
&lt;form method="post" action="javascript:void(0);" name="form1"&gt;

&lt;label for="newuserid"&gt;Data:&lt;/label&gt;

&lt;input type="text" name="data1" id="data1 size="20" /&gt;

&lt;input id="btnCheckAvailability" type="button" value="Check Availability" onClick="OnCheckAvailability();"&gt;&lt;br&gt;

&lt;div id="Available"&gt;&lt;/div&gt;

&lt;/form&gt;</code></pre>
</div>
</div>
</p>

<p>VENDAS.ASP
<div class="snippet" data-lang="js" data-hide="false">
<div class="snippet-code">
<pre class="snippet-code-html lang-html prettyprint-override"><code>&lt;!--#include virtual ="/BI/LIB/lib.asp"--&gt;

&lt;%

' Form Variables
dim strCmd
dim strdata1

strCmd = trim(Request.Form("strCmd").Item)
strdata1 = trim(Request.Form("strdata1").Item)

'nLimFor  = Request.QueryString("fornec")
'nLimProd = Request.QueryString("produto")
Dim nLimFor
Dim nLimProd

Dim DATA1
Dim cEmpr
Dim cEmprOld
Dim cFil
Dim cFilialF
Dim cFilialP
Dim cFornP
Dim strQryL
Dim strQryF
Dim strQryP
Dim strTot
Dim strPT
Dim nCont

'Conexão com o Banco de Dados
 ' Criar objeto de conexão com a base de dados e executar a Query na tabela SM0
 Set rsVendEF = Server.CreateObject("ADODB.RecordSet")
  rsVendEF.Open qryEmpFil, strConn

'Seta as variaveis
nLimFor  = 15
nLimProd = 15
'DATA1    = strdata1
DATA1 = Dia()
nCont    = 0
cEmpr    = rsVendEF.Fields("M0_CODIGO")
cFil     = rsVendEF.Fields("M0_CODFIL")
cEmprOld = ""
cFornP   = ""

'Query das lojas
strQryL = " DECLARE "&amp;_
   " @DATA VARCHAR(8) = '"&amp;DATA1&amp;"' "&amp;_
   " SELECT FILIAL, QUANT, PRODVAL "&amp;_
   " FROM( "&amp;_
   " SELECT ISNULL(L2_FILIAL,'') FILIAL, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VRUNIT),0) PRODVAL "&amp;_
   " FROM "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
   " WHERE L2_EMISSAO = @DATA "&amp;_
   " GROUP BY L2_FILIAL WITH CUBE "

'Query de fornecedores
strQryF = " DECLARE "&amp;_
   " @DATA VARCHAR(8) = "&amp;DATA1&amp;", "&amp;_
   " @ROWS INT        = "&amp;nLimFor&amp;" "&amp;_
   "SELECT  RANK, FILIAL, NOMEFOR, QUANT, PRODVAL "&amp;_
   "FROM "&amp;_
   "( "&amp;_
   " SELECT RANK() OVER(PARTITION BY FILIAL ORDER BY PRODVAL DESC, FILIAL, NOMEFOR) AS RANK, "&amp;_
   "   FILIAL, NOMEFOR, QUANT, PRODVAL "&amp;_
   " FROM( "&amp;_
   "   SELECT  L2_FILIAL FILIAL, A2_NREDUZ NOMEFOR, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
   "   FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
   "   INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON B1_FILIAL = '"&amp;xFilial("SB1",cEmpr,cFil)&amp;"' AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1' AND SB1.D_E_L_E_T_ = '' "&amp;_
   "   INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON A2_FILIAL = '"&amp;xFilial("SA2",cEmpr,cFil)&amp;"' AND A2_COD = B1_PROC AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
   "   WHERE  L2_EMISSAO = @DATA AND SL2.D_E_L_E_T_ = '' "&amp;_
   "   GROUP BY L2_FILIAL, A2_NREDUZ "&amp;_
   "  ) TAB11 "

'Query de Produtos
strQryP = " DECLARE "&amp;_
   " @DATA VARCHAR(8) = '"&amp;DATA1&amp;"', "&amp;_
   " @ROWS INT        = "&amp;nLimProd&amp;" "&amp;_
   " SELECT RANK, FILIAL, NOMEFOR, NOMEPROD, QUANT, PRODVAL "&amp;_
   " FROM "&amp;_
   " ( "&amp;_
   " SELECT RANK() OVER(PARTITION BY NOMEFOR ORDER BY PRODVAL DESC, FILIAL, NOMEFOR, NOMEPROD) AS RANK, "&amp;_
   "  FILIAL, NOMEFOR, NOMEPROD, QUANT, PRODVAL "&amp;_
   " FROM "&amp;_
   " ( "&amp;_
   " SELECT  ISNULL(L2_FILIAL,'') FILIAL, ISNULL(A2_NREDUZ,'') NOMEFOR, ISNULL(B1_DESC,'') NOMEPROD, "&amp;_
   "    ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
   " FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
   " INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON "&amp;_
   "    B1_FILIAL = ''  AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1'  AND SB1.D_E_L_E_T_ = '' "&amp;_
   " INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON "&amp;_
   "    A2_FILIAL = ''  AND A2_COD = B1_PROC  AND A2_NREDUZ IN "&amp;_
   "    ( SELECT  NOMEFOR "&amp;_
   "     FROM( "&amp;_
   "      SELECT RANK() OVER(PARTITION BY FILIAL ORDER BY PRODVAL DESC, FILIAL, NOMEFOR) AS RANK, "&amp;_
   "        FILIAL, NOMEFOR, QUANT, PRODVAL "&amp;_
   "      FROM( "&amp;_
   "       SELECT L2_FILIAL FILIAL, A2_NREDUZ NOMEFOR, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
   "       FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
   "       INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON B1_FILIAL = '"&amp;xFilial("SB1",cEmpr,cFil)&amp;"' AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1' AND SB1.D_E_L_E_T_ = '' "&amp;_
   "       INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON A2_FILIAL = '"&amp;xFilial("SA2",cEmpr,cFil)&amp;"' AND A2_COD = B1_PROC AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
   "       WHERE  L2_FILIAL = '"&amp;xFilial("SL2",cEmpr,cFil)&amp;"' AND L2_EMISSAO = @DATA AND SL2.D_E_L_E_T_ = '' "&amp;_
   "       GROUP BY L2_FILIAL, A2_NREDUZ "&amp;_
   "       ) TAB11 "&amp;_
   "      )TAB21 "&amp;_
   "     WHERE  TAB21.RANK &lt;= @ROWS "&amp;_
   "     ORDER BY FILIAL, PRODVAL DESC OFFSET 0 ROWS FETCH NEXT @ROWS ROWS ONLY "&amp;_
   "    ) "&amp;_
   "    AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
   " WHERE  L2_FILIAL = '"&amp;xFilial("SL2",cEmpr,cFil)&amp;"' AND L2_EMISSAO = @DATA  AND SL2.D_E_L_E_T_ = '' "&amp;_
   " GROUP BY L2_FILIAL, A2_NREDUZ, B1_DESC, L2_VLRITEM "&amp;_
   " ) A "

cEmprOld = cEmpr
rsVendEF.MoveNext
DO WHILE NOT rsVendEF.eof
 cEmpr = rsVendEF.Fields("M0_CODIGO")
 cFil  = rsVendEF.Fields("M0_CODFIL")
 'nCont = nCont + 1

 If cEmprOld &lt;&gt; cEmpr Then
  cEmprOld = cEmpr

  'Query das lojas Continuação
  strQryL = strQryL + " UNION ALL "&amp;_
     " SELECT ISNULL(L2_FILIAL,'') FILIAL, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VRUNIT),0) PRODVAL "&amp;_
     " FROM "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
     " WHERE L2_EMISSAO = @DATA "&amp;_
     " GROUP BY L2_FILIAL WITH CUBE "

  'Query de fornecedores Continuação
  strQryF = strQryF + " UNION ALL "&amp;_
     " SELECT RANK() OVER(PARTITION BY FILIAL ORDER BY PRODVAL DESC, FILIAL, NOMEFOR) AS RANK, "&amp;_
     "   FILIAL, NOMEFOR, QUANT, PRODVAL "&amp;_
     " FROM( "&amp;_
     "   SELECT  L2_FILIAL FILIAL, A2_NREDUZ NOMEFOR, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
     "   FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
     "   INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON B1_FILIAL = '"&amp;xFilial("SB1",cEmpr,cFil)&amp;"' AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1' AND SB1.D_E_L_E_T_ = '' "&amp;_
     "   INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON A2_FILIAL = '"&amp;xFilial("SA2",cEmpr,cFil)&amp;"' AND A2_COD = B1_PROC AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
     "   WHERE  L2_EMISSAO = @DATA AND SL2.D_E_L_E_T_ = '' "&amp;_
     "   GROUP BY L2_FILIAL, A2_NREDUZ "&amp;_
     "  ) TAB12 "
 End If

 'Query de produtos Continuação
 strQryP = strQryP + " UNION ALL "&amp;_
 " SELECT RANK() OVER(PARTITION BY NOMEFOR ORDER BY PRODVAL DESC, FILIAL, NOMEFOR, NOMEPROD) AS RANK, "&amp;_
 "  FILIAL, NOMEFOR, NOMEPROD, QUANT, PRODVAL "&amp;_
 " FROM "&amp;_
 " ( "&amp;_
 " SELECT  ISNULL(L2_FILIAL,'') FILIAL, ISNULL(A2_NREDUZ,'') NOMEFOR, ISNULL(B1_DESC,'') NOMEPROD, "&amp;_
 "    ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
 " FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
 " INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON "&amp;_
 "    B1_FILIAL = ''  AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1'  AND SB1.D_E_L_E_T_ = '' "&amp;_
 " INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON "&amp;_
 "    A2_FILIAL = ''  AND A2_COD = B1_PROC  AND A2_NREDUZ IN "&amp;_
 "    ( SELECT  NOMEFOR "&amp;_
 "     FROM( "&amp;_
 "      SELECT RANK() OVER(PARTITION BY FILIAL ORDER BY PRODVAL DESC, FILIAL, NOMEFOR) AS RANK, "&amp;_
 "        FILIAL, NOMEFOR, QUANT, PRODVAL "&amp;_
 "      FROM( "&amp;_
 "        SELECT  L2_FILIAL FILIAL, A2_NREDUZ NOMEFOR, ISNULL(SUM(L2_QUANT),0) QUANT, ISNULL(SUM(L2_VLRITEM),0) PRODVAL "&amp;_
 "        FROM  "&amp;xGEmpr("SL2", cEmpr)&amp;" SL2 "&amp;_
 "        INNER JOIN "&amp;xGEmpr("SB1", cEmpr)&amp;" SB1 ON B1_FILIAL = '"&amp;xFilial("SB1",cEmpr,cFil)&amp;"' AND B1_COD = L2_PRODUTO AND B1_MSBLQL &lt;&gt; '1' AND SB1.D_E_L_E_T_ = '' "&amp;_
 "        INNER JOIN "&amp;xGEmpr("SA2", cEmpr)&amp;" SA2 ON A2_FILIAL = '"&amp;xFilial("SA2",cEmpr,cFil)&amp;"' AND A2_COD = B1_PROC AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
 "        WHERE  L2_FILIAL = '"&amp;xFilial("SL2",cEmpr,cFil)&amp;"' AND L2_EMISSAO = @DATA AND SL2.D_E_L_E_T_ = '' "&amp;_
 "        GROUP BY L2_FILIAL, A2_NREDUZ "&amp;_
 "       ) TAB11 "&amp;_
 "      )TAB21 "&amp;_
 "     WHERE  TAB21.RANK &lt;= @ROWS "&amp;_
 "     ORDER BY FILIAL, PRODVAL DESC OFFSET 0 ROWS FETCH NEXT @ROWS ROWS ONLY "&amp;_
 "    ) "&amp;_
 "    AND A2_MSBLQL &lt;&gt; '1' AND SA2.D_E_L_E_T_ = '' "&amp;_
 " WHERE  L2_FILIAL = '"&amp;xFilial("SL2",cEmpr,cFil)&amp;"' AND L2_EMISSAO = @DATA  AND SL2.D_E_L_E_T_ = '' "&amp;_
 " GROUP BY L2_FILIAL, A2_NREDUZ, B1_DESC, L2_VLRITEM "&amp;_
 " ) A "

 rsVendEF.MoveNext
Loop

'Query de lojas finalizando
strQryL = strQryL + " ) L "&amp;_
     " ORDER BY FILIAL ;"

'Query de fornecedores finalizando
strQryF = strQryF + " ) TAB21 "&amp;_
     " WHERE  TAB21.RANK &lt;= @ROWS "&amp;_
     " ORDER BY FILIAL, PRODVAL DESC ;"

'Query de produtos finalizando
strQryP = strQryP + ") B "&amp;_
     "WHERE B.RANK &lt;= @ROWS "&amp;_
     "ORDER BY "&amp;_
     "  FILIAL, NOMEFOR, PRODVAL DESC-- OFFSET 0 ROWS FETCH NEXT @ROWS ROWS ONLY ;"

'Criando um objeto de conexão com a base de dados e executamos a Query
set rsQryL=Server.CreateObject("ADODB.RecordSet")
rsQryL.Open strQryL, strConexao

set rsQryF=Server.CreateObject("ADODB.RecordSet")
rsQryF.Open strQryF, strConexao

set rsQryP=Server.CreateObject("ADODB.RecordSet")
rsQryP.Open strQryP, strConexao

'TOTALIZADORES
DO WHILE NOT rsQryL.eof
 If rsQryL.FIELDS("FILIAL") &lt;&gt; "" Then
  Exit Do
 End If
 strTot = strTot + cdbl(rsQryL.FIELDS("PRODVAL"))
 strPT  = strPT  + cdbl(rsQryL.FIELDS("QUANT"))
' strT   =  100 'strT   + cdbl(rsQry.FIELDS("CLIENTES"))
' strTKT =  100 'strTKT + cdbl(rsQry.FIELDS("TICKET"))

 rsQryL.MoveNext
Loop
'strTKT = strTKT / nCont

%&gt;


&lt;!-- Trecho HTML do Fonte--&gt;
&lt;html&gt;
&lt;head&gt;
 &lt;meta name="viewport" content="width=device-width, initial-scale=1"&gt;
 &lt;meta name="viewport" content="width=device-width, initial-scale=1.0, minimum-scale=1.0, maximum-scale=1.0, user-scalable=no"&gt;
    &lt;link href="css/bootstrap.min.css" rel="stylesheet" type="text/css"&gt;
 &lt;link href="css/datepicker3.css" rel="stylesheet"&gt;
 &lt;link href="css/styles.css" rel="stylesheet"&gt;
 &lt;script src="http://ajax.googleapis.com/ajax/libs/jquery/1.7.1/jquery.min.js"       type="text/javascript"&gt;&lt;/script&gt; 
 &lt;script src="http://code.highcharts.com/highcharts.js"&gt;&lt;/script&gt;
 &lt;script src="http://code.highcharts.com/modules/exporting.js"&gt;&lt;/script&gt;
  &lt;style type="text/css"&gt;
   ${demo.css}
    
        &lt;/style&gt;

&lt;!-- Continuação do Trecho HighCharts do Fonte--&gt;
&lt;script type="text/javascript"&gt;

$(
 function ()
 {
  //create a variable so we can pass the value dynamically
  var chartype = 'column';
  
  //On page load call the function setDynamicChart
  setDynamicChart(chartype);
  
  //jQuery part a- On Click call the function setDynamicChart(dynval) and pass the chart type
  $('.option').click(function(){
  //get the value from 'a' tag
  
  var chartype = $(this).attr('id');
  setDynamicChart(chartype);
 });

  function setDynamicChart(chartype){

  // Create the chart
  $('#container').highcharts
  (
   {

    chart:   { type: chartype
         
       },
    exporting: { enabled: true  },
    navigation: { menuItemStyle:   { fontWeight: 'normal', background: 'none' },
        buttonOptions:   { align: 'left' },
        menuItemHoverStyle: { fontWeight: 'bold', background: 'none', color: 'black' }
       },

    title:  { text: 'Vendas no Dia' },
    subtitle: { text: 'Clique para detalhes.' },
    xAxis:  { type: 'category' },
    yAxis:  { title: { text: 'Valor total por loja em R$' } },
    legend:  { enabled: false },
    plotOptions:{ series: { borderWidth: 0, dataLabels: { enabled: true, format: '{point.y:.2f}' } } },

    tooltip: { headerFormat: '&lt;span style="font-size:11px"&gt;{series.name}&lt;/span&gt;&lt;br&gt;',
         pointFormat:  '&lt;span style="color:{point.color}"&gt;{point.name}&lt;/span&gt;: &lt;b&gt;R$ {point.y:.2f}}&lt;/b&gt;&lt;br/&gt;'
       },

    series:  [{
        name: "Lojas",
        colorByPoint: true,
        data:
        [&lt;% DO WHILE NOT rsQryL.eof %&gt;
         &lt;%If rsQryL.Fields("FILIAL") &lt;&gt; "" Then%&gt;
         {
          name:  "Filial: &lt;%=rsQryL.Fields("FILIAL")%&gt;",
          y:   &lt;%Response.Write( REPLACE(rsQryL.Fields("PRODVAL"),",",".") )%&gt; ,
          drilldown: "Detalhes F&lt;%=rsQryL.Fields("FILIAL")%&gt;"
         },
         &lt;% End If %&gt;
         &lt;% rsQryL.MoveNext %&gt;
        &lt;% Loop %&gt;
        ]
       }],

    drilldown: { series:
        [&lt;% DO WHILE NOT rsQryF.eof %&gt;
          { name: "Detalhes F&lt;%=rsQryF.Fields("FILIAL")%&gt;",
           colorByPoint: true,
           id:  "Detalhes F&lt;%=rsQryF.Fields("FILIAL")%&gt;",
           data:
           [
           &lt;%  cFilialF = rsQryF.Fields("FILIAL") %&gt;
           &lt;% DO WHILE NOT rsQryF.eof
            If rsQryF.Fields("FILIAL") &lt;&gt; cFilialF Then
             Exit Do
            End If%&gt;
             {
              name:   "&lt;%=rsQryF.Fields("NOMEFOR")%&gt;",
              y:    &lt;%Response.Write( REPLACE(rsQryF.Fields("PRODVAL"),",",".") )%&gt;,
              drilldown: "F_&lt;%=(rsQryF.Fields("FILIAL")&amp;rsQryF.Fields("NOMEFOR"))%&gt;"
             },
             &lt;% rsQryF.MoveNext %&gt;
            &lt;%Loop %&gt;
           ]
          },

          &lt;%
          If NOT rsQryP.eof Then
           cFilialP = rsQryP.Fields("FILIAL")
          End If %&gt;
          &lt;% DO WHILE NOT rsQryP.eof
           If rsQryP.Fields("FILIAL") &lt;&gt; cFilialP Then
            Exit Do
           End If%&gt;
           {
            name: "F_&lt;%=(rsQryP.Fields("FILIAL") &amp; rsQryP.Fields("NOMEFOR") )%&gt;",
            id:  "F_&lt;%=(rsQryP.Fields("FILIAL") &amp; rsQryP.Fields("NOMEFOR") )%&gt;",
            data:
            [
             &lt;%cFornP = rsQryP.Fields("FILIAL") &amp; rsQryP.Fields("NOMEFOR")
             DO WHILE NOT rsQryP.eof
             If rsQryP.Fields("FILIAL") &amp; rsQryP.Fields("NOMEFOR") &lt;&gt; cFornP Then
              Exit Do
             End If%&gt;
              {
               name:   "&lt;%=rsQryP.Fields("NOMEPROD")%&gt;",
               y:    &lt;%Response.Write( REPLACE(rsQryP.Fields("PRODVAL"),",",".") )%&gt;
              },
              &lt;% rsQryP.MoveNext
             Loop %&gt;
            ]
           },
          &lt;%Loop
         Loop%&gt;
        ]
       }

   });
  }   
 });
 &lt;%
  ' Fecha os Record Set's
  rsVendEF.Close
  rsQryL.Close
  rsQryF.Close
  rsQryP.Close
 %&gt;

&lt;/script&gt;
&lt;!-- Fim do Trecho HighCharts do Fonte--&gt;

&lt;script src="https://code.highcharts.com/highcharts.js"&gt;&lt;/script&gt;
&lt;script src="https://code.highcharts.com/modules/data.js"&gt;&lt;/script&gt;
&lt;script src="https://code.highcharts.com/modules/drilldown.js"&gt;&lt;/script&gt;
&lt;script src="https://code.highcharts.com/modules/exporting.js"&gt;&lt;/script&gt;

&lt;/head&gt;
&lt;body&gt;

&lt;div class="col-sm-9 col-sm-offset-3 col-lg-10 col-lg-offset-2 main"&gt;&lt;!--/.row--&gt;
&lt;div class="row"&gt;
 &lt;div class="col-lg-12"&gt;
  &lt;h1 class="page-header"&gt;&lt;!--/.row--&gt;
  &lt;/h1&gt;
   &lt;/div&gt;
  &lt;/div&gt;
&lt;div class="row"&gt;
   &lt;div class="col-xs-12 col-md-6 col-lg-3"&gt;
    &lt;div class="panel panel-blue panel-widget "&gt;
     &lt;div class="row no-padding"&gt;
      &lt;div class="col-sm-3 col-lg-5 widget-left"&gt;
       &lt;em class="glyphicon glyphicon-shopping-cart glyphicon-l"&gt;&lt;/em&gt;
      &lt;/div&gt;
      &lt;div class="col-sm-9 col-lg-7 widget-right"&gt;
       &lt;div class="small"&gt;Venda Total&lt;/div&gt;
       &lt;div class="small"&gt;&lt;% response.Write(FormatCurrency(strTot))%&gt;&lt;/div&gt;
      &lt;/div&gt;
     &lt;/div&gt;
    &lt;/div&gt;
   &lt;/div&gt;
   &lt;div class="col-xs-12 col-md-6 col-lg-3"&gt;
    &lt;div class="panel panel-orange panel-widget"&gt;
     &lt;div class="row no-padding"&gt;
      &lt;div class="col-sm-3 col-lg-5 widget-left"&gt;
       &lt;em class="glyphicon glyphicon-comment glyphicon-l"&gt;&lt;/em&gt;
      &lt;/div&gt;
      &lt;div class="col-sm-9 col-lg-7 widget-right"&gt;
       &lt;div class="small"&gt;Itens Vendidos&lt;/div&gt;
       &lt;div class="small"&gt;&lt;%response.Write(strPT)%&gt;&lt;/div&gt;
      &lt;/div&gt;
     &lt;/div&gt;
    &lt;/div&gt;
   &lt;/div&gt;
   &lt;div class="col-xs-12 col-md-6 col-lg-3"&gt;
    &lt;div class="panel panel-teal panel-widget"&gt;
     &lt;div class="row no-padding"&gt;
      &lt;div class="col-sm-3 col-lg-5 widget-left"&gt;
       &lt;em class="glyphicon glyphicon-user glyphicon-l"&gt;&lt;/em&gt;
      &lt;/div&gt;
      &lt;div class="col-sm-9 col-lg-7 widget-right"&gt;
       &lt;div class="small"&gt;Clientes&lt;/div&gt;
       &lt;div class="small"&gt;&lt;%response.Write(strT)%&gt;&lt;/div&gt;
      &lt;/div&gt;
     &lt;/div&gt;
    &lt;/div&gt;
   &lt;/div&gt;
   &lt;div class="col-xs-12 col-md-6 col-lg-3"&gt;
    &lt;div class="panel panel-red panel-widget"&gt;
     &lt;div class="row no-padding"&gt;
      &lt;div class="col-sm-3 col-lg-5 widget-left"&gt;
       &lt;em class="glyphicon glyphicon-stats glyphicon-l"&gt;&lt;/em&gt;
      &lt;/div&gt;
      &lt;div class="col-sm-9 col-lg-7 widget-right"&gt;
       &lt;div class="small"&gt;TICKET MED.&lt;/div&gt;
       &lt;div class="small"&gt;&lt;%response.Write(FormatCurrency(strTkt))%&gt;&lt;/div&gt;
      &lt;/div&gt;
     &lt;/div&gt;
    &lt;/div&gt;
   &lt;/div&gt;
  &lt;/div&gt;&lt;!--/.row--&gt;
  
  &lt;div class="row"&gt;
   &lt;div class="col-lg-12"&gt;
    &lt;div class="panel panel-default"&gt;
     &lt;div class="panel-heading"&gt;Vendas do Dia&lt;/div&gt;
     &lt;div class="panel-body"&gt;
                     
&lt;div align="right" style="width: 100%; margin: 0 auto; height: 15px;"&gt;
 &lt;a href="javascript:void(0);" class="option" id="column"&gt;Colunas - &lt;/a&gt;
 &lt;a href="javascript:void(0);" class="option" id="bar"&gt;Barras - &lt;/a&gt;
 &lt;a href="javascript:void(0);" class="option" id="line"&gt;Linhas - &lt;/a&gt;
 &lt;a href="javascript:void(0);" class="option" id="pie"&gt;Pizza&lt;/a&gt;
&lt;/div&gt;

&lt;div id="container" style="min-width: 310px; height: 100%; margin: 0 auto"&gt;&lt;/div&gt;

&lt;/body&gt;
&lt;/html&gt;
&lt;!-- Fim do Trecho HTML do Fonte--&gt;</code></pre>
</div>
</div>
</p>