Đề tài Website thông tin cho Trường THCS Phan Chu Trinh

GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 1 MỤC LỤC Trang I. LỜI NÓI ĐẦU VÀ LÝ DO CHỌN ĐỀ TÀI 2 II. GIỚI THIỆU NHÓM 2 III. MÔ TẢ CHƯƠNG TRÌNH VÀ CÔNG CỤ SỬ DỤNG 2 IV. CÁC BIỂU MẪU LIÊN QUAN 3 V. SƠ ĐỒ CHỨC NĂNG 6 VI. THIẾT KẾ GIAO DIỆN 8 VII. CÁC BẢNG CƠ SỞ DỮ LIỆU 11 VIII. THỰC HIỀN 12 IX. LỜI KẾT 13 GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 2 I - LỜI NÓI ĐẦU: Lời đầu tiên tất cả thành viên nhóm 5 xin gửi lời chào đến thầy và các bạn sinh viên trong lớp DL08TH. Kính chúc thầy cùng các bạn sinh viên nhiều sức khoẻ để thành công trong cuộc sống. Nhóm 5 rất hân hạnh khi nhận làm đề tài về thiết kế trang web. Xuất phát từ nhu cầu thực tiễn trong nghề nghiệp là giáo viên nên nhóm chúng tôi chọn đề tài thiết kế web cho một trường học. Với lòng nhiệt quyết ham học hỏi và sáng tạo nhóm chúng tôi đã cùng nhau thảo luận. Sau một thời gian làm thử nghiệm, cuối cùng nhóm chúng tôi đã cơ bản hoàn thành đề tài được giao.trang web của nhóm 5 chúng tôi làm có tên là “Trường THCS Phan Chu Trinh”. Lần đầu tiên làm đề tài web mang tính chuyên môn cao, cùng với vốn kiến thức còn hạn chế và thời gian tìm hiểu rất ít; do đa số thành viên trong nhóm đều phải đi làm hằng ngày, nên chắc hẳn đề tài của chúng tôi còn rất nhiều điểm thiếu sót và hạn chế. Rất mong được sự đóng góp ý kiến tận tình của thầy cùng các bạn trong lớp để đề tài của nhóm chúng tôi được hoàn thiện hơn. II - CÁC THÀNH VIÊN TRONG NHÓM 5 CÙNG THAM GIA LÀM ĐỀ TÀI Nhóm 5 lớp DL08TH khóa học 2008- 2010 gồm các thành viên: - Lê Nguyễn Hoàng Vũ - Phạm Đức Minh Hải - Nguyễn Thăng Thành - Trần Thị Thúy Phượng - Trần Thị Dung III-MÔ TẢ CHƯƠNG TRÌNH, TÀI LIỆU THAM KHẢO VÀ CÔNG CỤ SỬ DỤNG: -Trang web trường THCS Phan Chu Trinh có các trang chính: trang chủ, trang đăng nhập, trang đăng ký, trang giới thiệu, trang liên hệ góp ý, trang xem điểm, trang tin tức và trang quản trị. Công việc chính của Website: + Giới thiệu về tổ chức nhà trường. + Phát sinh thành viên mới đăng ký. GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 3 + Cho phép thành viên được viết góp ý, xem và sửa thông tin đăng nhập của cá nhân. + Cho phép người quản trị thêm/xóa /sửa dữ liệu trong CSDL, quản lý thành viên, xem góp ý. + Tìm kiếm thông tin giáo dục qua các website liên kết. -Trong quá trình thực hiện đề tài, nhóm 5 có sử dụng một số tài liệu tham khảo như: Giáo trình VB 6.0, giáo trình lập trình web asp.net, và một số tài liệu khác trên mạng. - Công cụ sử dụng: Ngôn ngữ lập trình Vb.net 2005, microsoft access, notepad… IV-CÁC BIÊU MẪU LIÊN QUAN: A. ADMIN : 1.Biểu mẫu 1 :thêm thông tin vào dữ liệu 2.Biểu mẫu 2 : Quản lý thành viên 3.. Biểu mẫu 3 : xử lý góp ý GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 4 4. Biểu mẫu 4 : thay đổi mật khẩu của quản trị B.THÀNH VIÊN : 1. Biểu mẫu 1 :Đăng Ký GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 5 2.Biểu mẫu 2 : Đăng nhập 3.Biểu mẫu 3 : Góp ý 4.Biểu mẫu 4 : Sửa thông tin đăng nhập GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 6 V - SƠ ĐỒ CHỨC NĂNG : A. ADMIN: BẮT ĐẦU ĐĂNG NHẬP Admin Thoát Thay đổi mật khẩu Xử lý góp ý Quản lý thành viên Cập nhật thông tin Phân quyền người dùng Xem trang khác GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 7 B. THÀNH VIÊN: GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 8 VI – THIẾT KẾ GIAO DIỆN: GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 9 1. TRANG CHỦ MENU chính gồm có: - Trang chủ - Trang giới thiệu - Trang tin tức sự kiện - Trang các tổ chuyên môn - Trang hỗ trợ học sinh - Trang liên hệ - Đăng ký - Đăng nhập Các thành phần phụ : - Trang “Cổng thông tin” thi và tuyển sinh. - Liện kết website. - Trang mạng giáo dục “edu.com” - Trang thư viện - Imports System.Data - Imports System.Data.OleDb - Imports System.IO - Partial Class TrangChu GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 10 - Inherits System.Web.UI.Page - Public conn As New OleDbConnection() - Public code As New ConnectionDB() - Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load - Session("noidung") = "" - 'If Not IsPostBack Then - ketnodulieu() - ' End If - End Sub - Sub ketnodulieu() - conn = code.Conn() - Dim docghi As OleDbDataAdapter - docghi = New OleDbDataAdapter("select * from TinTuc", conn) - Dim dataset As DataSet = New DataSet() - docghi.Fill(dataset, "TinTuc") - DataList_TinTuc.DataSource = dataset.Tables("TinTuc").DefaultView - DataList_TinTuc.DataBind() - End Sub - Protected Sub DataList_TinTuc_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles DataList_TinTuc.ItemDataBound - Dim dong As Integer = e.Item.ItemIndex - If dong < 0 Then Exit Sub - - Dim TieuDe As Label - TieuDe = e.Item.FindControl("Label_NoiDung") - TieuDe.Text = Left(e.Item.DataItem("TieuDe"), 120) & "..." - - Dim ChiTiet As HyperLink - ChiTiet = e.Item.FindControl("HyperLink_Xem") - 'Session("noidung") = e.Item.DataItem("NoiDung") - 'ChiTiet.NavigateUrl = "TrangChu.aspx" - ChiTiet.NavigateUrl = "~\TinTuc_TrangChu\" & e.Item.DataItem("NoiDung") - - Dim Hinh As HyperLink - Hinh = e.Item.FindControl("HyperLink_Hinh") GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 11 - Hinh.ImageUrl = "~\image\" & e.Item.DataItem("Hinh") - End Sub - End Class 2. TRANG GIỚI THIỆU 3. TRANG ĐĂNG KÝ GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 12 Thành viên đăng ký phải điền đầy đủ thông tin vào các ô: Tên đăng ký, mật khẩu, nhập lại mật khẩu, họ tên, ngày sinh, địa chỉ mail. Sau đó nhấp vào nút “Đăng ký” và chờ hiển thị thông báo “đăng ký thành công”. 4. TRANG ĐĂNG NHẬP Gõ thông tin bạn đã đăng ký là thành viên để vào đăng nhập. GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 13 Bạn có thể thay đổi thông tin đăng nhập của cá nhân ( ngoại trừ tên đăng nhập) * Lưu ý: nếu bạn đã đăng nhập rồi thì không được đăng nhập lại. Máy sẽ thông báo lỗi “ Bạn đã đăng nhập”. 5. TRANG QUẢN TRỊ Quản trị cũng có các quyền như các thành viên khác. Đồng thời có thêm các độc quyền sau: cập nhật thông tin lên trang web, xem và xóa thông tin thành viên, xem và xóa thư góp ý của thành viên. 6. TRANG LIÊN HỆ GÓP Ý 7. Imports System 8. Imports System.Web 9. Imports System.Web.UI 10. Imports System.Web.UI.Control 11. Imports System.Data 12. Imports System.Data.OleDb 13. Imports System.IO 14. Partial Class MasterPage 'Lớp kế thừa MasterPage 15. Inherits System.Web.UI.MasterPage 'Kế thừa 1 lớp System.Web.UI.MasterPage (Chính nó) 16. Public Code As New ConnectionDB() ' Khai báo và khởi tạo biến code kiểu là ConnectionDB() 17. Public Conn As New OleDbConnection() GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 14 18. Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 19. label_Date.Text = Day(Now) & "-" & Month(Now) & "-" & Year(Now) 20. ' label_Date.Text = Date.Today.ToString(dd / mm / yyyy) 21. If (Session("DangNhapThanhCongAdmin") = True) Then 22. Label2.Visible = True 23. Label2.Text = "Chào mừng:" & " " & Session("TenDangNhap").ToString() & ". Bạn có quyền quản trị" 24. Button1.Visible = True 25. Button2.Visible = True 26. Button2.Text = "Quản trị" 27. End If 28. If (Session("DangNhapThanhCongUser") = True) Then 29. Label2.Visible = True 30. Label2.Text = "Chào mừng thành viên:" & " " & Session("TenDangNhap").ToString() 31. Button1.Visible = True 32. Button2.Visible = True 33. Button2.Text = "Sửa thông tin" 34. End If 35. If (Not IsPostBack = True) Then 36. hienthiDropdownlistWeb() 37. Conn = Code.Conn() 'Mở CSDL dựa vào hàm conn() trong lớp ConnectionDB() 38. Dim StringSQL As String 39. Dim DataSet1 As New DataSet 40. Dim row, i As Integer 41. StringSQL = "select Menu1 from Menu1" 42. DataSet1 = Code.DataAdapter_DataSet(StringSQL, "Menu1") 'Buoc 5 + 6 43. 'Buoc 7 44. i = 0 GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 15 45. row = DataSet1.Tables("Menu1").Rows.Count 'Biến row chứa tổng số dòng của dataset1 ở Tables("Menu1") 46. If (row > 0) Then ' Kiểm tra sự tồn tại của dữ liệu 47. While (i < row) ' Duyệt Tables("Menu1")của dataset1 48. Dim Menu1 As String 49. Dim MenuItem1 As New MenuItem() ' khai báo và khởi tạo biến MenuItem1 kiểu MenuItem (dạng control) 50. Dim i1, row1 As Integer 51. Menu1 = DataSet1.Tables("Menu1").Rows(i)("Menu1").ToString () ' Lấy dữ liệu kiểu string của dòng thứ i của cột Menu1 trong Tables("Menu1") của DataSet1 52. MenuItem1.Text = Menu1 'Gán thuộc tính text của MenuItem1 là Menu1 53. MenuDoc1.Items.AddAt(i, MenuItem1) 'add MenuItem1 vào vị trí thứ i trong MenuDoc1 54. StringSQL = "select Menu2 from Menu2 where Menu2.Menu1='" & Menu1 & "'" 55. Dim DataSet2 As New DataSet 56. DataSet2 = Code.DataAdapter_DataSet(StringSQL, "Menu2") 57. i1 = 0 58. row1 = DataSet2.Tables("Menu2").Rows.Count 59. If (row1 > 0) Then 60. While (i1 < row1) 61. Dim Menu2 As String 62. Dim MenuItem2 As New MenuItem() 63. Menu2 = DataSet2.Tables("Menu2").Rows(i1)("Menu2").ToStrin g() 64. MenuItem2.Text = Menu2 65. MenuDoc1.Items(i).ChildItems.AddAt(i1, MenuItem2) GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 16 ' add MenuItem2 vào vị trí thứ i1 ở Item thứ i trong MenuDoc1 66. i1 = i1 + 1 67. End While 68. End If 69. i = i + 1 70. End While 71. End If 72. End If 73. End Sub 74. 75. Protected Sub MenuDoc1_MenuItemClick(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.MenuEventArgs) Handles MenuDoc1.MenuItemClick 76. Dim menu As String 77. menu = MenuDoc1.SelectedItem.Text 78. Select Case menu 79. Case "Trang Chủ" 80. Response.Redirect("~/TrangChu.aspx") 81. 82. Case "Giới Thiệu" 83. Response.Redirect("~/GioiThieu/GioiThieu.aspx") 84. 85. Case "Tin Tức & Sự Kiện" 86. Response.Redirect("~/TinTuc_SuKien/TinGiaoDuc.aspx ") 87. Case "Tin Giáo Dục" 88. Response.Redirect("~/TinTuc_SuKien/TinGiaoDuc.aspx ") 89. Case "Tin Nhà Trường" 90. Response.Redirect("~/TinTuc_SuKien/TinNhaTruong.as px") 91. 92. Case "Các Tổ Chuyên Môn" GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 17 93. Response.Redirect("~/CacToChuyenMon/CacToChuyenMon .aspx") 94. Case "Tổ Toán" 95. Response.Redirect("~/CacToChuyenMon/ToToan.aspx") 96. Case ("Tổ Anh Văn") 97. Response.Redirect("~/CacToChuyenMon/AnhVan.aspx") 98. Case ("Tổ Lý - Tin") 99. Response.Redirect("~/CacToChuyenMon/ToLy.aspx") 100. Case ("Tổ Văn - Sử - Địa - CD") 101. Response.Redirect("~/CacToChuyenMon/ToVan.aspx") 102. Case ("Tổ Hóa - Sinh - Thể dục") 103. Response.Redirect("~/CacToChuyenMon/ToHoa_Sinh_TD. aspx") 104. Case ("Tổ Hành Chính") 105. Response.Redirect("~/CacToChuyenMon/ToHanhChinh.as px") 106. 107. Case ("Hỗ Trợ Học Sinh") 108. Response.Redirect("~/HoTroHocSinh/HuongDanOnTap.as px") 109. Case ("Hướng Dẫn Ôn Tập") 110. Response.Redirect("~/HoTroHocSinh/HuongDanOnTap.as px") 111. Case ("Thời Khóa Biểu") 112. Response.Redirect("~/HoTroHocSinh/ThoiKhoaBieu.asp x") 113. Case ("Xem Điểm") 114. Response.Redirect("~/HoTroHocSinh/XemDiem.aspx") 115. 116. Case "Dành Cho Giáo Viên" GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 18 117. Response.Redirect("~/GiaoVien/GiaoVien.aspx") 118. Case "Quản Lý Lớp" 119. Response.Redirect("~/GiaoVien/QuanLyLopHoc.aspx") 120. Case "Quản Lý Học Sinh" 121. Response.Redirect("~/GiaoVien/QuanLyDanhSachLop.as px") 122. Case "Quản Lý Môn Học" 123. Response.Redirect("~/GiaoVien/QuanLyMonHoc.aspx") 124. Case "Quản Lý Điểm" 125. Response.Redirect("~/GiaoVien/QuanLyDiem.aspx") 126. 127. Case "Trang Quản Trị" 128. Response.Redirect("~/Trangadmin.aspx") 129. 130. Case "Liên Hệ" 131. Response.Redirect("~/LienHe/LienHe.aspx") 132. End Select 133. End Sub 134. Public Sub hienthiDropdownlistWeb() 135. DropDownList1.Items.Clear() 136. DropDownList1.Items.Add("----- Website liên kết ----- ") 137. DropDownList1.Items.Add("Sở DGDT Bà Rịa Vũng Tàu") 138. DropDownList1.Items.Add("Bộ Giáo dục Đào tạo") 139. DropDownList1.Items.Add("Diễn đàn Giáo dục") 140. DropDownList1.Items.Add("Báo Bà Rịa Vũng Tàu") 141. End Sub 142. Protected Sub DropDownList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList1.SelectedIndexChanged GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 19 143. Dim a As String 144. a = DropDownList1.SelectedItem.Text 145. If a = "Sở DGDT Bà Rịa Vũng Tàu" Then 146. Response.Redirect(" vungtau.gov.vn/") 147. End If 148. If a = "Bộ Giáo dục Đào tạo" Then 149. Response.Redirect("") 150. End If 151. If a = "Diễn đàn Giáo dục" Then 152. Response.Redirect("") 153. End If 154. If a = "Báo Bà Rịa Vũng Tàu" Then 155. Response.Redirect(" vn") 156. End If 157. End Sub 158. Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click 159. Session("DangNhapThanhCongUser") = False 160. Session("DangNhapThanhCongAdmin") = False 161. Label2.Visible = False 162. Button1.Visible = False 163. Button2.Visible = False 164. Response.Redirect("~\TrangChu.aspx") 165. End Sub 166. Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click 167. If Button2.Text = "Quản trị" Then 168. Response.Redirect("~\Trangadmin\AdminChinh.aspx") 169. End If 170. If Button2.Text = "Sửa thông tin" Then GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 20 171. Response.Redirect("~\ThanhVien\SuaThongTin_TV.aspx ") 172. End If 173. End Sub 174. Protected Sub ImageButton1_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click 175. Response.Redirect("") 176. End Sub 177. 178. Protected Sub ImageButton2_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton2.Click 179. Response.Redirect("") 180. End Sub 181. 182. Protected Sub ImageButton3_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton3.Click 183. Response.Redirect("") 184. End Sub 185. 186. Protected Sub ImageButton4_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton4.Click 187. Response.Redirect("") 188. End Sub 189. End Class 190. GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 21 Thành viên có thể gửi những ý kiến cá nhân cho người quản trị tham khảo bằng cách gõ thông tin vào các ô và nhấp nút “ Gởi” để chuyển đi, hoặc nút “Xóa” để viết lại. Imports System.Data Imports System.Data.OleDb Imports System.IO Partial Class TrangHienThongTin Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim duongdan As String = "~\TinTuc_TrangChu\" & Session("noidung") duongdan = Server.MapPath(duongdan) Dim file As FileStream = New FileStream(duongdan, FileMode.OpenOrCreate, FileAccess.Read) Dim doc As StreamReader = New StreamReader(File) Dim thongtin As String thongtin = "" Dim i As Boolean i = False While (doc.EndOfStream = i) thongtin = thongtin + doc.ReadLine() + "" End While GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 22 Label1.Text = thongtin End Sub End Class VII – CÁC BẢNG CƠ SỞ DỮ LIỆU: 1.Bảng tin tức & sự kiện 2. Bảng menu 1 và 2 3.Bảng đăng ký GVHD: ThS.Bùi Duy Tuấn tinvn.com.vn Báo cáo đề tài môn lập trình web1: Website thông tin cho trường TH Cơ sở Trang 23 VIII – THỰC HIỆN: - HẠN CHẾ: Mới thực hiện khoảng 85% dự án nên: + Giao diện trang web còn đơn giản. + Cơ sở dữ liệu còn hạn chế . + Thông tin chưa phong phú và đa dạng. - HƯỚNG PHÁT TRIỂN: Qua việc thực hiện đề tài lần này, mong muốn của nhóm là sẽ dần nâng cao kỹ năng lập trình mà trong tương lai sẽ hoàn thiện chương trình theo hướng : +Hoàn thiện giao diện đẹp mắt, thuận tiện cho việc kiểm tra và thao tác hơn. +Thông tin cập nhật phong phú và phù hợp với từng thời điểm. +Dữ liệu phải đảm bảo an toàn và bảo mật. VII. LỜI KẾT Đề tài này đã giúp các thành viên trong nhóm nắm được các thao tác để có thể thiết kế một trang web đơn giản; bước đầu làm quen viết chương trình dù là chương trình nhỏ. Qua việc thực hiện đề tài lần này đem lại cho nhóm 5 nhiều điều: Sự hiểu biết lẫn nhau về thông tin của mỗi thành viên trong nhóm được phát triển thêm một tầm cao mới. Nếu như trước đây các thành viên mới hiểu biết sơ về nhau, thì nay sự tin cậy lẫn nhau đã bước sang một nấc thang mới, với sự hiểu rõ cá tính và khả năng từng thành viên . Nhóm 5 hy vọng đó sẽ là những lợi thế tốt để mọi thành viên hợp tác hoàn thành tốt các đề tài trong tương lai ở các bộ môn tin học nói riêng và các môn học nói chung. Xin chân thành cám ơn Thầy Bùi Duy Tuấn đã giúp đỡ Nhóm 5 hoàn thành đề tài này. Vũng Tàu, ngày 01 tháng 6 năm 2009 Nhóm thực hiện Nhóm 5