|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。饼图|柱状图 我们事情中常常必要将数据转化成柱状图,饼图等,以便利直不雅的剖析数据,这里给人人先容一个ASP中制造饼图、柱状图的组件:csDrawGraph,csdgt.zip,由于是组件,以是我们在利用之前必要用REGSVR32.EXE注册一下,csDrawGraph,能够在ASP中创立饼图,柱状图和线图,其撑持的格局有GIF,PNG,JPGandBMP.
看看以下的柱状图,饼图怎样天生的例子:
chartdemo.asp
<%@language=vbscript%>
<html>
<head>
<title>csDrawGraphDemonstration</title>
</head>
<bodybgcolor="#FFFFFF">
<P>Thissimpledemonstrationshowstwographsusingthesamedata.Thefirstis
abarchart:</P>
<Palign="center">
</P>
</body>
</html>chartimages.asp
<%@language=vbscript%>
<%
Response.Expires=0
Response.Buffer=true
Response.Clear
Response.ContentType="Image/Gif"
SetChart=Server.CreateObject("csDrawGraphTrial.Draw")
Chart.AddData"NO>1",17,"ff0000"
Chart.AddData"NO>2",28,"00ff00"
Chart.AddData"NO>3",5,"0000ff"
IfRequest.QueryString("Type")="Pie"Then
Chart.Title="SamplePieChart"
Chart.BGColor="eeeeee"
Chart.LabelBGColor="eeeeee"
Chart.TitleBGColor="eeeeee"
Response.BinaryWriteChart.GifPie
Else
Chart.Title="SampleBarChart"
Response.BinaryWriteChart.GifBar
EndIf
Response.End
%>
程序很复杂,再些不具体申明,上面看一个将数据库中的数据转换到图表的例子:
lines.asp:
<html>
<head>
<title>Linegraphshowingalltheresults</title>
</head>
<body>
<tablealign=centerwidth=400>
<tr><tdcolspan=4><imgsrc="gif_lines.asp"width=400height=300></td></tr>
</table>
<p>Linkstotheotherresultpages:</p>
<p><ahref=barsbyday.asp>Barchartshowingallresultsforanyoneday</a>.</p>
<p><ahref=barsbycolour.asp>Barchartsshowingresultsforeachcolourseparately</a>.</p>
</body>
</html>
gif_lines.asp:
<%@language=vbscript%>
<%
使用数据库中的数据天生线图。
依据4个分歧的值分离天生4条线。
在X轴上显现礼拜的称号。
Response.Expires=0
Response.Buffer=true
Response.Clear
使用上面的语句创立chart工具,版本分歧会有所差别。
SetChart=Server.CreateObject("csDrawGraph.Draw")
SetChart=Server.CreateObject("csDrawGraphTrial.Draw")
ConnectionString="PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATASOURCE="&_
Server.Mappath("data.mdb")
SetDBConn=Server.CreateObject("ADODB.Connection")
DBConn.OpenConnectionString
SetRS=Server.CreateObject("ADODB.Recordset")
SQL="SELECT*FROMTable1ORDERBYDay"
RS.OpenSQL,DBConn
WhileNotRS.Eof
Chart.AddPointCInt(RS("Day")),CInt(RS("Red")),"ff0000","Red"
Chart.AddPointCInt(RS("Day")),CInt(RS("Blue")),"0000ff","Blue"
Chart.AddPointCInt(RS("Day")),CInt(RS("Green")),"00ff00","Green"
Chart.AddPointCInt(RS("Day")),CInt(RS("Yellow")),"ffff00","Yellow"
Chart.AddXValueCInt(RS("Day")),RS("DayName")
RS.MoveNext
Wend
封闭数据库毗连
RS.Close
DBConn.Close
上面设置组件属性
X轴坐标从1入手下手而不是0。(XOffset=1)
Chart.Title="Allthecombinedresults"
Chart.TitleX=100
Chart.YAxisText="Totalforeachday"
Chart.OriginY=220
Chart.XOffset=1
Chart.XTop=7
Chart.XGrad=1
Chart.UseXAxisLabels=true
Chart.LineWidth=2
Chart.PointSize=3
Chart.PointStyle=1
最初图片以GIF格局发送到扫瞄器
Response.ContentType="image/gif"
Response.BinaryWriteChart.GIFLine
Response.End
%>
了局如图所示:
csDrawGraph的下载地点:http://www.chestysoft.com/download/csdgt.zip
ASP由于使用了COM组件所以它会变的十分强大,但是这样的强大由于WindowsNT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意,哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失; |
|