企業(yè)工資管理系統(tǒng)課程畢業(yè)論文(文件)
【正文】 sql = select * from salarystatistics where stuffid=39。 Call basictopic Call showbasic(sql) Case 1 sql = select * from salaryother where stuffid=39。 Set rs = getrs(sql, salary) While Not rs(0) Wend sd = rs(0) = 0 Select Case Case 0 sql = select * from salarysetting where stuffid=39。 導(dǎo)出的工資記錄 窗體的部分代碼為：If strusername = admin Then ’管理員的權(quán)限 sql = select stuffid from salarysetting Set rs = getrs(sql, salary) If = False Then While Not rs(0) Wend End If = 0 Select Case Case 0 sql = select * from salarysetting Call basictopic Call showbasic(sql) Case 1 sql = select * from salaryother Call othertopic Call showother(sql) Case 2 sql = select * from salarystatistics order by id desc Call listtopic Call showdata(sql) End Select Else ’ 用戶的權(quán)限 sql = select sid from stuffinfo where sname=39。如果要選擇“刪除基本工資設(shè)置”，出現(xiàn)如下的提示：具體的操作這里就不詳細(xì)介紹。 amp。 amp。 1 days = DateDiff(d, Year(Date) amp。如果系統(tǒng)還沒有統(tǒng)計(jì)工資，那么系統(tǒng)開始統(tǒng)計(jì)工資，然后在信息結(jié)果列表窗體中顯示統(tǒng)計(jì)結(jié)果。Datasource=amp。 =provider=。Set rs = getrs(sql, salary)sd = rs(0)sql = select * from attendancestatistics where stuffid=39。If strusername admin Thensql = select sid from stuffinfo where sname=39。 and amp。 and amp。 amp。 amp。 1days = DateDiff(d, Year(Date) amp。If = And IsNumeric() = True Then MsgBox 請輸入正常加班工資百分比, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請輸入特殊加班工資百分比, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請輸入出差工資, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請輸入曠工扣發(fā)工資, vbOKOnly + vbExclamation, 提示 = ElseIf = And IsNumeric() = False Then MsgBox 請輸入遲到早退扣發(fā)工資, vbOKOnly + vbExclamation, 提示 = Else Call setvalue Call init End If選擇“工資信息管理”—“出勤統(tǒng)計(jì)”菜單，在統(tǒng)計(jì)出勤記錄窗體中選擇需要統(tǒng)計(jì)記錄的月份。 recordtime amp。 amp。 amp。 39。 39。) Call transactsql(sql, salary) MsgBox 添加成功, vbOKOnly + vbExclamation, 添加結(jié)果 = = = 選擇“系統(tǒng)”—“修改密碼”菜單，在修改密碼的窗體里，輸入舊密碼和2次輸入新密碼后，單擊“確定”按鈕，系統(tǒng)將會更改當(dāng)前用戶的密碼。,39。 sql = insert into userinfo (userid,userpwd) values(39。主窗體設(shè)計(jì)的界面是用菜單編輯器做的，主要由系統(tǒng)、工資信息設(shè)置、工資信息管理和關(guān)于這四個大模塊組成。通過標(biāo)題可以知道此系統(tǒng)的大概內(nèi)容，由此，登錄界面的設(shè)計(jì)完成。表10 SalarySetting（基本工資設(shè)置）序號字段名字段中文名類型1StuffID員工編號文本2Sposition員工職務(wù)文本3Salary基本工資貨幣（5） UserInfo (用戶表)：用于存儲新添加的用戶，當(dāng)添加完用戶時，就被存儲在此表中。表6 AlterationInfo（員工調(diào)離情況表）序號字段名字段中文名類型1AID員工編號文本2AName員工姓名文本3AOldDept原部門文本4ANewDept新部門文本5AOldPosition原職務(wù)文本6ANewPosition新職務(wù)文本7AOutTime調(diào)出時間日期/時間8AInTime調(diào)入時間
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1