Tutorial 22: How to display chart datatable in Classic ASP

How to display chart datatable in Classic ASP

EasyXLS Excel library can be used to export Excel files in Classic ASP. The library is a COM+ component that works without MS Excel installed.

Find more about Getting Started with EasyXLS

Step 1: Download and install EasyXLS Excel Library for COM+

To download the trial version of EasyXLS Excel Library, press the below button:

If you already own a license key, you may login and download EasyXLS from your account.

Step 2: Verify if EasyXLS is registered

Check if EasyXLS component is present in Component Services.

Step 3: License file setup

Step required for EasyXLS v9.0 or later.

If you are using a trial, generate a trial license file from EasyXLS trials page. The trial license is valid for 30-days.

If you own a license key, you may login to the account that purchased the license and generate the license file from:
https://www.easyxls.com/my-orders

Setup the license file into your project using these guidelines.

Step 4: Run ASP code that shows and formats chart datatable for Excel file

Execute the following ASP code that formats the chart data table for an Excel file.

View Excel file

Copy code

<%@ Language=VBScript %>

<!-- #INCLUDE FILE="Format.inc" -->
<!-- #INCLUDE FILE="Color.inc" -->
<!-- #INCLUDE FILE="Chart.inc" -->

<%
'================================================================
' Tutorial 22
'
' This tutorial shows how to create an Excel file in Classic ASP
' with a chart and show and format the chart data table.
'================================================================

response.write("Tutorial 22<br>")
response.write("----------<br>")

' Create an instance of the class that exports Excel files
Set workbook = Server.CreateObject("EasyXLS.ExcelDocument")

' Create a worksheet
workbook.easy_addWorksheet_2("SourceData")

' Get the table of data for the worksheet
Set xlsTable1 = workbook.easy_getSheet("SourceData").easy_getExcelTable()

' Add data in cells for report header
xlsTable1.easy_getCell(0, 0).setValue("Show Date")
xlsTable1.easy_getCell(0, 1).setValue("Available Places")
xlsTable1.easy_getCell(0, 2).setValue("Available Tickets")
xlsTable1.easy_getCell(0, 3).setValue("Sold Tickets")

' Add data in cells for chart report values
xlsTable1.easy_getCell(1, 0).setValue("03/13/2005 00:00:00")
xlsTable1.easy_getCell(1, 0).setFormat(FORMAT_FORMAT_DATE)
xlsTable1.easy_getCell(2, 0).setValue("03/14/2005 00:00:00")
xlsTable1.easy_getCell(2, 0).setFormat(FORMAT_FORMAT_DATE)
xlsTable1.easy_getCell(3, 0).setValue("03/15/2005 00:00:00")
xlsTable1.easy_getCell(3, 0).setFormat(FORMAT_FORMAT_DATE)
xlsTable1.easy_getCell(4, 0).setValue("03/16/2005 00:00:00")
xlsTable1.easy_getCell(4, 0).setFormat(FORMAT_FORMAT_DATE)

xlsTable1.easy_getCell(1, 1).setValue("10000")
xlsTable1.easy_getCell(2, 1).setValue("5000")
xlsTable1.easy_getCell(3, 1).setValue("8500")
xlsTable1.easy_getCell(4, 1).setValue("1000")

xlsTable1.easy_getCell(1, 2).setValue("8000")
xlsTable1.easy_getCell(2, 2).setValue("4000")
xlsTable1.easy_getCell(3, 2).setValue("6000")
xlsTable1.easy_getCell(4, 2).setValue("1000")

xlsTable1.easy_getCell(1, 3).setValue("920")
xlsTable1.easy_getCell(2, 3).setValue("1005")
xlsTable1.easy_getCell(3, 3).setValue("342")
xlsTable1.easy_getCell(4, 3).setValue("967")

' Set column widths
xlsTable1.easy_getColumnAt(0).setWidth(100)
xlsTable1.easy_getColumnAt(1).setWidth(100)
xlsTable1.easy_getColumnAt(2).setWidth(100)
xlsTable1.easy_getColumnAt(3).setWidth(100)

' Add a chart sheet
workbook.easy_addChart_5 "Chart", "=SourceData!$A$1:$D$5", CHART_SERIES_IN_COLUMNS

' Get the previously added chart
Set xlsChartSheet = workbook.easy_getSheetAt(1)
Set xlsChart = xlsChartSheet.easy_getExcelChart()

' Hide chart legend
xlsChart.easy_getLegend().setVisible(false)

' Show chart data table
xlsChart.easy_getChartDataTable().setVisible(True)
xlsChart.easy_getChartDataTable().getFontFormat().setFont("Verdana")
xlsChart.easy_getChartDataTable().getFontFormat().setFontSize(10)
xlsChart.easy_getChartDataTable().setHorizontalLines(False)
xlsChart.easy_getChartDataTable().setLegendKey(True)
xlsChart.easy_getChartDataTable().setLineColor(CLng(COLOR_BLUE))
xlsChart.easy_getChartDataTable().setVerticalLines(False)

' Export Excel file
response.write("Writing file: C:\Samples\Tutorial22 - Excel chart datatable.xlsx<br>")
workbook.easy_WriteXLSXFile("C:\Samples\Tutorial22 - Excel chart datatable.xlsx")

' Confirm export of Excel file
if workbook.easy_getError() = "" then
    response.write("File successfully created.")
else
    response.write("Error encountered: " + workbook.easy_getError())
end if

' Dispose memory
workbook.Dispose
%>

Overloaded methods
For methods with same name but different parameters, only the first method overload retains the original name. Subsequent overloads are uniquely renamed by appending to the method name '_2', '_3', etc (method, method_2, method_3), an integer that corresponds to the order of declaration that can be found in EasyXLS.h, a file that comes with EasyXLS installation.

EasyXLS Excel components:
Excel Library for Classic ASP
full COM+ version to import, export or convert Excel files
Excel Writer for Classic ASP
COM+ version to create and export Excel files

File formats:
Office 365 MS Excel 2021 - 2024 MS Excel 2007 - 2019 MS Excel 97 - 2003

How to display chart datatable in Classic ASP

Step 1: Download and install EasyXLS Excel Library for COM+

Step 2: Verify if EasyXLS is registered

See also

Step 3: License file setup

Step 4: Run ASP code that shows and formats chart datatable for Excel file

Related sections

See also

Related methods

Related constants

EasyXLS Excel components:

File formats: