Trong lĩnh vực Công Nghệ Thông Tin nói riêng, yêu cầu quan trọng nhất của người học đó chính là thực hành. Có thực hành thì người học mới có thể tự mình lĩnh hội và hiểu biết sâu sắc với lý thuyết. Với ngành mạng máy tính, nhu cầu thực hành được đặt lên hàng đầu. Tuy nhiên, trong điều kiện còn thiếu thốn về trang bị như hiện nay, người học đặc biệt là sinh viên ít có điều kiện thực hành. Đặc biệt là với các thiết bị đắt tiền như Router, Switch chuyên dụng
Chương 4: Điều khiển liên kết liệu - DataGrid (1.1, VS 2003) - GridView - DataList - DetailsView - Form View - Repeater - Các ví dụ ứng dụng ASP.NET Data Controls ADO.NET DataSet Database Authors Connection Authors DataAdapter Select … from Authors ASP.NET Data Controls ADO.NET DataSet Database Authors Connection Publishers Publishers DataAdapter Select … from Publishers ASP.NET Data Controls ADO.NET DataSet DataGrid Authors Repeater Publishers DataList DataView ASP.NET 4.1 Điều khiển DataGrid Các lựa chọn thao tác định dạng lưới VS.NET -Trang General -Trang Columns -Trang Paging -Trangg Format -Trang Borders ASP.NET 4.1 Điều khiển DataGrid ¾ Xử lý phân trang - Paging ¾ Tuy biến cột – Column Template - kiện ItemDataBound DataGrid Gọi DataBind-> kiện ItemDataBound cho dịng liệu ¾ Cập nhật liệu trực tiếp lưới - kiện ItemCommand DataGrid Command name = “Edit” => kiện EditCommand “Update” – UpdateCommand “Cancel” – CancelCommand “Delete” Delete – DeleteCommand Select command =>ItemCommand ASP.NET Lệnh cập nhật liệu Update Cách 1: Dùng đối ố tượng Command đểể cập nhật liệu Lấy liệu mà user vừa cập nhật vào Tạo kết nối với CSDL Tạo đối tượng Command để cập nhật liệu ệ Truyền tham số cho đối tượng Command Thi hành lệnh ASP.NET Lệnh cập nhật liệu Update Cách 1: Dùng đối ố tượng Command đểể cập nhật liệu Lấy liệu mà user vừa cập nhật vào kết nối= với CSDL Dim MaSoISBN AsTạo TextBox e.Item.Cells(0).Controls(0) Dim IDTacGia As TextBox = e.Item.Cells(1).Controls(0) Tạo đối tượng Command để cập nhật Dim Phai As CheckBox = e.Item.FindControl("Phai") liệu ệ Dim MaSoSach As Integer = masterDataGrid.DataKeys(e.Item.ItemIndex) y (đối tượng ) Truyền tham số cho Command Thi hành lệnh ASP.NET Lệnh cập nhật liệu Update Cách 1: Dùng đối ố tượng Command đểể cập nhật liệu Lấy liệu mà user vừa cập nhật vào Tạo kết nối với CSDL Tạo đối tượng Command để cập nhật Dim ConnString As String liệu ệ ConnString = "Provider=Microsoft.Jet.OleDb.4.0; "Provider=Microsoft Jet OleDb 0; Data Source=" & Server.MapPath(" /dbase/books.mdb") Dim Conn AsTruyền New OleDbConnection(ConnString) tham số cho đối tượng Command Thi hành lệnh ASP.NET Lệnh cập nhật liệu Update Cách 1: Dùng đối ố tượng Command đểể cập nhật liệu Lấy liệu mà user vừa cập nhật vào Tạo kết nối với CSDL Tạo đối tượng Command để cập nhật liệu ệ Dim cmdUpdate As New OleDbCommand Truyền tham số cho đối tượng cmdUpdate.Connection = Conn Command cmdUpdate.CommandText p ="UPDATE BooksAuthors " & _ Thi hành lệnh "Set ISBN = ?, AuthorIDASP.NET = ?, GioiTinh = ? Where MS=?" 10 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết nối với CSDL Tạo DataAdapter Tạo DataTable để đổ liệu cần cập nhật ậ vào bảngg Truyền thông số cập nhật vào bảng Thi hành lệnh cập nhật ASP.NET 13 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết nối với CSDL Tạo DataAdapter Dim ConnString As String C ConnString St i = "Provider=Microsoft.Jet.OleDb.4.0; "P id Mi ft J t Ol Db D Data t Source=" & Server.MapPath(" /dbase/DBHuan.mdb") Tạo DataTable để đổ liệu cần cập Dim Conn As Newnhật OleDbConnection(ConnString) ( g) ậ vào bảngg Truyền thông số cập nhật vào bảng Thi hành lệnh cập nhật ASP.NET 14 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết nối với CSDL Tạo DataAdapter Tạo DataTable để đổ liệu cần cập Dim IDHinh As Integer g = nhật ậ vào bảngg masterDataGrid.DataKeys(e.Item.ItemIndex) Dim SqlString AsTruyền String thông số cập nhật vào bảng SqlString = "SELECT * FROM photo WHERE IDPic=" & IDHinh Dim i da d As A New OleDbDataAdapter(SqlString, Ol b5 ThiAd (S cập lS inhậtC Conn)) hành lệnh ASP.NET 15 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết nối với CSDL Tạo DataAdapter Tạo DataTable để đổ liệu cần cập nhật ậ vào bảngg Dim PhotoTable NewsốDataTable Truyền cácAs thông cập nhật vào Dim Com As New OleDbCommandBuilder(da) bảng da.Fill(PhotoTable) Thi hành lệnh cập nhật ASP.NET 16 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết=nối với CSDL Dim Ngay As TextBox e.Item.Cells(0).Controls(0) Di T Dim TenFile Fil A As T TextBox tB = e.Item.Cells(1).Controls(0) It C ll (1) C t l (0) Dim TenHinh As2.TextBox = e.Item.Cells(2).Controls(0) Tạo DataAdapter ' -PhotoTable.Rows(0)("Date") = Ngay.Text Tạo DataTable để đổ liệu= cần cập PhotoTable.Rows(0)("FileName") TenFile.Text nhật ậ PicName vào bảngg ) = TenHinh PhotoTable Rows(0)("PicName") PhotoTable.Rows(0)( TenHinh.Text Text Truyền thông số cập nhật vào bảng Thi hành lệnh cập nhật ASP.NET 17 Lệnh cập nhật liệu Update Cách 2: Dùng đối ố tượng DataTable DataAdapter Tạo kết nối với CSDL Tạo DataAdapter da.Update(PhotoTable) Ph t T bl A PhotoTable.AcceptChanges() tCh () masterDataGrid.EditItemIndex -1 cập Tạo DataTable để đổ liệu =cần LienKetDuLieu() () ậ vào bảngg nhật Truyền thông số cập nhật vào bảng Thi hành lệnh cập nhật ASP.NET 18 Lệnh xóa liệu - Delete Dim MaSoSach As Integer = masterDataGrid.DataKeys(e.Item.ItemIndex) Dim Conn As OleDbConnection = TaoKetNoi() Di S Dim SqlString lSt i A As St String i = "S "Select l t*F From BooksAuthors Where MS=" & MaSoSach Dim da As New OleDbDataAdapter(SqlString, Conn) Di C Dim Com A As N New Ol OleDbCommandBuilder(da) DbC dB ild (d ) Dim BangTacGiaSach As New DataTable da.Fill(BangTacGiaSach) ( g ) BangTacGiaSach.Rows(0).Delete() da.Update(BangTacGiaSach) BangTacGiaSach AcceptChanges() BangTacGiaSach.AcceptChanges() LienKetDuLieu() ASP.NET 19 Điều khiển DataList Thường dùng đểể hiển ể thị thông tin danh sách Các đặc tính quan trọng DataList -RepeatDerection R tD ti + Horizontal + Vertical -RepeatColumns -Layout: Table Flow -HorizontalAlign ASP.NET 20 Điều khiển DataList DataList1.DataSource DataList1 DataSource = ds ds.Tables(“photo”).DefaultView Tables(“photo”) DefaultView DataList1.DataBind() server > … … ASP.NET 21 ASP.NET 22 Điều khiển DataList Đểể hiển ể thị liệu => kiện ItemDataBound Xử lý nhấn nút bấm button => kiện ItemCommand ¾ Đểể hiển ể thị liệu ệ Dim lblHinh As Label lblHinh = e.Item.FindControl("lblHinh") ( ) lblHinh.Text = e.Item.DataItem("PicName") ¾ Hiển thị hình ảnh Dim hplHinhAnh As HyperLink hplHinhAnh = e.Item.FindControl("hplHinh") hplHinhAnh.ImageUrl = "./Images/" & e.Item.DataItem( FileName ) e.Item.DataItem("FileName") hplHinhAnh.NavigateUrl = "viewphoto.aspx ?FileName=" & lblTenFile.Text ASP.NET 23 Điều khiển Repeater ¾HeaderTemplate: ¾H d T l Tiêu Tiê đề ¾ItemTemplate : liệu ¾AlternatingItemTemplate: cách tương đồng liệu ¾SeparatorTemplate: hình thức hiển thị dịng liệu ¾FooterTemplate: tiêu đề ASP.NET 24 Điều khiển Repeater Khi ké kéo W Web bC Control t lR Repeater t vào ẽ có ód dạng: server > p p ASP.NET 25 Điều khiển Repeater Ma so Vung g Ten Vung I T l dbcomm = New OleDbCommand(sql, dbconn) ) dbread = dbcomm.ExecuteReader() Repeater1.DataSource = dbread Repeater1.DataBind() ASP.NET 26 Demo - GridView - DataList - DetailsView - Form View ASP.NET 27