Free Access database employee management system Download-it technology website Enterprise Personnel Management System source code

Free Access database employee management system download

To meet the requirements of most people at fingertips, today brings a database employee management system with access developed by our fingertips team. The following will give you a brief introduction of the system's approximate function! Online There are many staff management system source code, Java written, have C # written, I probably looked at only the source code, no management system finished, so today this system is finished, the relevant language is the visual Basic, If you want to see the code, you can click on the various forms of the design window-and then click on the relevant control-right-click event Generator, you can see the system of the relevant Visual Basic code!

Want to learn more it technology or want to download more about it software, scripts, or source code, please remember the site domain yo: http://www.zzzjtd.com every day not regularly update the latest IT technology resources for everyone to learn and download

Employee Management System Login Interface

The interface is relatively not so beautiful, but harmless, very little, perfectly formed, functional or very complete, and do the very perfect the following is the staff management System landing interface diagram

Login interface diagram of employee management system

Employee Management System Login interface-Login control related VB code

1 Option Compare Database 2  3 Private Sub login _click () 4  If IsNull (me.user) then 5  MsgBox "Please enter user name" 6  Exit Su B 7  ElseIf IsNull (me.pwd) then 8  MsgBox "Please enter password" 9  Exit Sub10  End If11  If Me.pwd.Value = DLookup ("Password "," User table "," username = ' "& Me.user.Value &" ' ") Then13  DoCmd.OpenForm" Human resources Management System "  DoCmd.Close Acfrom," landing form "  Else16  MsgBox "username and password incorrect" "  End If18 End Sub19 Private Sub exit _click () Docmd.close22 End SUB23 Staff management Department System Login interface-Exit control related VB code for Private Sub exit _click () Docmd.close27 End Sub

Employee management system related forms and data tables used

The data table has the following:

Travel situation, attendance management, working hours, overtime management, attendance statistics, absence management, user tables, employee information

The system forms have the following in common:

Travel situation forms, attendance management forms, attendance management subform, individual employee details, payroll management subsystem, work hours form, company profile form, overtime management form, human resources management subsystem form, human resource management system form, add employee Information form, System login form, System management subsystem, User Table window , Employee Details form, employee details Browse form, employee Information form.

The system has a lot of data sheets and various implementation functions of the form, I do not introduce each and one by one, I will give you the overall form of the publication.

Employee management system forms and data sheets

Employee Management System's Report Center function one Personnel management

The Personnel Management system is divided into:

Employee management, absence management, working hours, travel records, company profile

Report Center function one Personnel management

Report Center function of employee management system two salary management

The Payroll management system is divided into:

Overtime Management, payroll management

Report Center features two payroll management

Report Center function of employee Management System Report Center

Report Center There is only one subform: Attendance report, this is a very important feature, whether it is a large enterprise or small companies, employees need to do an attendance management, so you need to use the system's Attendance report function!

Report Center function Three Report Center

Report Center function of employee Management System Report Center-salesman customer management software

The last function, is also very important a function, the account management function, this function is simply, if you are the company director or the boss, you need to give your staff to open the management of the system, so that the employee has the right to access the staff management system, It is necessary to add an account to the employee in the account management, so that he can log into the system as well as you!

Report Center function Three Report Center

The following is the Visual Basic code of the Employee Information form for the Employee Management System Subform-Free clerk management software

 1 Option Compare Database 2 3 Private Sub Auto_logo0_click () 4 me.requery 5 End Sub 6 7 Private Sub Myid2_click () 8 Yua Ngongid = me! [MyID].  Value 9 DoCmd.OpenForm "single employee Details" Ten End Sub12 Private Sub Delete _click () from the employee number, Dim stemp as String16 logic = 117 Dim i As Integer18 ' defines the dataset variable Dim Rs as ADODB. Recordset20 ' defines the dataset variable allocation space Set Rs = New ADODB. Recordset22 stemp = "SELECT * FROM employee Information" 23 "Open employee information Sheet data rs.open stemp, CurrentProject.Connection, adOpenKeyset, Adlocko Ptimistic25 ' uses the For...next loop statement to cycle through the Rs dataset to determine if the employee field in the record collection is determined by the 1 to Rs.recordcount27 ' Check if RS ("employee number") is the employee in the form = ME.M Yid.value Then29 ' If same delete rs.delete 131 logic = 232 MsgBox "Successfully deleted employee record", vbOKOnly, "delete complete" 33 ' Set I value jump out of loop i = Rs.reco Rdcount + 135 Else36 ' If different move next record PNs rs.movenext38 End If39 next i40 if logic = 1 Then41 MsgBox "The number you entered was not found!" "End If43 me.requery45 Set Rs = Nothing46 End SUB48 Pro Sub employee name _dblclick (Cancel as Integer) Yuangon GID = me! [Employee number]. Value51 docmd.openforM "Single Employee Details" "End Sub" 

Employee Information Login Form

The event of this code is generated in the button called "Delete according to employee number" This button, single machine right-event generator-Enterprise employee information Management system

