- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
一、目录
一、目录 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功能分析
本系统以项目信息(项目编码,项目名称,开发经费,应用情况和参加人员),以及项目开发人员自身的信息(编码,姓名,性别,出生年月,职称和部门)为主线,以部门表等为辅表,实现了项目和人员信息的录入、查
您可能关注的文档
最近下载
- 2024初中道德与法治新人教版七年级上册(全册)完整教案.pdf VIP
- 《论语》十二章+课件+2025-2026学年统编版高二语文选择性必修上册.pptx VIP
- 霍兰德测试60题打印版.pdf VIP
- 纪念中国人民抗日战争暨世界反法西斯战争胜利80周年主题党课PPT(优质ppt).pptx VIP
- 烹饪原料加工技术:干货原料涨发工艺.ppt VIP
- 人教PEP版五升六英语专项自测-阅读理解(有答案).docx VIP
- 竞聘介绍主题PPT模板.pptx VIP
- 《我与地坛》任务式公开课一等奖创新教学设计统编版高中语文 必修上册.docx VIP
- 售后服务中心员工奖惩制度.docx VIP
- 适合一个人看的欧美电影.pptx VIP
文档评论(0)