Quản lý thư viện sách

Bộ sưu tập mã nguồn các ứng dụng về quản lý
Đăng trả lời
Hình đại diện của thành viên
tiger86love102
Thành viên danh dự
Thành viên danh dự
Bài viết: 610
Ngày tham gia: Chủ nhật 19/10/2008 1:10 am
Đến từ: http://ready.vn
Has thanked: 4 times
Been thanked: 21 times
Tiếp xúc:

Quản lý thư viện sách

Gửi bài by tiger86love102 »

Tên chương trình: Quản lý thư viện sách
Ngôn ngữ lập trình: VB6
Tác giả: tiger sưu tầm
Chức năng: Quản lý thư viện sách
Mình ko cài VB6, ko test đc. Ai cần thì tải về test nhé.
Đây là toàn bộ project Quản lý thư viện bao gồm cả csdl, bản word báo cáo luôn rồi đó.
Ai phải làm bài tập lớn hay đề tài QL thư viện thì ôm cả project này đi mà nộp.
Đc mấy điểm ko biết, có khi ăn ngỗng quay hay trứng vịt lộn cũng nên >:) :D
QL thu vien.rar
(1.54 MiB) Đã tải về 30528 lần
Đội bóng Ready
facebook.com/tiger86love102
Hình đại diện của thành viên
truongphu
VIP
VIP
Bài viết: 4785
Ngày tham gia: Chủ nhật 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 times
Been thanked: 530 times

Re: Quản lý thư viện sách

Gửi bài by truongphu »

HINCUTIN đã viết:HUHU vào phần code rồi ko tìm thấy pass ai gúp với chạy chương trình mà ko đăng nhập đc :
Một số bạn ít xem code quá, chỉ biết down về rồi chạy!

Tại Sub CmdLogin_Click đã nêu trên, để chạy không user và pass, ta tạm 'treo code xác nhận' là xong:

  1. Private Sub CmdLogin_Click()
  2. Dim ObjAgent As New ClsAgent
  3. Dim suid As String
  4. Dim spwd As String
  5. suid = Trim(Replace(TxtUID.Value, "'", "''"))
  6. spwd = Trim(Replace(txtPWD.Value, "'", "''"))
  7. Dim sresult As String
  8. sresult = ObjAgent.Verify(suid, spwd)
  9. 'If sresult <> "" Then  '<- khóa
  10. sAgentCode = sresult
  11. MDI.Show
  12. Unload Me
  13. 'Else '<- khóa
  14. 'MsgBox " Dang nhap that bai", vbCritical, StrSoftName '<- khóa
  15. 'TxtUID.SetFocus '<- khóa
  16. 'End If '<- khóa
  17. End Sub


Từ đây, không khai báo, cứ nhấn nút 'dang nhap' là xong
bổ sung tác giả: Sinh viên LE HOAI NAM
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh
nguyen a troi
Bài viết: 1
Ngày tham gia: Chủ nhật 17/11/2013 8:03 pm

Re: Quản lý thư viện sách

Gửi bài by nguyen a troi »

mình thêm bạn đọc rồi, trong access có thông tin rồi mà trên datagrid lại không hiển thị vậy bạn, nó mặc định chỉ có 3 người thôi
Đăng trả lời

Quay về