Mục Lục
Trang
Lời nói đầu4 4
Chương 1 GIỚI THIỆU NỘI DUNG ĐỀ TÀI 5
1. 1 Nhiệm vụ của hệ thống quản lý sỏch5 5
1. 2 Hướng phát triển của hệ thống quản lý sỏch5 5
1. 3 Hướng thực thi đề tài6 6
Chương 2 KHẢO SÁT ĐÁNH GIÁ HIỆN 8 8
TRẠNG HỆ THỐNG QUẢN Lí SÁCH
2. 1 Tìm hiểu và nhu cầu ứng dụng tin học tại nhà sách Minh Khai8 8
2. 2 Phân tích hiện trạng quản lý của nhà sỏch9 9
2. 2. 1 Nguyên tắc hoạt động của nhà sỏch9 9
2. 2. 2 Sơ đồ hoạt động nhà sỏch10 10
2. 2. 3 Quy trình quản lý của nhà sỏch11 11
2. 2. 3. 1 Quy trình quản lý nhập sỏch11 11
2. 2. 3. 2 Quy trình quản lý bán sỏch11 11
2. 2. 3. 3 Quy trình thống kờ12 12
2. 3 Phân tích và lập dự ỏn13 13
2. 3. 1 Phân tớch13 13
2. 3. 2 Lập dự ỏn14 14
Chương 3 PHÂN TÍCH HỆ THỐNG QUẢN Lí SÁCH15 15
3. 1 Tổng quan về hệ thống quản lý sỏch15 15
3. 1. 1 Nguyên tắc quản lý của hệ thụng15 15
3. 1. 2 Mối quan hệ giữa nhà sách và môi trường chính nú16 16
3. 1. 3 Phân tích vị trí làm việc 16 16
3. 2 Phân tích và thiết kế hệ thống17 17
3. 2. 1 Biểu đồ phân cấp chức năng17 17
3. 2. 1. 1 Sơ đồ phân rã tổng thể18 18

2 Những hạn chế của chương trỡnh70 70
2 Hướng phát triển của đề tài71 71
Tài liệu tham khảo72 72
Phụ lục73 73
Ngày nay cùng với sự phát triển nhanh chóng của công nghệ thông tin, việc ứng
dụng công nghệ thông tin vào thực tế của các ngành, lĩnh vực trong cuộc đã sống
đem lại những lợi ích vô cùng to lớn.
Công nghệ thông tin có mặt hầu hết trong mọi lĩnh vực của cuộc sống đặc biệt là
trong công tác quản lý. Chúng ta có thể thấy việc đưa tin học vào quản lý kinh
doanh là một trong những ứng dụng quan trọng trong rất nhiều ứng dụng cơ sở dữ
liệu. Nhờ vào công tác tin học hoá mà công việc quản lý và điều hành kinh doanh
tỏ ra rất nhanh chóng và hiệu quả. Chính vỡ lẽ đó mà cơ sở dữ liệu như là một giải

lực công việc nhưng vẫn đạt hiệu quả cao, chính xác.
Việc ứng dụng tin học trong quản lý sách giúp cho nhà quản lý tiết kiệm được chi
phí cho việc thuê nhân viên quản lý sách trong kho sách hay trung tâm phát hành
sách mà vẫn đảm bảo công việc kinh doanh của mình.

1.2 HƯỚNG PHÁT TRIỂN CỦA HỆ THỐNG
QUẢN Lí SÁCH
HIỆN NAY
Ngày nay với sự phát triển nhanh chóng của công nghệ thông tin đã làm thay đổi
phong cách làm việc, trong công tác quản lý. Trước kia mọi thủ tục lưu trữ,
Trong thời đại tri thức ngày nay việc ra đời của rất nhiều nhà xuất bản, các trung
tâm phát hành sách đã mang lại cho hàng triệu người những cuốn sách hay và bổ
ích. Nhưng đối với nhà xuất bản, các trung tâm phát hành việc lưu trữ, quản lý,
kinh doanh hàng triệu cuốn sách trong kho sách của mình thật không dễ dàng. Vì
vậy việc ứng dụng tin học vào quản lý, kinh doanh đối với họ là rất cần thiết nhất
là sự ra đời của phần mềm Quản lý sách sẽ giúp cho nhà xuất bản và trung tâm
phát hành sách quản lý một cách dễ dàng công việc của mình để đạt hiệu quả kinh
doanh cao nhất.