The following is the Visual Basic code for the incident management form of the employee Management System Subform-Java for the employee management system

 1 Private Sub empty Record _click () 2 on Error GoTo err_ empty record _click 3 ' definition string variable 4 Dim stemp As String 5 ' Define DataSet Variable 6 Dim Rs as ADO Db. Recordset 7 ' Defines the space of the dataset variable 8 set Rs = New ADODB. Recordset 9 ' Empty text box's existing record stemp = ' Delete * ' from working time ' 11 ' Execute query using RunSQL method of DoCmd object Docmd.runsql Stemp13 MsgBox "working The room has been deleted!  ", vbOKOnly," delete Time "me.requery15 exit_ empty record _click:17 Exit Sub18 err_ empty record _click:19 MsgBox Err.description20 Resume Exit_ empty record _click21 End Sub22 Private Sub close _click () on Error GoTo err_ close _click25 docmd.close26 exit_ close _click:27 Exi T Sub28 err_ off _click:29 MsgBox err.description30 Resume exit_ off _click31 End Sub32 Private Sub default Time _click () on Error GoTo err_ Default time _click35 ' Default work time me! [Morning work time] = "me!" PNs [noon off time] = "me!" [Afternoon work time] = "13:00" me! [Night off time] = "17:00" "MsgBox" has been restored to the system default time! ", vbOKOnly," Default time "exit_ default time _click:42 Exit Sub43 err_ default time _click:44 MsgBox err.description45 Resume err_ default Time _click46 En D Sub47 to Private Sub modification Time _click () on Error GoTo err_ modification Time _CLICk50 ' modified working time Docmd.domenuitem acFormBar, acRecordsMenu, Acsaverecord, acMenuVer7052 ' pop-up change success Info MsgBox "Staff working hours set success ！  ", vbOKOnly," modified successfully "Exit_ modified time _click:55 Exit Sub56 err_ Modify Time _click:57 MsgBox err.description58 Resume exit_ Modified Time _click59 End Sub

The event of this code is generated in the button called "Modify Time" this button, single-Machine right-event generator-employee management system Modify employees

Time Management Form

The following is the Visual Basic code for the attendance Management subform of the Employee Management System Subform-java writing an employee management system

 1 Private Sub Save Record _click () 2 ' defines a character type variable 3 Dim stemp As String 4 ' defines a DataSet variable 5 Dim Rs as ADODB. Recordset 6 ' allocates space for the defined data set Variable 7 set Rs = New ADODB. Recordset 8 ' Open Data Table query statement character variable assignment 9 stemp = "SELECT * FROM Attendance Management" 10 ' Open "attendance management" data sheet Rs.Open stemp, currentproject.connection, ad Openkeyset, ADLOCKOPTIMISTIC12 ' Determines whether required text boxes and combo boxes in the form are empty if me! [Employee number] <> "and me! [Department number] <> "" and me! [Work Date] <> "and me! [Working hours] <> "and me! [Off hours] <> "" and me! [Is PM] <> "THEN14" use Recordset AddNew method to add a record rs.addnew16 ' Assign the value of the Window text box and the combo box to the field in the Record collection Rs ("employee number") = me! [Employee number]18 Rs ("department number") = me! [Department number]19 Rs ("work date") = me! [Working date]20 Rs ("work hours") = me! [Working Hours]21 Rs ("off hours") = me! []22 Rs ("if afternoon") = me! [Whether for the afternoon]23 ' to determine the choice is the morning or the afternoon if me! [Whether it is afternoon]. Value =-1 Then25 ' If the afternoon is selected, it is =true26 Rs ("is Afternoon"). Value = True27 Else29 ' If the afternoon is selected, the value =false30 Rs ("is Afternoon"). Value = False31 End If32 Rs ("remarks") = me! [note] 33 ' Refresh the recordset using the recordset's Update method rs.update35 MsgBox "attendance record added successfully", vbOKOnly, "Add complete" Else37 ' if required text box and combo box is empty, then pop up "note" Information 38 MsgBox "required field cannot be empty! ", vbOKOnly, "note" 39 ' place the cursor in the "Employee Number" text box. me! [Employee number]. SetFocus41 End If42 ' release system RS DataSet allocated space of Set rs = Nothing44 Exit_ save record _click:46 Exit Sub47 err_ Save record _click:48 MsgBox err.de Scription49 Resume exit_ Save record _click50 End Sub

Attendance Management Form

The event of this code is generated in the button called "Save Record" this button, single-Machine right-click-Event Generator

The above is the general description of the system, more detailed people can download their own research and research, what needs to update the place, or those can be more perfect place, welcome you to contact me, my mailbox is: [Email protected]

Note: This system network only this IT technology network (zhi at the fingertips) station published, and all the content of the system is the independent development of the site, please contact me before the use of the Express purchase software copyright, otherwise, once found, the site will be retroactive legal procedures have protected the copyright of the software

Because this staff management system is of great significance to this site, so this site will be set up in order to review the system to download, everyone go to register an account to review and then download it

The system has a database authentication password: www.zzzjtd.com (database Password)

Login Form account default: Zhi at the fingertips password: admin

This article original website: https://zzzjtd.com/803.html

Tags: Access employee management system, database Employee management system, VB Staff management system, open source employee management system, company employee management system

Free Access database employee management system Download-it technology website Enterprise Personnel Management System source code