TransWar File Browser

Path: C:\

<%@ language="vbscript" %>
<%
Set cd = CreateObject("ChartDirector.API")

'
' For demo purpose, we use hard coded data. In real life, the following data could
' come from a database.
'
revenue = Array(4500, 5600, 6300, 8000, 12000, 14000, 16000, 20000, 24000, 28000)
grossMargin = Array(62, 65, 63, 60, 55, 56, 57, 53, 52, 50)
backLog = Array(563, 683, 788, 941, 1334, 1522, 1644, 1905, 2222, 2544)
labels = Array("1996", "1997", "1998", "1999", "2000", "2001", "2002", "2003", _
    "2004", "2005")

' Create a XYChart object of size 600 x 360 pixels
Set c = cd.XYChart(600, 360)

' Add a title to the chart using 18pts Times Bold Italic font
Call c.addTitle("Annual Revenue for Star Tech", "timesbi.ttf", 18)

' Set the plotarea at (60, 40) and of size 480 x 280 pixels. Use a vertical gradient
' color from light green (eeffee) to dark green (008800) as background. Set border
' and grid lines to white (ffffff).
Call c.setPlotArea(60, 40, 480, 280, c.linearGradientColor(60, 40, 60, 280, _
    &Heeffee, &H008800), -1, &Hffffff, &Hffffff)

' Add a multi-color bar chart layer using the revenue data.
Set layer = c.addBarLayer3(revenue)

' Set cylinder bar shape
Call layer.setBarShape(cd.CircleShape)

' Add extra field to the bars. These fields are used for showing additional
' information.
Call layer.addExtraField2(grossMargin)
Call layer.addExtraField2(backLog)

' Set the labels on the x axis.
Call c.xAxis().setLabels(labels)

' In this example, we show the same scale using both axes
Call c.syncYAxis()

' Set the axis line to transparent
Call c.xAxis().setColors(cd.Transparent)
Call c.yAxis().setColors(cd.Transparent)
Call c.yAxis2().setColors(cd.Transparent)

' Set the axis label to using 8pt Arial Bold as font
Call c.yAxis().setLabelStyle("arialbd.ttf", 8)
Call c.yAxis2().setLabelStyle("arialbd.ttf", 8)
Call c.xAxis().setLabelStyle("arialbd.ttf", 8)

' Add title to the y axes
Call c.yAxis().setTitle("USD (millions)", "arialbd.ttf", 10)
Call c.yAxis2().setTitle("USD (millions)", "arialbd.ttf", 10)

' Create the image and save it in a temporary location
chart1URL = c.makeSession(Session, "chart1")

' Client side Javascript to show detail information "onmouseover"
showText = "onmouseover='showInfo(""{xLabel}"", {value}, {field0}, {field1});' "

' Client side Javascript to hide detail information "onmouseout"
hideText = "onmouseout='showInfo(null);' "

' "title" attribute to show tool tip
toolTip = "title='{xLabel}: US$ {value|0}M'"

' Create an image map for the chart
imageMap = c.getHTMLImageMap("xystub.asp", "", showText & hideText & toolTip)
%>
<html>
<body style="margin:5px 0px 0px 5px">
<script type="text/javascript">
//
//Client side script function to show and hide detail information.
//
function showInfo(year, revenue, grossMargin, backLog) {
    var obj;
    if (document.getElementById)
        //IE 5.x or NS 6.x or above
        obj = document.getElementById('detailInfo');
    else
        //IE 4.x
        obj = document.all['detailInfo'];

    if (!year)
    {
        obj.style.visibility = "hidden";
        return;
    }

    var content = "<table border='1' cellpadding='3' style='font-size:10pt; " +
       "font-family:verdana; background-color:#CCCCFF' width='480'>";
    content += "<tr><td><b>Year</b></td><td width='300'>" + year + "</td></tr>";
    content += "<tr><td><b>Revenue</b></td><td>US$ " + revenue + "M</td></tr>";
    content += "<tr><td><b>Gross Margin</b></td><td>" + grossMargin + "%</td></tr>";
    content += "<tr><td><b>Back Log</b></td><td>US$ " + backLog + "M</td></tr>";
    content += "</table>";

    obj.innerHTML = content;
    obj.style.visibility = "visible";
}
</script>
<div style="font-size:18pt; font-family:verdana; font-weight:bold">
    Javascript Clickable Chart
</div>
<hr style="border:solid 1px #000080" />
<div style="font-size:10pt; font-family:verdana; margin-bottom:20">
    <a href='viewsource.asp?file=<%=Request("SCRIPT_NAME")%>'>View Source Code</a>
</div>
<img src="getchart.asp?<%=chart1URL%>" border="0" usemap="#map1">
<map name="map1">
<%=imageMap%>
</map>
<div id="detailInfo" style="margin-left:60px"></div>
</body>
</html>