📄 datareader.aspx
字号:
<%@ Page Language="VB" debug="true" trace="false" Description="dotnetCHARTING Component"%>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
Sub Page_Load(sender As Object,e As EventArgs )
'set global properties
Chart.Title="Item sales report"
Chart.ChartArea.XAxis.Label.Text="Customers"
Chart.TempDirectory="temp"
Chart.Debug=true
'Adding series programatically
Chart.Series.Name = "Item sales"
SetData()
Chart.SeriesCollection.Add()
End sub
Function SetData()
Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;user id=admin;password=;data source=" & Server.MapPath("../../database/chartsample.mdb")
Dim conn As OleDbConnection = new OleDbConnection(connString)
Dim selectQuery As string = "SELECT Name,Sum(Quantity) FROM Orders GROUP BY Orders.Name ORDER BY Orders.Name"
Dim myCommand As OleDbCommand = new OleDbCommand(selectQuery, conn)
conn.Open()
Dim myReader As OleDbDataReader = myCommand.ExecuteReader()
'set dataReader to data property
Chart.Series.Data = myReader
'Cleanup
myReader.Close()
conn.Close()
End Function
</script>
<HTML><HEAD><TITLE>Data Reader Sample</TITLE></HEAD>
<BODY>
<DIV align=center>
<dotnet:Chart id="Chart" runat="server"/>
</DIV>
</BODY>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -