ASP网站制作之ASP怎样使用excel创建图表

只看该作者 · 发表于 2015-1-16 23:47:35

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

由于ASP提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。excel|图表|excel|图表如今我们针对EXCEL举别的一个例子，人人都扣问怎样用ASP创建图表的成绩，以下就是办理计划

Firstwesetthetypeofscript
起首设定剧本范例
<%@LANGUAGE="VBSCRIPT"%>

Maketheobject,andsettheobjecttoanExcelsheet
创建Excelsheet工具

DimMyExcelChart
SetMyExcelChart=CreateObject("Excel.Sheet")

showordontshowexceltouser,TRUEorFALSE
是不是让用户看到EXCEL表格，真或假
MyExcelChart.Application.Visible=True

populatethecells
添EXCEL表格
MyExcelChart.ActiveSheet.Range("B2:k2").Value=Array("Week1","Week2","Week3","Week4","Week5","Week6","Week7","Week8","Week9","Week10")
MyExcelChart.ActiveSheet.Range("B3:k3").Value=Array("67","87","5","9","7","45","45","54","54","10")
MyExcelChart.ActiveSheet.Range("B4:k4").Value=Array("10","10","8","27","33","37","50","54","10","10")
MyExcelChart.ActiveSheet.Range("B5:k5").Value=Array("23","3","86","64","60","18","5","1","36","80")
MyExcelChart.ActiveSheet.Cells(3,1).Value="InternetExplorer"
MyExcelChart.ActiveSheet.Cells(4,1).Value="Netscape"
MyExcelChart.ActiveSheet.Cells(5,1).Value="Other"

Selectthecontentsthatneedtobeinthechart
在EXCEL表当选摘要在图表（CHART）中显现的数据
MyExcelChart.ActiveSheet.Range("b2:k5").Select

Addthechart
加载图表（CHART）
MyExcelChart.Charts.Add
Formatthechart,settypeofchart,shapeofthebars,showtitle,getthedataforthechart,showdatatable,showlegend
初始化图表（CHART），设定图表范例，棒图的外形，要显现的题目，获得要作图的数据，显现数据表，显现图表
MyExcelChart.activechart.ChartType=97
MyExcelChart.activechart.BarShape=3
MyExcelChart.activechart.HasTitle=True
MyExcelChart.activechart.ChartTitle.Text="Visitorslogforeachweekshowninbrowserspercentage"
MyExcelChart.activechart.SetSourceDataMyExcelChart.Sheets("Sheet1").Range("A1:k5"),1
MyExcelChart.activechart.Location1
MyExcelChart.activechart.HasDataTable=True
MyExcelChart.activechart.DataTable.ShowLegendKey=True

Savethetheexcelsheettoexcelface
存进EXCEL表
MyExcelChart.SaveAs"c:chart.xls"
%>

NowletscompletetheHTMLtags.
上面是HTML代码

<HTML>
<HEAD>
<TITLE>MyExcelChart</TITLE>
</HEAD>
<BODY>
</BODY>
</HTML>

ThiscompletesyerASPpage,lookbelowforthecompletecodeofmyexcelchart.asp
上面是源程序myexcelchart.asp的完全代码

<%@LANGUAGE="VBSCRIPT"%>
<%
SetMyExcelChart=CreateObject("Excel.Sheet")

MyExcelChart.Application.Visible=True

MyExcelChart.ActiveSheet.Range("B2:k2").Value=Array("Week1","Week2","Week3","Week4","Week5","Week6","Week7","Week8","Week9","Week10")
MyExcelChart.ActiveSheet.Range("B3:k3").Value=Array("67","87","5","9","7","45","45","54","54","10")
MyExcelChart.ActiveSheet.Range("B4:k4").Value=Array("10","10","8","27","33","37","50","54","10","10")
MyExcelChart.ActiveSheet.Range("B5:k5").Value=Array("23","3","86","64","60","18","5","1","36","80")
MyExcelChart.ActiveSheet.Cells(3,1).Value="InternetExplorer"
MyExcelChart.ActiveSheet.Cells(4,1).Value="Netscape"
MyExcelChart.ActiveSheet.Cells(5,1).Value="Other"

MyExcelChart.ActiveSheet.Range("b2:k5").Select

MyExcelChart.Charts.Add
MyExcelChart.activechart.ChartType=97
MyExcelChart.activechart.BarShape=3
MyExcelChart.activechart.HasTitle=True
MyExcelChart.activechart.ChartTitle.Text="Visitorslogforeachweekshowninbrowserspercentage"
MyExcelChart.activechart.SetSourceDataMyExcelChart.Sheets("Sheet1").Range("A1:k5"),1
MyExcelChart.activechart.Location1
MyExcelChart.activechart.HasDataTable=True
MyExcelChart.activechart.DataTable.ShowLegendKey=True

MyExcelChart.SaveAs"c:chart.xls"

%>
<HTML>
<HEAD>
<TITLE>MyExcelChart</TITLE>
</HEAD>
<BODY>
</BODY>
</HTML></p>对用户来说可预见费用、节约费用，可以做到花少钱办大事。由于省去了购买软件和硬件等的前期费用，用户可以租用较高级的应用软件。ASP的收费是根据软件的类型、客制化程度、用户数量、服务期限来定的，对客户来说这笔费用是可以预见的。方便于客户应用软件的升级。

只看该作者 · 发表于 2015-1-20 11:51:13

下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

只看该作者 · 发表于 2015-1-25 16:25:26

作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。

只看该作者 · 发表于 2015-1-25 16:26:47

如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:

只看该作者 · 发表于 2015-2-2 11:02:54

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

只看该作者 · 发表于 2015-2-7 18:12:16

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

只看该作者 · 发表于 2015-2-22 20:16:22

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

只看该作者 · 发表于 2015-3-7 02:11:19

ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

只看该作者 · 发表于 2015-3-14 04:05:20

以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

只看该作者 · 发表于 2015-3-21 00:02:17

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

		自动登录	找回密码
密码			立即注册

[学习教程] ASP网站制作之ASP怎样使用excel创建图表

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子