pb图书管理系统.doc
需求分析:1任务概述:1.1目标:对图书信息进行图书入库、借阅登记、借阅查询、办理借书卡这些日常业务的需要。1.2运行环境:WindowsXP操作系统下,安装并配置软件MicrosoftSQLServer2000数据库管理系统。2数据需求:2.1数据流条目:权限=权限+姓名登录用户=帐号+姓名+密码+权限用户=用户帐号+姓名+性别+组号+证件号码图书类别=类别+类名图书=图书编号+书名+作者+出版社+定价借阅=用户帐号+图书编号借阅信息=用户帐号+图书编号2.2数据库描述:使用SQLSERVER2000作为后台数据库,就可以行使基于网络连接的用户认证。从而给不同的子系统分配不同的数据库使用角色,让他们彼此之间使用的数据库隔离开来,以达到较高的安全性。2.3数据采集:任意输入数据作为初始测试。3功能需求:3.1功能划分:图书管理系统主要实现以下七方面的功能:a.查询b.图书借还c.图书入库d.环境管理3.2功能描述:可以对读者进行新增删除图书管理包括查询、借还、入库、和备份还原等方面功能。图书入库,主要实现入库登记。图书借阅,进行借书登记(此操作由管理员完成);当用户要查询自己的借阅情况时,可进行借阅查询。安全性需求:不同用户的权限不同,只有管理员能进行图书的入库,读者的增删等。读者仅能实现对读书的租借归还和查询等功能。管理员就可赋予新的管理权限。每位用户根据自己的身份不同,开启的功能也不同。管理员有权力行使所有的管理功能,普通用户只能进行一般的查询。w_main程序代码:chara,c,dlongll_wx,ll_wy,ll_wh,ll_ww/workspaceextentsselectflaginto:dfromsz;opensheet(w_back,this,0,layered!)selectbmpinto:cfromsz;choosecaseccase0w_back.abc(a.jpg)case1w_back.abc(b.jpg)case2w_back.abc(c.jpg)1系统管理功能窗口系统管理;程序功能总览注销登陆(执行退出登陆操作,安全退出)w_main读者登陆(以读者身份登陆,无操作管理读者功能)w_ptlogin管理者登陆(以管理员身份登陆,可以操作读者)w_gilogin退出(退出程序)case3w_back.abc(d.jpg)endchooseselectstartinto:afromsz;ifa=1thenOpenSheet(w_ptlogin,w_main,0,Original!)w_ptlogin.move(1080,640)/m_main.m_初始系统.m_读者登入.triggereventclicked()endififa=2thenOpenSheet(w_gjlogin,w_main,0,Original!)w_gjlogin.move(1080,640)endifll_wx=this.workspacex()ll_wy=this.workspacey()ll_wh=this.workspaceheight()ll_ww=this.workspacewidth()open(iw_popup_time)iw_popup_time.move(ll_wx+ll_ww-iw_popup_time.width-10读者登陆窗口界面及其代码w_pllogin:Click事件(确认):timed_dated_date=now()integerflag=0stringls_no,ffff=string(d_date)/sle_no.text=/sle_name.text=openpt;ifii_time<3thendofetchptinto:ls_no,:ls_name;IFsle_no.text=ls_noorsle_name.text=ls_nameTHENm_main.m_1.m_2.enabled=truemessagebox(Welcome!,欢迎你的到来,+ls_name+!)closept;flag=1;m_main.m_1.m_还书处理.enabled=truem_main.m_1.m_当前借阅.enabled=truem_main.m_书库操作.m_书库修改.enabled=falsem_main.m_读者操作.m_读者管理.enabled=falsem_main.m_用户管理.m_管理入口.enabled=falsew_main.title=图书馆管理系统-当前读者:+ls_nameexitendifloopwhilesqlca.sqlcode<>100;closept;ifflag=0thenMessageBox(登录错误,输入有误,请重新输入!)sle_no.setfocus()ii_time+endifelseMessageBox(登录错误,对不起,你无权使用本系统!)close(w_ptlogin)endifname=ls_nameifflag=1thenclose(w_ptlogin)click事件(取消):close(parent)管理员登陆窗口及其代码:Click事件(确认)代码:integerflag=0stringls_ps