 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
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 =document.form1.rname(i).value ; else mschart1.RowLabel =document.form1.rname.value ; } } function select1_onchange() { mschart1.chartType =select1.value mschart1.Plot } //--> </SCRIPT> <TITLE>数据显示图</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 标题 rcount 列数 ccount 行数 rc_type 排列方法（1 以行方法，2以列方法） rc_data 数据 rname 列名数组 cname 行名数组> <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> 返回类别: 教程 上一教程: 一个用JMAIL发信的过程，及使用方式.使用时直接调用就行 下一教程: 数据库连接 您可以阅读与"CHART组件在ASP中的应用"相关的教程: · 浅谈TEECHART组件在ASP中的应用 · ACCESS数据库在ASP中的应用 · ASP应用中的应用函数 · ASP和数据库技术在WAP开发中的应用 · 磁盘ID在ASP源码防拷贝中的应用 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