1.1 HƯỚNG THỰC THI ĐỀ TÀI
Đối tượng sử dụng: Đối tượg sử dụng hệ thống là nhà quản lý hoặc nhân viên
thủ kho của nhà xuất bản hay trung tâm phát hành sách ( chủ yếu là những người
dùng chuyên nghiệp, có những hiểu biết nhất định về chuyên môn cũng như tin
học) nên việc thiết kết thệ thống ứng dụng một cách thiết thực là rất cần thiết giúp
cho người sử dụng được dễ dàng.
Vấn đề phân tích bài toán: Trong đề tài này em phân tích theo phương pháp có
cấu trúc, vì các lẽ như sau:
2.1 TèM HIỂU VÀ NHU CẦU ỨNG DỤNG TIN
HỌC TẠI NHÀ SÁCH MINH KHAI
Qua khảo sát và tìm hiểu thực tế tại nhà sách Minh Khai và một số nhà sách
trong thành phố Hà Nội vấn đề áp dụng tin học vào quản lý là rất cấp thiết và phổ
biến. Nhằm tăng khả năng hoạt động, giảm bớt số lượng nhân viên quản lý, đảm
bảo độ chính xác, an toàn dữ liệu cao. Vì những lý do nên các nhà sách chủ yếu
quản lý và lập hoá đơn bằng tay, các hoá đơn được viết bằng giấy các phần mềm
chuyên dụng chưa được các nhà sách đưa vào quản lý vì vậy mà nhà quản lý gặp
không ít khó khăn trong việc điều hành quản lý hoạt động kinh doanh của nhà
sách.
Với quy mô nhà sách ngày càng lớn số lượng đầu sách lên đến hàng chục nghìn
đầu sách, số lượng đầu sách nhập về và xuất ra trong một ngày rất lớn việc tính
toán hoá đơn, theo dõi thông tin khách hàng, quản lý nhân sự trong một nhà sách
đòi hỏi nhà quản lý nhà sách cần có một phần mềm chuyên dụng nhằm nâng cao
hiệu quả quản lý và hoạt động kinh doanh. Giúp nhà quản lý cùng một lúc có thể
lưu trữ, tìm kiếm một khối lượng thông tin lớn mà trước kia họ phải mất rất nhiều
thời gian và công sức mới có thể làm được.
Qua nhu cầu thực tế tại một số nhà sách việc ra đời một phần mềm quản lý sách
là nhu cầu thiết thực giúp các nhà sách giảm bớt số lượng nhân viên mà vẫn đảm
bảo được hiệu quả, nâng cao quy mô hoạt động của nhà sách.
Nhà sách là một trung tâm bán sách. Nguồn hàng của nhà sách có thể do các nhà
cung cấp, các nhà xuất bản, các công ty trong và ngoài nước cung cấp. đối tượng Hình 2.1: sơ đồ hoạt động nhà sách

Vai trò chức năng các bộ phận:
- Nhà quản lý: Điều hành mọi hoạt động của nhà sách và
quản lý nhân sự trong nhà sách.
- Bộ phận kho: Tiếp nhận và quản lý sách nhập vào và bán
ra, quản lý bảo quản sách trong kho lập hoá đơn xuất,
nhập sách
- Bộ phận thu ngân: Lập hoá đơn cho khách hàng, thanh toán
hoá đơn, báo cáo thống kê hoá đơn nhập xuất.
- Bộ phận kinh doanh: Tiếp nhận vận chuyển sách với số
lượng lớn cho khách hàng, các cửa hàng, đại lý đến mua
hàng. giới thiệu tư vấn cho khách hàng đến mua lẻ, sỉ, tìm
hiểu thị trường và nhu cầu của khách hàng, báo cao doanh
thu.
- Bộ phận kinh doanh căn cứ vào nhu cầu của khách hàng,
số lượng sách tồn tối thiểu, số lượng sách tồn tối đá trong
kho và số lượng sách còn lại trong kho để lập kế hoạch
nhập sách ( hoá đơn nhập sách ). Trong hoá đơn nhập sách
có đầy đủ thông tin chi tiết về từng đầu sách, số lượng
nhập về.
- Bộ phận kinh doanh sẽ trình đơn nhập sách cho nhà quản
lý ký duyệt.

