项目管理系统最后结果.docVIP

一、目录 一、目录 1 二、任务书 2 三、正文 2 3.1设计目的 2 3.2建立用户全局函数及自定义事件 3 3.2.1全局函数f_encypt 3 3.2.2自定义事件uo_dw_freedow 3 3.2.3自定义事件uo_dw_delete 4 3.2.4自定义事件shifter 4 3.2.4自定义事件dberror 4 3.3功能分析 5 3.4表的设计 6 3.5系统实现 8 3.5.1主窗口 8 3.5.2用户登陆窗口 9 3.5.3部门数据录入与维护窗口 10 3.5.4人员信息窗口 12 3.5.5人员数据检索窗口 13 3.5.6项目数据管理窗口 16 3.5.7项目数据查询窗口 18 3.5.8项目数据录入、编辑窗口 19 3.5.9用户管理窗口 22 3.5.10密码修改窗口 24 3.5.11用户数据的录入和编辑窗口 25 3.5.12数据备份窗口 26 3.5.13运行界面 28 四、总结 28 4.1系统评价 28 4.1 .1系统特色 29 4.1.2系统不足及改进 29 4.1.3课程设计心得 29 五、参考文献 30 二、任务书 图书馆查阅资料： 王雪娥 方俊 孙翠丽 设计并创建并联接数据库： 方俊 王雪娥 创建表格及主键、外键、及索引，并编入数据： 方俊 王雪娥 代码编写： 王雪娥 方俊 孙翠丽 吕剑豪 创建数据窗口对象： 孙翠丽 王雪娥 方俊 建立用户自定义事件并建立全局函数：方俊 各功能窗口模块化设计： 王雪娥：用户登陆窗口 部门数据录入和维护窗口 人员数据检索窗口 用户管理窗口 方俊： 人员数据录入、维护和查询窗口 项目数据显示窗口 项目录入、编辑窗口 用户数据录入、编辑窗口 孙翠丽： 项目数据查询窗口 部门人数统计窗口 更改密码窗口 吕剑豪：系统主窗口 数据备份窗口 菜单应用设计：王雪娥 论文编写： 王雪娥 方俊 孙翠丽 吕剑豪 三、正文 3.1设计目的 进一步加深、巩固学生所学专业课程的基本理论知识，理论联系实际，进一步培养学生综合分析问题和解决问题的能力。使学生得到搜集、处理、应用资料信息的实践训练，同时全面考察学生所掌握的基本理论知识及其实际业务能力，从而达到提高学生素质的最终目的。 3.2建立用户全局函数及自定义事件 3.2.1全局函数f_encypt //功能:加密 //参数:字符串 //返回值:字符串 integer i,li_kllen string ls_zmkl li_kllen=len(a_ymm) for i=1 to li_kllen ls_zmkl=ls_zmkl+char(asc(mid(a_ymm,i,1))+i+li_kllen) next return ls_zmkl 3.2.2自定义事件uo_dw_freedow if getrow()0 then if deleterow(0)=1 then messagebox(提示,当前记录已被删除，请按“保存”按纽提交) end if end if 3.2.3自定义事件uo_dw_delete if this.update()0 then commit using sqlca; messagebox(提示,数据已存盘) else rollback using sqlca; messagebox(提示,数据无法存盘,exclamation!) end if 3.2.4自定义事件shifter if key=keyenter! or key=keydownarrow! then keybd_event(9,0,0,0) keybd_event(9,0,2,0) return(0) end if if key=keydownarrow! then keybd_event(16,0,0,0) keybd_event(9,0,0,0) keybd_event(9,0,2,0) keybd_event(16,0,2,0) return(1) end if 3.2.4自定义事件dberror //显示错误信息 messagebox(数据库错误,错误代码+string(sqldbcode)+~r~n+错误信息+sqlerrtext) return(1) 3.3功能分析 本系统以项目信息（项目编码，项目名称，开发经费，应用情况和参加人员），以及项目开发人员自身的信息（编码，姓名，性别，出生年月，职称和部门）为主线，以部门表等为辅表，实现了项目和人员信息的录入、查