日期:2011-08-22  浏览次数:20968 次

谈谈MsChart在如何在ASP中使用

MsChart是微软制作的功能强大的图表工具,用它可以
很方便的建立各种图表。制作各种3维2维的直方图,折
线图。在ChinaAsp中已经有好几次有人询问MsChart怎
么用,在此处我给出一个例子。希望大家了解。


发送数据程序
<HTML><HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD><BODY>
<form  method=post name="form1"  action=mschart.asp>
<INPUT type="submit" value="发送" id=submit1 name=submit1>
<!
chtitle    标题
rcount    列数
ccount    行数
rc_type 排列方式(1 以行方式,2以列方式)
rc_data 数据
rname    列名数组
cname    行名数组>
<input type="hidden" value="CoolFatMan的成长里程" name=chtitle>
<input type="hidden" value=3  name=rcount>
<input type="hidden" value=2  name=ccount>
<input type="hidden" value=1  name=rc_type>
<input type="hidden" value="1993" name=rname>
<input type="hidden" value="1996" name=rname>
<input type="hidden" value="1999" name=rname>
<input type="hidden" value="身高" name=cname>
<input type="hidden" value="体重" name=cname>
<input type="hidden" value=179 name=rc_data>
<input type="hidden" value=160 name=rc_data>
<input type="hidden" value=180 name=rc_data>
<input type="hidden" value=170 name=rc_data>
<input type="hidden" value=182 name=rc_data>
<input type="hidden" value=182 name=rc_data>
</form></BODY></HTML>


显示数据程序 mschart.asp
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--
function window_onload() {
t=0;
mschart1.TitleText = document.form1.chtitle.value;
mschart1.ShowLegend =true;
mschart1.ColumnCount =document.form1.ccount.value;
mschart1.RowCount =document.form1.rcount.value;
for (i=0;i<document.form1.rcount.value;i++)
    {for (j=0;j<document.form1.ccount.value;j++)
        {    mschart1.Row=i+1;
            mschart1.Column=j+1;
            if (document.form1.ccount.value>1)
                mschart1.ColumnLabel =document.form1.cname(j).value;
            else
                mschart1.ColumnLabel =document.form1.cname.value;
            if ((document.form1.rcount.value*document.form1.ccount.value)>1)
                mschart1.Data=document.form1.rc_data(t).value;
            else
                mschart1.Data=document.form1.rc_data.value;
            t++;
        }
    if (document.form1.rcount.value>1)
        mschart1.RowLabel =docume