sales3.aspx

来自「掌握学习.net开发的非常好的资料」· ASPX 代码 · 共 46 行

ASPX
46
字号
<%@ Page Language="VB" Description="dotnetCHARTING Component"%>
<%@ Register TagPrefix="dotnet"  Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>


<script runat="server">
Sub Page_Load(sender As Object ,e As EventArgs )

	'set global properties
    Chart.DefaultSeries.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;user id=admin;password=;data source=" & Server.MapPath("../../database/chartsample.mdb")  
    Chart.Title="Sales January vs. February"
    Chart.XAxis.Label.Text="Days"
    Chart.ShowDateInTitle=false
    Chart.YAxis.Scale = Scale.FullStacked
    Chart.TempDirectory="temp"
    Chart.Debug=true
    Chart.DateGrouping = TimeInterval.Month
    Chart.DefaultSeries.DefaultElement.ShowValue=true
    Chart.DefaultSeries.DefaultElement.LabelTemplate="%PercentOfGroup"
   
    'Add series 1
    Chart.Series.Name="Jan"
    Chart.Series.StartDate= New System.DateTime(2002,1,1,0,0,0)
    Chart.Series.EndDate = New System.DateTime(2002,1,31,23,59,59)
    Chart.Series.SqlStatement= "SELECT OrderDate,Total FROM Orders  WHERE OrderDate >= #STARTDATE# AND OrderDate <= #ENDDATE# ORDER BY OrderDate"
    
    Chart.SeriesCollection.Add()
    
    'Add series 2
    Chart.Series.Name="Feb"
    Chart.Series.StartDate= New System.DateTime(2002,2,1,0,0,0)
    Chart.Series.EndDate = New System.DateTime(2002,2,28,23,59,59)
    Chart.Series.SqlStatement= "SELECT OrderDate,Total FROM Orders  WHERE OrderDate >= #STARTDATE# AND OrderDate <= #ENDDATE# ORDER BY OrderDate"
    Chart.SeriesCollection.Add()


End Sub
</script>
<HTML><HEAD><TITLE>Sales Report</TITLE></HEAD>
<BODY>
<DIV align=center>
 <dotnet:Chart id="Chart"  runat="server"/>
</DIV>
</BODY>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?