• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Đề tài tốt nghiệp quản lý nhân sự năm 2006

Bộ sưu tập mã nguồn các ứng dụng về quản lý
mrcoding
Thành viên danh dự
Thành viên danh dự
Bài viết: 71
Ngày tham gia: T.Năm 19/03/2009 2:03 pm
Đến từ: Đà Nẵng
Been thanked: 4 time
Liên hệ:

Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi mrcoding » T.Ba 24/03/2009 3:29 pm

Tên chương trình: QLNS
Ngôn ngữ lập trình: Visual Basic 6.0
Tác giả: MrCoding
Chức năng: Quản lý nhân sự tại xí nghiệp công trình II - Công ty công trình Viettel năm 2006
Đây là đề tài tốt nghiệp của tui năm 2006. Chú ý để sử dụng được chương trình bạn phải cài chương trình Active Report có đi kem với chương trình trong thư mục Resource.
Dung lượng hơi lớn nên các bạn vào trang www.vbcoding.byethost15.com để tải chương trình về nhé.

Tập tin đính kèm
QLNS.jpg
Sửa lần cuối bởi mrcoding vào ngày T.Năm 26/03/2009 2:52 pm với 1 lần sửa.


http://www.mediafire.com/hothanhnam

mrcoding
Thành viên danh dự
Thành viên danh dự
Bài viết: 71
Ngày tham gia: T.Năm 19/03/2009 2:03 pm
Đến từ: Đà Nẵng
Been thanked: 4 time
Liên hệ:

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi mrcoding » T.Năm 26/03/2009 8:33 am

Bạn vào trang chủ của mình có mục download đấy http://www.vbcoding.byethost15.com
http://www.mediafire.com/hothanhnam

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi truongphu » T.Tư 01/04/2009 4:34 pm

Đây là file nén Project QLNS ở trên, chỉ còn 621 KB vì không chứa:

- resource\Active Report\AR2PROEVAL1170.EXE 7.37 MB
- resource\Pictures 2.35 MB
- Help 1.82 MB
- images 600 KB
- Media 176 KB
- backup 1.1MB
- QLNS.exe 4.09 MB
- và compact database

Do vậy khi chạy sẽ báo lỗi, cứ chạy!
Dùng xem thiết kế và code

* Ghi chú: Tôi đã vô hiệu lệnh End nếu độ phân giải khác 600 x 800

* Rất tiếc Project không được viết với Unicode

Nếu các bạn muốn đầy đủ, nên load tại path gốc mà tác giả Ho Thanh Nam đã cho ở trên
QLNS.rar
(621.11 KiB) Đã tải 6489 lần


TB: quên bổ sung mật khẩu;

Mat khau de vao file access:613339640072
Tai khoan mac dinh: quantri
Mat khau: de trong
Chu y: -De su dung duoc chuong trinh ban phai cai chuong trinh Active Report co trong thu muc Resource.
-De hien thi duoc tieng viet ban phai cai Font ABC Sans Serif co trong thu muc Font

"Day la de tai TN Cua tui do. cac pac thay the nao ???"
©2006 - Ho Thanh Nam
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi truongphu » T.Sáu 03/04/2009 4:09 pm

binhminhs11 đã viết:tại sao lại chạy không được mà phải dùng xem Thiết kế và code thôi


* 2 bạn tungcan5diop và vietteiv đã góp ý, tuy nhiên, trong thâm tâm chúng ta, chạy được project vẫn "sướng" hơn chứ!

Project tôi gởi lên vẫn chạy được, chỉ thiếu phần Report do tác giả dùng thêm software ngoài. Để chạy hoàn chỉnh ta cài: AR2PROEVAL1170.EXE 7.4 MB, hoặc load tại địa chĩ của tác giả nêu trên, hoặc tìm đâu đó... Tôi không gởi lên vì thừa! Sau khi cài xong, thành phần cài sẽ xuất hiện trong bảng References (bôi đậm)
1.JPG
Các thành phần cài


Chú ý trong bảng trên nhớ cài thêm gói SP4 (Microsoft)

CSDL là file Data.MDB
Tôi đã xóa bỏ mật khẩu, Form đăng nhập, macro autoexcec và compact nó lại:

data.rar
Không mật khẩu, không đăng nhập
(28.93 KiB) Đã tải 1572 lần


Để thuận tiện khi chạy Project, khỏi rườm rà đăng nhập, cần sửa lại code như sau:

FrmKetnoi

Mã: Chọn hết

  1. '''''''Vô hiêu chô nây
  2. 'Kiem tra do phan giai cua man hinh
  3.  '  STX = Screen.TwipsPerPixelX
  4.  '  STY = Screen.TwipsPerPixelY
  5.  
  6.  '  If Screen.Width \ STX <> 800 Then
  7.   '      Thongbao "Ch­¬ng tr×nh chØ ch¹y ë mµn h×nh cã ®é ph©n gi¶i lµ: 800 x 600 Pixels.", Tb_Dong, "Chus ys", Bao_Loi
  8.   '      End
  9.   ' End If


FrmKhoitao

