⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dataset.aspx

📁 掌握学习.net开发的非常好的资料
💻 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.XAxis.Label.Text="Customers"
    Chart.TempDirectory="temp"
    Chart.Debug=true
    
    
    'Adding series programatically
   	Chart.Series.Name = "Item sales"
   	Chart.Series.Data = CreateDataSet()
    Chart.SeriesCollection.Add()
                       
   
End Sub
Function  CreateDataSet() As DataSet

	Dim ds As  DataSet = new DataSet()
	Dim dt As DataTable = new DataTable()
	
	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  adapter As OleDbDataAdapter = new OleDbDataAdapter()
    Dim  selectQuery As String = "SELECT Name,Sum(Quantity) FROM Orders GROUP BY Orders.Name ORDER BY Orders.Name" 
    adapter.SelectCommand = new OleDbCommand(selectQuery, conn)
    adapter.Fill(dt)
    ds.Tables.Add(dt)
    return ds
End Function
</script>
<HTML><HEAD><TITLE>Data Set 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 + -