hjhdx

Help With Multi Stacked Code For Asp

Recommended Posts

Hi, i just bought fusioncharts, i have already made projects with it , and i have never expirience a problem or bug , for me fusioncharts its

 

great; two days ago , my boss told me i need to build , a multi stacked chart with asp, and i havent find the code in the dowloaded package or

 

in the blueprint aplications , being specific the asp code for "Multi-series 2D Stacked Column" , hope someone could help , if someone have the link an example

 

or where i can dowloaded it would help me alot ,l thanks in advance.

 

i already got the code for one stacked colum (its in the dowloaded packcage ) now i ned the structure for two multi series stacked colums

 

see ya :)

 

<%

 

 

Dim arrData(6,10)

'Store Name of Products

arrData(0,1) = "S.Yucatan"

arrData(1,1) = "S.Campeche"

arrData(2,1) = "S.Cancun"

arrData(3,1) = "S.Escarcega"

arrData(4,1) = "S.Valladolid"

arrData(5,1) = "S.Chetumal"

 

'Sales data for Product 2004

arrData(0,2) = 20

arrData(1,2) = 0

arrData(2,2) = 5

arrData(3,2) = 7

arrData(4,2) = 55

arrData(5,2) = 73

'Sales data for Product 2005

arrData(0,3) = 5

arrData(1,3) = 59

arrData(2,3) = 5

arrData(3,3) = 0

arrData(4,3) = 5

arrData(5,3) = 3

 

'Sales data for Product 2006

arrData(0,4) = 4

arrData(1,4) = 59

arrData(2,4) = 0

arrData(3,4) = 5

arrData(4,4) = 5

arrData(5,4) = 7

'Sales data for Product 2007

arrData(0,5) = 54

arrData(1,5) = 59

arrData(2,5) = 0

arrData(3,5) = 4

arrData(4,5) = 55

arrData(5,5) = 73

'Sales data for Product 2008

arrData(0,6) = 4

arrData(1,6) = 9

arrData(2,6) = 0

arrData(3,6) = 4

arrData(4,6) = 5

arrData(5,6) = 7

'Sales data for Product 2009

arrData(0,7) = 5

arrData(1,7) = 59

arrData(2,7) = 0

arrData(3,7) = 45

arrData(4,7) = 5

arrData(5,7) = 7

'Sales data for Product 2010

arrData(0,8) = 5

arrData(1,8) = 5

arrData(2,8) = 0

arrData(3,8) = 4

arrData(4,8) = 5

arrData(5,8) = 73

'Sales data for Product 2011

arrData(0,9) = 5

arrData(1,9) = 5

arrData(2,9) = 0

arrData(3,9) = 4

arrData(4,9) = 5

arrData(5,9) = 73

'Sales data for Product 2012

arrData(0,10) = 5

arrData(1,10) = 0

arrData(2,10) = 0

arrData(3,10) = 60

arrData(4,10) = 0

arrData(5,10) = 7

 

'Now, we need to convert this data into multi-series XML.

'We convert using string concatenation.

'strXML - Stores the entire XML

'strCategories - Stores XML for the <categories> and child <category> elements

'strDataProdA - Stores XML for current year's sales

'strDataProdB - Stores XML for previous year's sales

Dim strCategories, strDataProdA, strDataProdB,strDataProdC,strDataProdD,strDataProdE,strDataProdF,strDataProdG,strDataProdH,strDataProdI, i

 

'Initialize <chart> element

strXML = "<chart caption='Afectaciones' showPercentValues='1' formatNumberScale='0'>"

 

'Initialize <categories> element - necessary to generate a stacked chart

strCategories = "<categories>"

 

'Initiate <dataset> elements

strDataProdA = "<dataset seriesName='2004'>"

strDataProdB = "<dataset seriesName='2005'>"

strDataProdC = "<dataset seriesName='2006'>"

strDataProdD = "<dataset seriesName='2007'>"

strDataProdE = "<dataset seriesName='2008'>"

strDataProdF = "<dataset seriesName='2009'>"

strDataProdG = "<dataset seriesName='2010'>"

strDataProdH = "<dataset seriesName='2011'>"

strDataProdI = "<dataset seriesName='2012'>"

 

 

'Iterate through the data

For i=0 to UBound(arrData)-1

'Append <category name='...' /> to strCategories

strCategories = strCategories & "<category name='" & arrData(i,1) & "' />"

'Add <set value='...' /> to both the datasets

strDataProdA = strDataProdA & "<set value='" & arrData(i,2) & "' />"

strDataProdB = strDataProdB & "<set value='" & arrData(i,3) & "' />"

strDataProdC = strDataProdC & "<set value='" & arrData(i,4) & "' />"

strDataProdD = strDataProdD & "<set value='" & arrData(i,5) & "' />"

strDataProdE = strDataProdE & "<set value='" & arrData(i,6) & "' />"

strDataProdF = strDataProdF & "<set value='" & arrData(i,7) & "' />"

strDataProdG = strDataProdG & "<set value='" & arrData(i,8) & "' />"

strDataProdH = strDataProdH & "<set value='" & arrData(i,9) & "' />"

strDataProdI = strDataProdI & "<set value='" & arrData(i,10) & "' />"

Next

 

'Close <categories> element

strCategories = strCategories & "</categories>"

 

'Close <dataset> elements

strDataProdA = strDataProdA & "</dataset>"

strDataProdB = strDataProdB & "</dataset>"

strDataProdC = strDataProdC & "</dataset>"

strDataProdD = strDataProdD & "</dataset>"

strDataProdE = strDataProdE & "</dataset>"

strDataProdF = strDataProdF & "</dataset>"

strDataProdG = strDataProdG & "</dataset>"

strDataProdH = strDataProdH & "</dataset>"

strDataProdI = strDataProdI & "</dataset>"

 

'Assemble the entire XML now

strXML = strXML & strCategories & strDataProdA & strDataProdB & strDataProdC & strDataProdD &strDataProdE &strDataProdF &strDataProdG &strDataProdH &strDataProdI &"</chart>"

 

'Create the chart - Stacked Column 3D Chart with data contained in strXML

Call renderChart("FusionCharts/StackedColumn3D.swf", "", strXML, "productSales", 950, 650, false, false)

%>

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now