Bài giảng lập trình Web - Ts.Vũ Đức Lung - Chương 4

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

Trang 1

Chương 4: Điều khiển liên kết dữ liệu

Trang 2

DataAdapter

Select … from Authors

Trang 3

DataAdapter

Select … from Publishers Publishers

Trang 5

4.1 Điều khiển DataGrid

Các lựa chọn trong khi thao tác định dạng lưới trong

VS.NET

-Trang General-Trang Columns-Trang Paging-Trang Formatg-Trang Borders

Trang 6

4.1 Điều khiển DataGrid

¾ Xử lý phân trang - Paging

¾ Tuy biến các cột – Column Template

sự kiện ItemDataBound của DataGrid

- sự kiện ItemDataBound của DataGrid Gọi DataBind-> sự kiện ItemDataBound cho mỗi dòng dữ liệu

¾ Cập nhật dữ liệu trực tiếp trên lưới

- sự kiện ItemCommand của DataGrid Command name = “Edit” => sự kiện EditCommand

“Update” – UpdateCommand

“Cancel” – CancelCommand

“Delete” – DeleteCommand Delete DeleteCommand Select command =>ItemCommand

Trang 7

Lệnh cập nhật dữ liệu Update

Cách 1: Dùng đối tượng Command để cập nhật dữ liệu

1 Lấy dữ liệu mà user vừa cập nhật vào

2 Tạo kết nối với CSDL

3 Tạo đối tượng Command để cập nhật

dữ liệuệ

4 Truyền tham số cho đối tượng

Command

5 Thi hành lệnh

Trang 8

Lấy dữ liệu mà user vừa cập nhật vào

Tạo kết nối với CSDL

Dim MaSoISBN As TextBox = e.Item.Cells(0).Controls(0)

Tạo đối tượng Command để cập nhật dữ

liệu

Dim IDTacGia As TextBox = e.Item.Cells(1).Controls(0)

Dim Phai As CheckBox = e.Item.ệ FindControl("Phai")

Truyền tham số cho đối tượng

Dim MaSoSach As Integer =

masterDataGrid.DataKeys(e.Item.ItemIndex)Truyền tham số cho đối tượng

Command

Thi hành lệnh

Trang 9

liệu

Dim ConnString As String

ConnString = "Provider=Microsoft Jet OleDb 4 0; Dataệ

ConnString = "Provider=Microsoft.Jet.OleDb.4.0; Data Source=" & Server.MapPath(" /dbase/books.mdb")

Dim Conn As NewTruyền tham số cho đối tượng OleDbConnection(ConnString)

CommandThi hành lệnh

Trang 10

liệuệTruyền tham số cho đối tượng

Dim cmdUpdate As New OleDbCommand

Command

cmdUpdate.Connection = Conn

cmdUpdate.CommandText ="UPDATE BooksAuthors " & _

Thi hành lệnh

Trang 11

liệu

cmdUpdate.Parameters.Add( GioiTinh , Phai.Checked)

cmdUpdate.Parameters.Add("MS", MaSoSach)

ệ

Command

Chú ý: đối với SQL Server tham số phải có dạng

Thi hành lệnh

Add(“@AuThorID", @IDTacGia.Text)

Trang 12

Trang 13

ố Cách 2: Dùng đối tượng DataTable và DataAdapter

2 Tạo DataAdapter

3 Tạo DataTable để đổ dữ liệu cần cập

nhật vào bảngậ g

4 Truyền các thông số mới cập nhật vào

bảng

5 Thi hành lệnh cập nhật

Trang 14

Dim Conn As New OleDbConnection(ConnString)ậ g

bảng

Trang 15

2 Tạo DataAdapter

nhật vào bảng

Dim IDHinh As Integer = ậ g

gmasterDataGrid.DataKeys(e.Item.ItemIndex)Dim SqlString 4 Truyền các thông số mới cập nhật vào As String

bảng

Dim SqlString As String

SqlString = "SELECT * FROM photo WHERE IDPic=" & IDHinh

i d A Ol b5 Thi hành lệnh cập nhậtAd (S lS i C )

Dim da As New OleDbDataAdapter(SqlString, Conn)

Trang 16

2 Tạo DataAdapter

nhật vào bảngậ g

Dim PhotoTable As New4 Truyền các thông số mới cập nhật vào DataTable

bảng

Dim Com As New OleDbCommandBuilder(da)

da.Fill(PhotoTable)

Trang 17

Dim Ngay As TextBox = e.Item.Cells(0).Controls(0)

Di T Fil A T tB It C ll (1) C t l (0)

2 Tạo DataAdapter

Dim TenFile As TextBox = e.Item.Cells(1).Controls(0)Dim TenHinh As TextBox = e.Item.Cells(2).Controls(0)' -

nhật vào bảng

PhotoTable.Rows(0)("Date") = Ngay.Text

PhotoTable.Rows(0)("FileName") = TenFile.Text

PhotoTable Rows(0)("PicName") = TenHinh Textậ g

PhotoTable.Rows(0)( PicName ) = TenHinh.Text

bảng

Trang 18

Trang 19

Lệnh xóa dữ liệu - Delete

masterDataGrid.DataKeys(e.Item.ItemIndex)

Dim Conn As OleDbConnection = TaoKetNoi()

Di S lSt i A St i "S l t * F

Dim SqlString As String = "Select * From

BooksAuthors Where MS=" & MaSoSach Dim da As New OleDbDataAdapter(SqlString, Conn)

Dim Com As New OleDbCommandBuilder(da)

Dim BangTacGiaSach As New DataTable da.Fill(BangTacGiaSach)( g )

BangTacGiaSach.Rows(0).Delete()

da.Update(BangTacGiaSach)

BangTacGiaSach AcceptChanges()

LienKetDuLieu()

Trang 20

Điều khiển DataList

ể ể Thường dùng để hiển thị thông tin một danh sách

Các đặc tính quan trọng của DataList

-RepeatDerection

+ Horizontal

+ Vertical Vertical -RepeatColumns

-Layout: Table hoặc Flow

-HorizontalAlign

Trang 21

DataList1 DataSource = ds Tables(“photo”) DefaultView

DataList1.DataBind()

<asp:DataList id=“DataList1” border=“0”

RepeatDerection=“Horizontal” RepeatColumn=“3” runat=“server”>

Trang 23

ể ể

Để hiển thị dữ liệu => sự kiện ItemDataBound

Xử lý nhấn nút bấm các button => sự kiện ItemCommand

lblTenFile.Text

Trang 24

Điều khiển Repeater

¾HeaderTemplate: Tiêu đề

¾ItemTemplate : dữ liệu

¾AlternatingItemTemplate: một cách tương đồng của dữ

Trang 25

Khi ké W b C t l R t à ẽ ó d

Khi kéo Web Control Repeater vào sẽ có dạng:

<asp:Repeater id="Repeater1" runat="server">

</asp:Repeater p p >

</form>

Trang 26

Tiêu đề	Chương 4: Điều khiển liên kết dữ liệu - DataGrid (1.1, VS 2003) - GridView - DataList - DetailsView - Form View - Repeater - Các ví dụ ứng dụng ASP.NET
Tác giả	Ts.Vũ Đức Lung
Trường học	University of Ho Chi Minh City
Chuyên ngành	Web Programming
Thể loại	Giáo trình
Năm xuất bản	2023
Thành phố	Ho Chi Minh City

Định dạng
Số trang	27
Dung lượng	473,49 KB