chart組件在ASP中的應(yīng)用
發(fā)表時(shí)間：2024-02-18 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：
[摘要]chart組件在ASP中的應(yīng)用 -------------------------------------------------------------------------------- MsChart是微軟制作的功能強(qiáng)大的圖表工具，用它可以 很方便的建立各種圖表。制作各種3維2維的直方圖，...
chart組件在ASP中的應(yīng)用
--------------------------------------------------------------------------------
MsChart是微軟制作的功能強(qiáng)大的圖表工具，用它可以
很方便的建立各種圖表。制作各種3維2維的直方圖，折
線圖。在ChinaAsp中已經(jīng)有好幾次有人詢問MsChart怎
么用，在此處我給出一個(gè)例子。希望大家了解。
發(fā)送數(shù)據(jù)程序
<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="發(fā)送" id=submit1 name=submit1>
<!
chtitle 標(biāo)題
rcount 列數(shù)
ccount 行數(shù)
rc_type 排列方式（1 以行方式，2以列方式）
rc_data 數(shù)據(jù)
rname 列名數(shù)組
cname 行名數(shù)組>
<input type="hidden" value="CoolFatMan的成長(zhǎng)里程" 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>
顯示數(shù)據(jù)程序 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 =document.form1.rname(i).value ;
else
mschart1.RowLabel =document.form1.rname.value ;
}
}
function select1_onchange() {
mschart1.chartType =select1.value
mschart1.Plot
}
//-->
</SCRIPT>
<TITLE>數(shù)據(jù)顯示圖</TITLE>
</HEAD>
<BODY LANGUAGE=javascript onload="return window_onload()">
<object 此處插入mschart activex控件>
<BR>
顯示方式
<SELECT id=select1 name=select1 LANGUAGE=javascript onchange="return select1_onchange()">
<OPTION value=1>二維直方圖</OPTION>
<OPTION value=0>三維直方圖</OPTION>
<OPTION value=3>二維折線圖</OPTION>
<OPTION value=2>三維折線圖</OPTION>
<OPTION value=5>二維面積圖</OPTION>
<OPTION value=4>三維面積圖</OPTION>
<OPTION value=14>餅圖</OPTION></SELECT>
<!
chtitle 標(biāo)題
rcount 列數(shù)
ccount 行數(shù)
rc_type 排列方式（1 以行方式，2以列方式）
rc_data 數(shù)據(jù)
rname 列名數(shù)組
cname 行名數(shù)組>
<form name=form1 id=form1>
<% for i=1 to Request.Form("rcount")%>
<input type="hidden" name=rname id=rname value=<%=Request.Form("rname")(i)%>>
<%next%>
<% for i=1 to Request.Form("ccount")%>
<input type="hidden" name=cname id=cname value=<%=Request.Form("cname")(i)%>>
<%next%>
<input type="hidden" name=rcount id=rcount value=<%=Request.Form("rcount")%>>
<input type="hidden" name=chtitle id=chtitle value=<%=Request.Form("chtitle")%>>
<input type="hidden" name=ccount id=ccount value=<%=Request.Form("ccount")%>>
<%if Request.Form("rc_type")=1 then%>
<%for i=1 to Request.Form("rcount")*Request.Form("ccount")%>
<input type="hidden" name=rc_data id=rc_data value=<%=Request.Form("rc_data")(i)%>>
<%next%>
<%else%>
<%for j=1 to Request.Form("rcount")%>
<%for i=1 to Request.Form("ccount")%>
<input type="hidden" name=rc_data id=rc_data value=<%=Request.Form("rc_data")((i-1)*Request.Form("rcount")+j)%>>
<%next%>
<%next%>
<%end if%>
</form></BODY></HTML> （出處：熱點(diǎn)網(wǎng)絡(luò)）
