Error in loading data

[djjwp]

I am using two pages to grab and display the data. The first page is launched and it then pulls the data from the second "data" page. I'm using the MSColumn3D.swf chart.

dim stats
dim rs
dim sql
dim cn
dim rs1
dim sql1
dim cn1
dim field1 'Hold data returned
'dim field2 'Hold name
dim strXML 'strXML will be used to store the entire XML document generated

'Default.asp has passed us a property animate. We request that.
 Dim animateChart
 animateChart = Request.QueryString("animate")
'Set default value of 1
 if animateChart="" then
  animateChart = "1"
 end if
'Make db conx
cn = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=serverip;DATABASE=netops;USER=root;PASSWORD=password;OPTION=3"
set rs = server.createobject("adodb.recordset")
sql = "SELECT Count(Ticket) as field0 FROM Tkt_tickets WHERE YEAR(ResolvedTime) = 2006 GROUP BY Year(ResolvedTime), Month(ResolvedTime)"
cn1 = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=serverip;DATABASE=netops;USER=root;PASSWORD=password;OPTION=3"
set rs1 = server.createobject("adodb.recordset")
sql1 = "SELECT Count(Ticket) as field1 FROM Tkt_tickets WHERE YEAR(ResolvedTime) = 2007 GROUP BY Year(ResolvedTime), Month(ResolvedTime)"
'Start XML data
strXML = "<chart caption='Tickets Worked Results 2006 v 2007' xAxisName='Month' yAxisName='Revenue' showValues='0' numberPrefix='$'>
strXML = strXML & "<categories>"
 strXML = strXML & "<category label='Jan' />"
 strXML = strXML & "<category label='Feb' />"
 strXML = strXML & "<category label='Mar' />"
 strXML = strXML & "<category label='Apr' />"
 strXML = strXML & "<category label='May' />"
 strXML = strXML & "<category label='Jun' />"
 strXML = strXML & "<category label='Jul' />"
 strXML = strXML & "<category label='Aug' />"
 strXML = strXML & "<category label='Sep' />"
   strXML = strXML & "<category label='Oct' />"
   strXML = strXML & "<category label='Nov' />"
   strXML = strXML & "<category label='Dec' />"
strXML = strXML & "</categories>" 
'Open db and grab 2006 records
 strXML = strXML & "<dataset seriesName='2006' color='FF9601'>"
 rs.open sql, cn
   do while not rs.eof
'Write the data line
 strXML = strXML & "<set value='" & rs("field0") & "'/>"
'Go to next record
   rs.movenext
   loop
strXML = strXML & "</dataset>"
'Open db and grab 2007 records
 strXML = strXML & "<dataset seriesName='2007' color='0000C0'>"
 rs1.open sql1, cn1
   do while not rs1.eof
'Write the data line
 strXML = strXML & "<set value='" & rs1("field1") & "'/>"
'Go to next record
   rs1.movenext
   loop
 strXML = strXML & "</dataset>"
    strXML = strXML & "<trendlines>"
    strXML = strXML & "<line startValue='26000' color='91C728' displayValue='Target' showOnTop='1'/>"
   strXML = strXML & "</trendlines>"
'Finally, close <chart> element
 strXML = strXML & "</chart>"
'Close loops and conx
 rs.close
Set rs = nothing
 rs1.close
Set rs1 = nothing
'Set Proper output content-type
 Response.ContentType = "text/xml"
'Just write out the XML data
'NOTE THAT THIS PAGE DOESN'T CONTAIN ANY HTML TAG, WHATSOEVER
 Response.Write(strXML)

This is in the first page.

'Variable to contain dataURL
 Dim strDataURL
'Set DataURL with animation property to 1
'NOTE: It's necessary to encode the dataURL if you've added parameters to it
  strDataURL = "TktByMonthData.asp"
'Create the chart - Pie 3D Chart with dataURL as strDataURL
  Call renderChart("Includes/ChartsSWF/MSColumn3D.swf", strDataURL, "", "stats", 600, 400, false, false)

Any help would be appreciated.

[Pallav]

Can you try switching the debug mode of chart on and clicking on the dataURL link?