(1)利用ASP.NET DataGrid显示主次关系的数据
(2)如何在DataGrid绑定之前为DataSet添加新列(1)利用ASP.NET DataGrid显示主次关系的数据
Imports System.Data.SqlClientPublic Class HierarchicalDataGrid
Inherits System.Web.UI.Page
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid#Region " Web Form Designer Generated Code "'下面的调用对Web Form设计器来说是必须的
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()End SubPrivate Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 这个方法是为Web Form设计器调用的
'不要用代码编辑器改变这里.
InitializeComponent()
End Sub#End RegionPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'打开数据库连接
Dim OrdersConnection As New SqlConnection("Server=(local)\NetSDK;Database=northwind;Trusted_Connection=yes")'得到订单和订单详细信息
Dim OrderAdapter As New SqlDataAdapter("Select * from Orders; select OrderID ,Products.ProductName,[order Details].Unitprice,[order Details].Quantity,[order Details].discount from [order Details],Products where [Order Details].ProductId=Products.ProductID", OrdersConnection)'创建并填充DataSet对象
Dim OrderDataSet As New DataSet()OrderAdapter.Fill(OrderDataSet)'设定表名字
OrderDataSet.Tables(0).TableName = "Orders"
OrderDataSet.Tables(1).TableName = "Order Details"'在基于OrderID字段的两个表之间建立父子关系
Dim Parent As DataColumn = OrderDataSet.Tables("Orders").Columns("OrderID")
Dim Child As DataColumn = OrderDataSet.Tables("Order Details").Columns("OrderID")Dim OrderRelation As DataRelation = New DataRelation("OrderRelation", Parent, Child, False)'为DataSet添加关系
OrderDataSet.Relations.Add(OrderRelation)'把DataGrid绑定到Orders表
DataGrid1.DataSource = OrderDataSet.Tables("Orders").DefaultView
DataBind()End SubPrivate Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound
e.Item.Cells(0).BackColor = System.Drawing.Color.Ivory
End Sub
End Class <%@ Page Language="vb" AutoEventWireup="false" Codebehind="HierarchicalDataGrid.aspx.vb" Inherits="HierarchicalDataGrid.HierarchicalDataGrid" %>
<%@ Import namespace="System.Data"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>显示主次关系数据的例子</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body>
<form id="FrmDataGrid" method="post" runat="server">
<P align="center">
<asp:DataGrid id="DataGrid1" BorderColor="#0099FF" runat="server" ShowHeader="False" Width="470px" CellPadding="0" CellSpacing="0" AutoGenerateColumns="False" BorderWidth="2px">
<Columns>
<asp:TemplateColumn>
<ItemTemplate>
<TABLE cellSpacing="0" cellPadding="0" width="100%" border="0">
<TR>
<TD bgColor="#FF6600"><B>订单号:
<%# DataBinder.Eval(Container.DataItem, "OrderID") %>
</B>
</TD>
</TR>
<TR>
<TD align="right">
<asp:DataGrid id=DataGrid2 runat="server" AutoGenerateColumns="False" BorderColor="#33FF33" DataKeyField="OrderID" DataSource='<%# Ctype(Container.DataItem,DataRowView).CreateChildView("OrderRelation") %>'>
<HeaderStyle Font-Bold="True" ForeColor="#CC0066" BackColor="#FFCCFF"></HeaderStyle>
<Columns>
<asp:BoundColumn Visible="False" DataField="OrderID" ReadOnly="True"></asp:BoundColumn>
<asp:TemplateColumn HeaderText="产品名称">
<HeaderStyle Width="300px"></HeaderStyle>
<ItemTemplate>
<%# DataBinder.Eval(Container.DataItem, "ProductName") %>
</ItemTemplate>
</asp:TemplateColumn>
<asp:BoundColumn DataField="UnitPrice" HeaderText="单价"></asp:BoundColumn>
<asp:BoundColumn DataField="Quantity" HeaderText="数量"></asp:BoundColumn>
<asp:BoundColumn DataField="Discount" HeaderText="折扣"></asp:BoundColumn>
</Columns>
</asp:DataGrid></TD>
</TR>
</TABLE>
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:DataGrid></P>
</form>
</body>
</HTML>
(2)如何在DataGrid绑定之前为DataSet添加新列(1)利用ASP.NET DataGrid显示主次关系的数据
Imports System.Data.SqlClientPublic Class HierarchicalDataGrid
Inherits System.Web.UI.Page
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid#Region " Web Form Designer Generated Code "'下面的调用对Web Form设计器来说是必须的
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()End SubPrivate Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 这个方法是为Web Form设计器调用的
'不要用代码编辑器改变这里.
InitializeComponent()
End Sub#End RegionPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'打开数据库连接
Dim OrdersConnection As New SqlConnection("Server=(local)\NetSDK;Database=northwind;Trusted_Connection=yes")'得到订单和订单详细信息
Dim OrderAdapter As New SqlDataAdapter("Select * from Orders; select OrderID ,Products.ProductName,[order Details].Unitprice,[order Details].Quantity,[order Details].discount from [order Details],Products where [Order Details].ProductId=Products.ProductID", OrdersConnection)'创建并填充DataSet对象
Dim OrderDataSet As New DataSet()OrderAdapter.Fill(OrderDataSet)'设定表名字
OrderDataSet.Tables(0).TableName = "Orders"
OrderDataSet.Tables(1).TableName = "Order Details"'在基于OrderID字段的两个表之间建立父子关系
Dim Parent As DataColumn = OrderDataSet.Tables("Orders").Columns("OrderID")
Dim Child As DataColumn = OrderDataSet.Tables("Order Details").Columns("OrderID")Dim OrderRelation As DataRelation = New DataRelation("OrderRelation", Parent, Child, False)'为DataSet添加关系
OrderDataSet.Relations.Add(OrderRelation)'把DataGrid绑定到Orders表
DataGrid1.DataSource = OrderDataSet.Tables("Orders").DefaultView
DataBind()End SubPrivate Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound
e.Item.Cells(0).BackColor = System.Drawing.Color.Ivory
End Sub
End Class <%@ Page Language="vb" AutoEventWireup="false" Codebehind="HierarchicalDataGrid.aspx.vb" Inherits="HierarchicalDataGrid.HierarchicalDataGrid" %>
<%@ Import namespace="System.Data"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>显示主次关系数据的例子</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body>
<form id="FrmDataGrid" method="post" runat="server">
<P align="center">
<asp:DataGrid id="DataGrid1" BorderColor="#0099FF" runat="server" ShowHeader="False" Width="470px" CellPadding="0" CellSpacing="0" AutoGenerateColumns="False" BorderWidth="2px">
<Columns>
<asp:TemplateColumn>
<ItemTemplate>
<TABLE cellSpacing="0" cellPadding="0" width="100%" border="0">
<TR>
<TD bgColor="#FF6600"><B>订单号:
<%# DataBinder.Eval(Container.DataItem, "OrderID") %>
</B>
</TD>
</TR>
<TR>
<TD align="right">
<asp:DataGrid id=DataGrid2 runat="server" AutoGenerateColumns="False" BorderColor="#33FF33" DataKeyField="OrderID" DataSource='<%# Ctype(Container.DataItem,DataRowView).CreateChildView("OrderRelation") %>'>
<HeaderStyle Font-Bold="True" ForeColor="#CC0066" BackColor="#FFCCFF"></HeaderStyle>
<Columns>
<asp:BoundColumn Visible="False" DataField="OrderID" ReadOnly="True"></asp:BoundColumn>
<asp:TemplateColumn HeaderText="产品名称">
<HeaderStyle Width="300px"></HeaderStyle>
<ItemTemplate>
<%# DataBinder.Eval(Container.DataItem, "ProductName") %>
</ItemTemplate>
</asp:TemplateColumn>
<asp:BoundColumn DataField="UnitPrice" HeaderText="单价"></asp:BoundColumn>
<asp:BoundColumn DataField="Quantity" HeaderText="数量"></asp:BoundColumn>
<asp:BoundColumn DataField="Discount" HeaderText="折扣"></asp:BoundColumn>
</Columns>
</asp:DataGrid></TD>
</TR>
</TABLE>
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:DataGrid></P>
</form>
</body>
</HTML>
解决方案 »
- 电子商务网站的运费问题
- 这个算法应该怎么写?
- 我想问一个问题,麻烦大家帮忙下。。
- MVC2.0 问题:为什么在XXX.aspx中用Model点不出Model的表属性?
- 使用div的一点小问题
- GridViewde的__doPostBack问题
- 如何用AJAX在HTML中实现数据绑定(帮帮忙,谢谢/)
- 利用c/s实时获取硬件设备参数,如何实时传给ASP.NET C#网页客户端呢
- 急啊,为什么我获取不到传过来的值啊?
- vs.net 为什么总是自动给我加上<FONT face="宋体">,如何让她不加??
- 我用asp.net做论坛,请问用xml来保存网友的发言好还是用sql来保存好,为什么?大侠们帮我啊
- 要动态调整框架大小该怎么设置?
Inherits="aspxWeb.AddDataSetColumn"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>AddDataSetColumn</title>
<meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.1">
<meta name="CODE_LANGUAGE" content="Visual Basic .NET 7.1">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
<asp:DataGrid id="DataGrid1" runat="server" AutoGenerateColumns="False"
ShowFooter="True" Width="100%">
<HeaderStyle Font-Names="宋体" Font-Bold="True" HorizontalAlign="Center"
ForeColor="Navy" BackColor="LightSalmon"></HeaderStyle>
<FooterStyle BackColor="#FFCCFF"></FooterStyle>
<Columns>
<asp:TemplateColumn HeaderText="订单号">
<ItemTemplate>
<asp:Label ID="OrderID" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="产品号">
<ItemTemplate>
<asp:Label ID="ProductID" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="单价">
<ItemTemplate>
<asp:Label ID="UnitPrice" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="数量">
<ItemTemplate>
<asp:Label ID="Quantity" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="折扣">
<ItemTemplate>
<asp:Label ID="Discount" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="总计">
<ItemTemplate>
<asp:Label ID="lblTotal" Runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:DataGrid>
</form>
</body>
</HTML>Imports System.Web.UI.WebControlsPublic Class AddDataSetColumn
Inherits System.Web.UI.Page#Region " Web 窗体设计器生成的代码 " '该调用是 Web 窗体设计器所必需的。
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent() End Sub
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid '注意: 以下占位符声明是 Web 窗体设计器所必需的。
'不要删除或移动它。
Private designerPlaceholderDeclaration As System.Object Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
'不要使用代码编辑器修改它。
InitializeComponent()
End Sub#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim strCnn As String = "Data Source=.\NetSDK; Initial Catalog=Northwind;User ID=sa;Password=;"
Dim oCn As New System.Data.SqlClient.SqlConnection(strCnn)
Dim strSql As System.String = "select * from [Order Details]"
Dim ds As System.Data.DataSet = New System.Data.DataSet
oCn.Open()
Dim da As System.Data.SqlClient.SqlDataAdapter = New System.Data.SqlClient.SqlDataAdapter(strSql, oCn)
' 可以直接使用SQL语句实现,这个方法可以直接绑定,不需要用模板即可
' cmd.CommandText = "select *,UnitPrice * Quantity *(1- Discount) as Total from [Order Details]"
' 我们使用另外一种方法,在DataGrid绑定之前为DataSet添加一个列
da.Fill(ds, "DS")
Dim dvwGrid As DataView = ds.Tables(0).DefaultView
DataGrid1.DataSource = dvwGrid
DataGrid1.DataBind()
oCn.Close()
oCn.Dispose()
End Sub Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As DataGridItemEventArgs) _
Handles DataGrid1.ItemDataBound
Dim elemType As ListItemType = e.Item.ItemType
If (elemType = ListItemType.Item Or elemType = ListItemType.AlternatingItem) Then
'把DataItem转换回DataRowView对象
Dim myDataRowView As DataRowView = CType(e.Item.DataItem, DataRowView)
Dim myDataRow As DataRow = myDataRowView.Row
CType(e.Item.Cells(0).FindControl("OrderID"), Label).Text = myDataRow("OrderID")
CType(e.Item.Cells(1).FindControl("ProductID"), Label).Text = myDataRow("ProductID")
CType(e.Item.Cells(2).FindControl("UnitPrice"), Label).Text = myDataRow("UnitPrice")
CType(e.Item.Cells(3).FindControl("Quantity"), Label).Text = myDataRow("Quantity")
CType(e.Item.Cells(4).FindControl("Discount"), Label).Text = myDataRow("Discount") Dim dblPrice As Double = Double.Parse(myDataRow("UnitPrice"))
Dim intQuantity As Integer = Int32.Parse(myDataRow("Quantity"))
Dim intDiscount As Double = Double.Parse(myDataRow("Discount")) Dim nTotal As String = String.Format("{0:C}", dblPrice * (1 - intDiscount) * intQuantity)
CType(e.Item.Cells(5).FindControl("lblTotal"), Label).Text = nTotal
End If
End Sub
End Class
CType(e.Item.Cells(3).FindControl("Quantity"), Label).
-->
((Label)(e.Item.Cells(3).FindControl("Quantity"))e.Item.Cells(3)
-->e.Item.Cells[3]其他的定义部分改改即可ds.Tables(0).DefaultView
-->
ds.Tables[0].DefaultView
private void Page_Load(object sender, System.EventArgs e)
{
string connstr=System.Configuration.ConfigurationSettings.AppSettings["sqllink1"];
SqlConnection conn=new SqlConnection(connstr);
conn.Open();
string sql="select * from [Order Details]";
SqlDataAdapter da=new SqlDataAdapter(sql,conn);
DataSet ds=new DataSet();
da.Fill(ds,"DS");
this.DataGrid1.DataSource=ds.Tables[0].DefaultView;
this.DataGrid1.DataBind();
} #region Web 窗体设计器生成的代码
override protected void OnInit(EventArgs e)
{
//
// CODEGEN: 该调用是 ASP.NET Web 窗体设计器所必需的。
//
InitializeComponent();
base.OnInit(e);
}
/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{
this.DataGrid1.ItemDataBound += new System.Web.UI.WebControls.DataGridItemEventHandler(this.DataGrid1_ItemDataBound);
this.Load += new System.EventHandler(this.Page_Load); }
#endregion
private void DataGrid1_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
ListItemType elemType=new ListItemType();
elemType=e.Item.ItemType;
if(elemType==ListItemType.Item | elemType==ListItemType.AlternatingItem)
{
DataRowView myDataRowView;
myDataRowView=(DataRowView)(e.Item.DataItem);
DataRow myDataRow;
myDataRow=myDataRowView.Row;
((Label)(e.Item.Cells[0].FindControl("OrderID"))).Text=myDataRow["OrderID"].ToString();
((Label)(e.Item.Cells[1].FindControl("ProductID"))).Text=myDataRow["ProductID"].ToString();
((Label)(e.Item.Cells[2].FindControl("UnitPrice"))).Text=myDataRow["UnitPrice"].ToString();
((Label)(e.Item.Cells[3].FindControl("Quantity"))).Text=myDataRow["Quantity"].ToString();
((Label)(e.Item.Cells[4].FindControl("Discount"))).Text=myDataRow["Discount"].ToString();
double dblPrice;
dblPrice=double.Parse(myDataRow["UnitPrice"].ToString());
int intQuantity;
intQuantity=int.Parse(myDataRow["Quantity"].ToString());
double intDiscount;
intDiscount=double.Parse(myDataRow["Discount"].ToString());
string nTotal;
nTotal=string.Format("{0:C}",dblPrice * (1 - intDiscount) * intQuantity);
((Label)(e.Item.Cells[5].FindControl("lblTotal"))).Text=nTotal;
}
}