<% 'In this example, we show how to connect FusionCharts to a database. 'For the sake of ease, we've used an MySQL databases containing two 'tables. dim FC ' Create FusionCharts ASP class object set FC = new FusionCharts ' Set chart type to pie 3D Call FC.setChartType("pie3d") ' Set chart size Call FC.setSize("650","450") ' Set Relative Path of swf file. Call FC.setSWFPath("../../FusionCharts/") dim strParam ' Define chart attributes strParam="caption=Factory Output report;subCaption=By Quantity;pieSliceDepth=30; showBorder=1;showLabels=1;numberSuffix= Units;decimals=0" ' Set chart attributes Call FC.setChartParams(strParam) Dim oRs 'Create the recordset to retrieve data Set oRs = Server.CreateObject("ADODB.Recordset") ' Fetch all factory records using SQL Query ' Store chart data values in 'total' column/field and category names in 'FactoryName' dim strQuery strQuery = "select a.FactoryID, b.FactoryName, sum(a.Quantity) as total from Factory_output a, Factory_Master b where a.FactoryId=b.FactoryId group by a.FactoryId,b.FactoryName" Set oRs = oConn.Execute(strQuery) 'Pass the SQL Query result to the FusionCharts ASP Class function 'along with field/column names that are storing chart values and corresponding category names 'to set chart data from database if not oRs.bof then Call FC.addDataFromDatabase(oRs, "total", "FactoryName", "" ,"") end if ' Close Recordset oRs.Close set oRs=Nothing ' Render the chart Call FC.renderChart(false) %>