phần mềm quản lý nhân sự

Ðề: phần mềm quản lý nhân sự

xin chào em là thành viên mới của diễn đàn. Hiện nay đang làm đồ án tôt nghiệp bằng access, nhưng không khá về lập trình. Em đang làm đồ án về quản lí nhân sự nhưng gặp rắc rối với việc chấm công cho nhân viên, mong những anh chị nào đi trước giúp đỡ. cơ sở dữ liệu:
nhanvien: mãnv, holot, ten,....
chamcong:mãnv,ngaycong, loaingaycong(X là đi làm, N là ngày nghỉ)
trong đó em muốn làm form chỉ cần nhập ngaycong vào sau đó ấn nút Lưu thì tất cả nhân viên ngày đó đều đi làm
em không biết các làm thế nào cả. hixhixxxxxxxx:helpsmilie:
-----------------------------------------------------------------------------------------
Làm thế nào để thông báo được mãnv đã bị trùng? và cách lập trình để thông báo các nút lệnh trong from nữa => help me!!!!!!!!!!!
 
Sửa lần cuối:
Ðề: phần mềm quản lý nhân sự

xin chào em là thành viên mới của diễn đàn. Hiện nay đang làm đồ án tôt nghiệp bằng access, nhưng không khá về lập trình. Em đang làm đồ án về quản lí nhân sự nhưng gặp rắc rối với việc chấm công cho nhân viên, mong những anh chị nào đi trước giúp đỡ. cơ sở dữ liệu:
nhanvien: mãnv, holot, ten,....
chamcong:mãnv,ngaycong, loaingaycong(X là đi làm, N là ngày nghỉ)
trong đó em muốn làm form chỉ cần nhập ngaycong vào sau đó ấn nút Lưu thì tất cả nhân viên ngày đó đều đi làm
em không biết các làm thế nào cả. hixhixxxxxxxx:helpsmilie:
-----------------------------------------------------------------------------------------
Làm thế nào để thông báo được mãnv đã bị trùng? và cách lập trình để thông báo các nút lệnh trong from nữa => help me!!!!!!!!!!!

Quản lý nhân sự là chuyện "lớn" chứ không nhỏ đâu à. Do vậy không thể nói hết một lần đâu. Chỉ hướng dẫn cho em làm "chữa cháy" mà thôi.
Nếu sau khi làm đồ án xong, ra trường thấy thích nghề, thấy thích Access thì phải học thêm cho đàng hoàng.

1. Giả sử form có textbox là txtNgayCong. Nút Lưu có tên là cmdLuu.
Chọn nút Lưu, nhấn F4 mở cửa sổ Properties, chọn thẻ Event, chọn event On Click. Nhắp nút ... bên phải, chọn Code Builder, OK. Sau đó gõ vào câu lệnh sau:

CurrentDb.Execute "INSERT INTO chamcong (manv, ngaycong, loaingaycong) " & _
"SELECT manv, DateSerial(" & Year(txtNgayCong) & ", " & Month(txtNgayCong) & ", " & Day(txtNgayCong) & "), 'X' FROM nhanvien"


Ý nghĩa:
Cho chạy một query insert thông qua một chuỗi lệnh SQL.
Có rườm rà ở chỗ DateSerial (cú pháp DateSerial(năm, tháng, ngày)) là để tránh bị nhầm lẫn dạng ngày tháng Việt <-> Mỹ trên những máy tính khác nhau.

Nếu còn mu mơ quá thì làm 1 cái query Action như sau:

Qua thẻ queries, chọn Create query in Design View.
Chọn table nhanvien, Add. Close cửa sổ Show Table lại.
Chọn menu Query - Append query. Chọn table name: chamcong. OK
Chọn menu Query - Parameters. Gõ vào Parameter: [Nhap ngay cong], Data type: date/Time. OK

Kéo manv xuống cột Field thứ nhất.
Cột Field thứ hai, gõ vào y chang parameter đã tạo: [Nhap ngay cong]. Append to, chọn: ngaycong
Cột Field thứ ba, gõ vào: "X", Append to, chọn: loaingaycong

Lưu lại tên qrChamCongLamviec

Có cái form. Có cái nút Lưu. Thao tác như phía trên để vào code Click của nút Lưu, gõ vào như sau:

DoCmd.SetWarnings False ' tắt thông báo của Access khi chạy query insert
DoCmd.OpenQuery "qrChamCongLamviec"
DoCmd.SetWarnings True ' bật lại chế độ hiện thông báo của Access

2.
Mã nhân viên bị trùng sẽ rơi vài trường hợp đó là Primary key hoặc không là Primary key nhưng Indexes: No duplicates
Access sẽ trả về một chỉ số lỗi là 3022.
Vậy chúng ta sẽ lợi dụng chỉ số lỗi này để thông báo trùng cho người dùng như sau:

Chọn nguyên Form ( nhắp vào nút vuông góc trái trên hai cây thước, nó sẽ có cục vuông đen bên trong). F4 mở cửa sổ Properties. Thẻ Event, chọn On Error. Nhắp ..., chọn Code Builder, OK.

Gõ vào đoạncode sau:

If DataErr = 3022 Then
Response = acDataErrContinue ' đừng cho xuất hiệnt hông báo lỗi của Access
MsgBox "Mã số nhân viên bị trùng."
Else
Response = acDataErrDisplay ' cho xuất hiệnt hông báo lỗi của Access nếu là lỗi khác
End If


3. Muốn hiện thông báo thì dùng lệnh (và hàm) MsgBox.

Lệnh: MsgBox "Mã số bị trùng rồi."
Hàm: If MsgBox("Có lưu không?", vbYesNo) = vbYes Then ...

Coi thêm MsgBox ở help của Access.

Thôi mệt quá, dừng nhé. :confuse1:
 
Ðề: phần mềm quản lý nhân sự

tôi rất cấn phần mềm quản lý nhân sự. ai có cho mình xin với. Cám ơn!
 
Ðề: phần mềm quản lý nhân sự

Công ty mình trước đây sử dụng phần mền Gpro, rất hay nhưng có lẽ phải mua bản quyền của nước ngoài vì mình thấy toàn những chuyên gia bên Malai sang làm, cài đặt phần mềm đó cho bọn mình.Những phần mềm khác mình chưa bít nhưng phần mềm này rất tiện cho người quản lý.
 
Ðề: phần mềm quản lý nhân sự

Ai ơi có bài báo cáo về quản lý nhân sự nào ko cho tui xin một bai? tui đang rất cần gấp, chăng biết làm thế nào cả? đành mặt dày đi bài thôi, ai có làm ơn cho xin bài đi? năn nỉ mà? Thanks trước nhe!!!!!!!!!!!(có cả phần chạy và báo cáo bằng word)
 

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Cách làm file Excel quản lý lãi vay

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top