Xóa hết và ghi code sau

Mã: Chọn hết

  1. Private Sub Form_Load()
  2. FrmQLNS.Show
  3. Unload Me


FrmQLNS

Vô hiệu đoạn code sau đây

Mã: Chọn hết

  1. '''''''''''''''
  2. 'RsLog!taikhoan = UCase(Left(m_Taikhoan, 1)) & LCase(Right(m_Taikhoan, Len(m_Taikhoan) - 1))
  3. 'RsLog!tgdangnhap = Now
  4. 'RsLog!tgdangxuat = ""
  5. 'B_id = RsLog!ID
  6. 'B_Tk = m_Taikhoan
  7. 'RsLog.Update
  8. 'Trangthai.Status = "Xin chµo: " & UCase(Left(B_Tk, 1)) & LCase(Right(B_Tk, Len(B_Tk) - 1)) & " !"
  9. End Sub


* Tác giả dùng DAO, bạn có thể dùng ADO
* File CSDL font ABC, có thể chuyển qua font Unicode ...vv

Nói chung là công trình khá tỉ mỉ, công phu nên ... nặng nề
Một vài phần (tôi mới xem qua) có thể tinh gọn :D

Chúc tác giả Ho Thanh Nam thành đạt trong cuộc sống
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

newbievisualbasic

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi newbievisualbasic » T.Bảy 04/04/2009 10:14 am

- Chương trình quá chú trọng về hình ảnh bên ngoài như: Đưa các Image vào hầu hết các Control như Menu, Button... do đó đôi khi làm cho người cảm thấy quá màu mè. Chương trình mang tính hướng dẫn cho người dùng khá tốt, thiết kế các tooltip hướng gẫn người dùng khá tốt.
- Nhưng mà chương trình mãi mê đi làm cho giao diện đẹp không chú trọng đến tính sử dụng của người dùng, nên chương trình này chỉ mang tính code tham khảo mà thôi
- Tính thuận tiện của chương trình tôi đánh giá rất thấp, tôi cũng cảm thông cho bạn vì bạn còn là sinh viên nên chưa chú trọng đến vấn đề này như: Chương trình phải dùng chuột chứ dùng bàn phím thì Tab nhãy tùm lum không biết đường nào mà nhập liệu.

Tóm lại: chương trình này chỉ tham khảo cách thiết kế là chính như: Đưa Image vào Button, Calendar, Image trong menu, tool tip, tool bar....

@MrCoding: Tôi chỉ đánh giá cách sử dụng Visual Basic của bạn mà thôi, bạn học Visual Basic khá tốt, nhìn vào project của bạn mình thấy bạn đã dùng hầu hết các khái niệm của ngôn ngữ này mà cái này rất quan trọng nó giúp cho bạn về sau này rất nhiều. Chúc bạn thành công trên con đường mình đã chọn.

binhminhs11
Bài viết: 1
Ngày tham gia: T.Hai 29/12/2008 2:44 pm

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi binhminhs11 » T.Tư 08/04/2009 10:55 am

mrcoding đã viết:Tên chương trình: QLNS
Ngôn ngữ lập trình: Visual Basic 6.0
Tác giả: MrCoding



Chương trình bạn viết rất tốt, nếu như bạn có điều kiện, nâng cấp đề tài này thành phần mềm QLNS cả cho Cơ quan nhà Nước Lẫn Doanh nghiệp.
Để hoàn thiện hơn tôi góp ý bạn thêm Modulel này như sau:
bạn viết thêm phần tính thời điểm nâng hơn (Thời hạn nâng lương).
Khi một người đủ thời gian hay đến thời điểm nâng lương thì phần mềm báo.
ví dụ: anh Nguyễn Văn A, tốt nghiệp Đại học, vào làm việc ngày 8/4/2006 thì đến ngày 8/4/2009 phần mềm sẽ báo cho người điều hành biết Anh Nguyễn Văn A đến ngày nâng lương.(ngoại trừ trường hợp nâng lương trước thời hạn). * Đại học và Cao đẳng 3 năm nâng lương còn Trung cấp là 2 năm. trường hợp trên áp dụng cho Cơ quan nhà nước. còn Doanh nghiệp thì tự nhập ngày nâng lương

dieuhuong
Bài viết: 1
Ngày tham gia: T.Sáu 10/04/2009 10:18 pm

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi dieuhuong » T.Sáu 10/04/2009 10:34 pm

cảm ơn mọi người về những bài tập của VB nhé.
Mình đang cần nên vô cùng cảm ơn :x :)

mrcoding
Thành viên danh dự
Thành viên danh dự
Bài viết: 71
Ngày tham gia: T.Năm 19/03/2009 2:03 pm
Đến từ: Đà Nẵng
Been thanked: 4 time
Liên hệ:

Re: Đề tài tốt nghiệp quản lý nhân sự năm 2006

Gửi bàigửi bởi mrcoding » CN 31/10/2010 2:41 pm

http://www.mediafire.com/hothanhnam


Quay về “[VB] Mã nguồn chương trình quản lý”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.0 khách