人事管理系统软件,超级列表框导出EXECL模块

易语言 2020-08-08 16:05:56

人事管理系统软件,超级列表框导出EXECL模块

包括人员档案的录入查询管理;费用的录入查询、单据管理;数据库系统的维护备份;其他辅助功能等。

本例程还使用到易语言数据库支持库,易语言高级表格支持库。

气球提示框1.关联组件 (高级表格1, “用鼠标双击费用项目列” + #换行符 + “自动弹出费用项目窗口” + #换行符 + #换行符 + “按下方向键自动增加一行”, -1, , , , )

费用录入记录集.打开 (“select * from str_fy_jl where 员工编号='” + 删首尾空 (员工编号编辑框.内容) + “'”, 1)
.如果 (费用录入记录集.记录数量 > 0)
费用录入数据库连接.执行SQL (“update str_fy_jl set 员工编号='” + 员工编号编辑框.内容 + “',员工姓名='” + 员工姓名编辑框.内容 + “',部门='” + 部门编辑框.内容 + “',供应商代码='” + 供应商代码编辑框.内容 + “',供应商名称='” + 供应商名称编辑框.内容 + “',办理人='” + 经办人编辑框.内容 + “',办理日期='” + 处理日期 (时间到文本 (办理日期日期框.今天, #日期部分)) + “',到期日期='” + 处理日期 (时间到文本 (费用到期日期日期框.今天, #日期部分)) + “'” + “where 员工编号='” + 删首尾空 (员工编号编辑框.内容) + “'”)
.否则
费用录入数据库连接.执行SQL (“insert into str_fy_jl(员工编号,员工姓名,部门,供应商代码,供应商名称,办理人,办理日期,到期日期) values('” + 员工编号编辑框.内容 + “','” + 员工姓名编辑框.内容 + “','” + 部门编辑框.内容 + “','” + 供应商代码编辑框.内容 + “','” + 供应商名称编辑框.内容 + “','” + 经办人编辑框.内容 + “','” + 处理日期 (时间到文本 (办理日期日期框.今天, #日期部分)) + “','” + 处理日期 (时间到文本 (费用到期日期日期框.今天, #日期部分)) + “')”)