ASP.Net/ADO.net Database/DataGrid — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
|
(нет различий)
|
Версия 18:30, 26 мая 2010
Содержание
- 1 asp:datagrid: sort expression (VB.net)
- 2 Bind asp:DataGrid to access database (VB.net)
- 3 Bind data through SqlConnection to asp:DataGrid (VB.net)
- 4 Bind Data to asp DataGrid in C#
- 5 Bind to two different asp:datagrid (VB.net)
- 6 Pagable datagrid (VB.net)
- 7 Set asp:datagrid title bar (C#)
- 8 Sort asp:datagrid (VB.net)
asp:datagrid: sort expression (VB.net)
<source lang="csharp">
<%@ Page Language=VB Debug=true %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OLEDB" %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
If Not IsPostBack Then Dim DBConn as OleDbConnection Dim DBCommand As OleDbDataAdapter Dim DSPageData as New DataSet DBConn = New OleDbConnection( _ "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _ & "DATA SOURCE=" _ & Server.MapPath("EmployeeDatabase.mdb;")) DBCommand = New OleDbDataAdapter _ ("Select * " _ & "From Employee " _ & "Order By LastName, FirstName", DBConn) DBCommand.Fill(DSPageData, _ "Employee") dgEmps.DataSource = _ DSPageData.Tables("Employee").DefaultView dgEmps.DataBind() End If
End Sub Sub Sort_Grid(ByVal Sender as Object, _
ByVal E as DataGridSortCommandEventArgs) Dim DBConn as OleDbConnection Dim DBCommand As OleDbDataAdapter Dim DSPageData as New DataSet DBConn = New OleDbConnection( _ "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _ & "DATA SOURCE=" _ & Server.MapPath("EmployeeDatabase.mdb;")) DBCommand = New OleDbDataAdapter _ ("Select * " _ & "From Employee Order By " _ & E.SortExpression.ToString() , DBConn) DBCommand.Fill(DSPageData, _ "Employee") dgEmps.DataSource = _ DSPageData.Tables("Employee").DefaultView dgEmps.DataBind()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Sorting a DataGrid Control</TITLE>
</HEAD>
<Body LEFTMARGIN="40">
<form runat="server">
<asp:datagrid
id="dgEmps" allowsorting="True" onsortcommand="Sort_Grid" autogeneratecolumns="false" runat="server"
>
<columns> <asp:boundcolumn headertext="Last Name" datafield="LastName" sortexpression="LastName" /> <asp:boundcolumn headertext="First Name" datafield="FirstName" sortexpression="FirstName" /> <asp:boundcolumn headertext="ID" datafield="ID" DataFormatString="{0:c}" sortexpression="ID" /> </columns>
</asp:datagrid> </form> </BODY> </HTML>
</source>
<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>
Bind asp:DataGrid to access database (VB.net)
<source lang="csharp">
<%@ import Namespace="System.Data" %> <%@ import Namespace="System.Data.Oledb" %> <script language="vb" runat="server">
Sub Page_Load() Dim strConnection as String = "Provider=Microsoft.Jet.OLEDB.4.0;" strConnection += "Data Source=yourDatabase.mdb" data_src.text = strConnection Dim strSQL as string = "SELECT * FROM products;" Dim objDataSet as new DataSet() Dim objConnection as new OledbConnection(strConnection) Dim objAdapter as new OledbDataAdapter(strSQL, objConnection) objAdapter.Fill(objDataSet, "products") Dim objDataView as New DataView(objDataSet.Tables("products")) dgNameList.DataSource=objDataView dgNameList.DataBind() end Sub
</script> <html>
<body>
Reading data from the connection <asp:label id="data_src" runat="server"/> to the DataGrid control.
<asp:datagrid id="dgNameList" runat="server" />
</body>
</html>
</source>
Bind data through SqlConnection to asp:DataGrid (VB.net)
<source lang="csharp">
<%@ Page Language=VB Debug=true %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.SQLClient" %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
Dim DBConn as SQLConnection Dim DBCommand As SQLDataAdapter Dim DSPageData as New DataSet
" DBConn = New SQLConnection("server=localhost;" _
" & "Initial Catalog=TT;" _ " & "User Id=sa;" _ " & "Password=yourpassword;") DBConn = New SQLConnection("Data Source=whsql-v08.prod.mesa1.secureserver.net;Initial Catalog=DB_49907;User ID=nfexuser;Password="password";") DBCommand = New SQLDataAdapter _ ("Select LastName as [Last Name], " _ & "FirstName as [First Name], " _ & "Salary as [Current Salary] " _ & "from Employee", DBConn) DBCommand.Fill(DSPageData, _ "EmployeesAll") dgEmps.DataSource = _ DSPageData.Tables("EmployeesAll").DefaultView dgEmps.DataBind()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Displaying SQL Server Data in a DataGrid Control</TITLE>
</HEAD>
<Body LEFTMARGIN="40">
<form runat="server">
<asp:datagrid
id="dgEmps" runat="server" autogeneratecolumns="True"
> </asp:datagrid> </form> </BODY> </HTML>
</source>
Bind Data to asp DataGrid in C#
<source lang="csharp">
<%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <script language="C#" runat="server"> void Page_Load(object sender, EventArgs e) {
OleDbConnection objConnection; OleDbDataAdapter objCommand; string strConnect; string strCommand; DataSet DataSet1 = new DataSet(); strConnect = @"Provider=Microsoft.Jet.OLEDB.4.0;"; //If you don"t have the EmployeeDatabase.mdb database, then you will have to //change the following three lines to a different database strConnect += @"Data Source=" + MapPath("EmployeeDatabase.mdb;"); strConnect += "Persist Security Info=False"; strCommand = "SELECT FirstName, LastName FROM Employee"; objConnection = new OleDbConnection(strConnect); objCommand = new OleDbDataAdapter(strCommand, objConnection); objCommand.Fill(DataSet1, "Employee"); DataGrid1.DataSource=DataSet1.Tables["Employee"].DefaultView; DataGrid1.DataBind();
} </script> <html> <head> <title>Data Grid Control example</title> </head> <body> <asp:DataGrid id="DataGrid1" runat="server" /> </body> </html>
</source>
<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>
Bind to two different asp:datagrid (VB.net)
<source lang="csharp">
<%@ Page Language=VB Debug=true %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OLEDB" %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
Dim DBConn as OleDbConnection Dim DBCommand As OleDbDataAdapter Dim DSPageData as New DataSet DBConn = New OleDbConnection( _ "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _ & "DATA SOURCE=" _ & Server.MapPath("EmployeeDatabase.mdb;")) DBCommand = New OleDbDataAdapter _ ("Select * from Employee", DBConn) DBCommand.Fill(DSPageData, _ "EmployeeAll") DBCommand = New OleDbDataAdapter _ ("Select LastName " _ & " from Employee", DBConn) DBCommand.Fill(DSPageData, _ "Employees") dgEmps1.DataSource = _ DSPageData.Tables("EmployeeAll").DefaultView dgEmps1.DataBind() dgEmps2.DataSource = _ DSPageData.Tables("Employees").DefaultView dgEmps2.DataBind()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Displaying Access Data in a DataGrid Control</TITLE>
</HEAD>
<Body LEFTMARGIN="40">
<form runat="server">
<asp:datagrid
id="dgEmps1" runat="server" autogeneratecolumns="True"
>
</asp:datagrid>
<asp:datagrid
id="dgEmps2" runat="server" autogeneratecolumns="True"
> </asp:datagrid> </form> </BODY> </HTML>
</source>
<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>
Pagable datagrid (VB.net)
<source lang="csharp">
<%@ Import namespace="System.Data" %> <%@ Import namespace="System.Data.SqlClient" %> <html>
<head><title>DataGrid Paging</title></head> <body>
DataGrid Paging
<form runat="Server"> <asp:DataGrid id="dgProducts" runat="server" AllowPaging="True" OnPageIndexChanged="GridPageChange" PageSize="8" /> </form> </body>
</html> <script language="VB" runat="server"> Sub Page_Load(Source As Object, E As EventArgs)
If Not Page.IsPostBack Then DataFiller() End IF
End Sub Sub DataFiller()
Dim strConnection As String = "Data Source=whsql-v08.prod.mesa1.secureserver.net;Initial Catalog=DB_49907;User ID=nfexuser;Password="password";" Dim objConnection As New SqlConnection(strConnection) Dim strSqlProducts As String = "SELECT ID, FirstName FROM Employee" Dim objAdapter As New SqlDataAdapter(strSqlProducts, objConnection) Dim objDataSet As New DataSet() objAdapter.Fill(objDataSet, "Employee") dgProducts.PagerStyle.NextPageText = "Next" dgProducts.PagerStyle.PrevPageText = "Previous" dgProducts.DataSource = objDataSet.Tables.Item("Employee") dgProducts.DataBind()
End Sub Sub GridPageChange(S As Object, E As DataGridPageChangedEventArgs)
dgProducts.CurrentPageIndex = E.NewPageIndex DataFiller()
End Sub </script>
</source>
Set asp:datagrid title bar (C#)
<source lang="csharp">
<%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <script Language="c#" runat="server">
void Page_Load() { string strConnection = "Provider=Microsoft.Jet.OleDb.4.0;";
// strConnection += @"Data Source=C:\Northwind.mdb";
strConnection += @"Data Source="+MapPath("EmployeeDatabase.mdb"); string strSQL = "Select LastName, FirstName, ID from Employee;"; OleDbConnection objConnection = new OleDbConnection(strConnection); OleDbCommand objCommand = new OleDbCommand(strSQL,objConnection); objConnection.Open(); dgEmps.DataSource = objCommand.ExecuteReader(CommandBehavior.CloseConnection); dgEmps.DataBind(); }
</script> <html>
<body> <asp:datagrid id="dgEmps" runat="server" CellPadding="3" Font-Name="arial" Font-Size="8pt" HeaderStyle-BackColor="#dcdcdc" HeaderStyle-ForeColor="blue" /> </body>
</html>
</source>
<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>
Sort asp:datagrid (VB.net)
<source lang="csharp">
<%@ Page Language=VB Debug=true %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OLEDB" %> <script runat=server> Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
If Not IsPostBack Then Dim DBConn as OleDbConnection Dim DBCommand As OleDbDataAdapter Dim DSPageData as New DataSet DBConn = New OleDbConnection( _ "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _ & "DATA SOURCE=" _ & Server.MapPath("EmployeeDatabase.mdb;")) DBCommand = New OleDbDataAdapter _ ("Select * " _ & "From Employee " _ & "Order By LastName, FirstName", DBConn) DBCommand.Fill(DSPageData, _ "Employee") dgEmps.DataSource = _ DSPageData.Tables("Employee").DefaultView dgEmps.DataBind() End If
End Sub Sub Sort_Grid(ByVal Sender as Object, _
ByVal E as DataGridSortCommandEventArgs) Dim DBConn as OleDbConnection Dim DBCommand As OleDbDataAdapter Dim DSPageData as New DataSet DBConn = New OleDbConnection( _ "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _ & "DATA SOURCE=" _ & Server.MapPath("EmployeeDatabase.mdb;")) DBCommand = New OleDbDataAdapter _ ("Select * " _ & "From Employee Order By " _ & E.SortExpression.ToString() , DBConn) DBCommand.Fill(DSPageData, _ "Employee") dgEmps.DataSource = _ DSPageData.Tables("Employee").DefaultView dgEmps.DataBind()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Sorting a DataGrid Control</TITLE>
</HEAD>
<Body LEFTMARGIN="40">
<form runat="server">
<asp:datagrid
id="dgEmps" allowsorting="True" onsortcommand="Sort_Grid" autogeneratecolumns="false" runat="server"
>
<columns> <asp:boundcolumn headertext="Last Name" datafield="LastName" sortexpression="LastName" /> <asp:boundcolumn headertext="First Name" datafield="FirstName" sortexpression="FirstName" /> <asp:boundcolumn headertext="ID" datafield="ID" DataFormatString="{0:c}" sortexpression="ID" /> </columns>
</asp:datagrid> </form> </BODY> </HTML>
</source>
<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>