- Cách tính tổng giá trị sách bán : ( cho n đầu sách được bán
ra )
Tổng giá trị = Số lượng sách bán * đơn giá
bán

2.2.3.1 Quy trình thống kê
- Hết một ngày, tháng ,quý, năm bộ phận thu ngân sẽ lập
báo cáo cho nhà quản lý về số lượng sách bán, nhập trong
ngày, tổng doanh thu để nhà quản lý biết được tình hình
hoạt động kinh doanh của công ty.
- Thống kê số lượng đầu sách còn tồn trong kho để biết và
đưa ra cần nhập thêm đầu sách nào, và đầu sách nào cần
giảm giá để hạn chế số lượng tồn kho sao cho hợp lý.
- Cách tính tổng số lượng sách tồn

Số lượng sách tồn = Số lượng sách nhập - Số lượng sách bán

Quản lý nhân viên: mọi nhân viên của nhà sách được quản lý với những thông tin
sau:
- họ và tên nhân viên
- ngày sinh
- điện thoại
- giới tính địa chỉ
Quản lý khách hàng: trong hệ thống khách hàng quản lý những thông tin sau
- tên khách hàng
- điện thoại
- fax


3.1 PHÂN TÍCH VÀ THIẾT KẾ HỆ THỐNG
3.1.1 Biểu đồ phân cấp chức năng 2 MA_ SA Text 5 Mã sách
3 TEN_ SA Text 50 Tên sách
4 SLS_ B Number 10 Số lượng sách bán lẻ
5 DGIAS_ B Number 10 Đơn gái sách bán lẻ 6) NHANVIEN ( lưu thông tin nhân viên làm việc trong nhà sách )

liệuADO. Nú trông giống như các điều khiển dữ liệu trong các phiên bản trước,
nhưng phần thuộc tính của điều khiển, ta sẽ thấy có nhiều điểm khác. Nú cho phép
kết nối với cơ sở dữ liệu với máy đề bàn hay cơ sở dữ liệu máy chủ ODBC trên
mạng, hoặc ta có thể tạo kết nối đến các cơ sở dữ liệu khác.
Ngoài ra ADO Visual Basic 6. 0 còn có bộ công cụ kỹ thuật mới giúp truy cập
dữ liệu dễ dàng hơn. Trình thiết kế môi trường dữ liệu cho phép xem xét và thao
tác dữ liệu trong cơ sở dữ liệu khác nhau, bởi vì bản thân môi trường dữ liệu là các
đối tượng, ta có thể sử dụng chúng như một điều khiển dữ liệu. Thậm chí ta có thể
gắn nú với các điều khiển khác như hợp văn bản hay nhẵn.
Một vài điều khiển dữ liệu khác cho phép ta tận dụng các thế mạnh của điều
khiển dữ liệu ADO. Điều khiển DataGrid cho phép xem dữ liệu dưới dạng bảng và
các dòng, cột. DataList và DataCombo tương tự như DBList và Dbcombo trong
các phiên bản trước, ta có thể dùng chúng để lấy một danh sách dữ liệu từ
Form nhập sách
Đứng trước xu hướng phát triển nhanh và mạnh của công nghệ thông tin thế
giới cũng như trong nước, thì tin học hoá quản lý là vô cùng quan trọng và bức
thiết hiện nay. Nú sẽ giúp cho các cơ quan hành chính giải quyết những công việc
một cách nhanh chóng và ít sai sót nhất, đặc biệt là trong lĩnh vực quản lý liên
quan đến sổ sách, hoá đơn. Những ứng dụng về cơ sở dữ liệu đã giải quyết được
những vấn đề bức thiết nêu trên.
Trong đợt thực tập này em đã em đã nhận đề tài xây dựng chương trình quản lý
sách và lấy nhà sách Minh Khai làm mô hình thực tế để xây dựng chương trình.
Tuy chương trình vẫn còn nhiều hạn chế, song nú đã đáp ứng phần nào công việc
quản lý sách của nhà sách và cho em thấy được vấn đề quan trọng khi xây dựng

Call ModCSDL. MoBang("Select STT, MA_SA,
TEN_SA, SLS_B, DGIAS_B from CTHDBS where MA_
HDBS = '" & k & "' order by STT")
Set DaReBanSach. DataSource = rs
DaReBanSach. Show
Set rs = Nothing
• Code xử lý quá trình nhập sách
Private Sub CmdCapNhat_Click()
On Error Resume Next
Dim stt As Integer ' So thu tu cac ban ghi trong lvSaMua
If txtTenS. Text = "" Then
lblloi. Caption = " Bạn hãy nhập tên sách"
txtTenS. SetFocus
Exit Sub
End If

If txtTenTG. Text = "" Then
lblloi. Caption = " Bạn hãy nhập tên tác giả"
txtTenTG. SetFocus
Exit Sub
End If

' Kiem tra so luong sach
If txtSL. Text = "" Then
lblloi. Caption = " Bạn hãy nhập số lượng sách"
txtSL. SetFocus
Exit Sub

so = CStr(CInt(Mid(MaS, 2, 4)) + 1)
d = Len(so)
Select Case d
Case 1
MaS = CStr("S" & "000" & so)
Case 2
MaS = CStr("S" & "00" & so)
Case 3
MaS = CStr("S" & "0" & so)
Case 4
MaS = CStr("S" & so)
End Select
End If
j = j + 1
stt = stt + 1
Set li = LvSAMua.ListItems.Add(, , stt, , 1)
LvSAMua.ListItems(j).SubItems(1) = MaS
LvSAMua.ListItems(j).SubItems(2) = txtTenS. Text
LvSAMua.ListItems(j).SubItems(9) = txtDonGia. Text
Case "1" ' Update
j = j + 1
stt = stt + 1
Set li = LvSAMua.ListItems.Add(, , stt, , 1)
LvSAMua.ListItems(j).SubItems(1) = txtMaSa. Text
LvSAMua.ListItems(j).SubItems(2) = txtTenS. Text
LvSAMua.ListItems(j).SubItems(3) = txtTenTG. Text
LvSAMua.ListItems(j).SubItems(4) = CmbNamXB. Text

MaS = CStr("S" & "00" & so)
Case 3
MaS = CStr("S" & "0" & so)
Case 4
MaS = CStr("S" & so)
End Select
LvSAMua.ListItems(j).SubItems(3) = txtTenTG. Text
LvSAMua.ListItems(j).SubItems(4) = CmbNamXB. Text
LvSAMua.ListItems(j).SubItems(5) = CmbLanXB. Text
LvSAMua.ListItems(j).SubItems(6) = CmbTapSo. Text
LvSAMua.ListItems(j).SubItems(7) = cmbMaNXB. Text
LvSAMua.ListItems(j).SubItems(8) = txtSL. Text
LvSAMua.ListItems(j).SubItems(9) = txtDonGia. Text
Case "1" ' Update
j = j + 1
stt = stt + 1
Set li = LvSAMua.ListItems.Add(, , stt, , 1)
LvSAMua.ListItems(j).SubItems(1) = txtMaSa. Text
LvSAMua.ListItems(j).SubItems(2) = txtTenS. Text
LvSAMua.ListItems(j).SubItems(3) = txtTenTG. Text
LvSAMua.ListItems(j).SubItems(4) = CmbNamXB. Text
LvSAMua.ListItems(j).SubItems(5) = CmbLanXB. Text
LvSAMua.ListItems(j).SubItems(6) = CmbTapSo. Text
LvSAMua.ListItems(j).SubItems(7) = cmbMaNXB. Text
LvSAMua.ListItems(j).SubItems(8) = txtSL. Text