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_time3thendofetchptinto: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.sqlcode100；closept；ifflag=0thenMessageBox(登录错误,输入有误，请重新输入!)sle_no.setfocus()ii_time+endifelseMessageBox(登录错误,对不起，你无权使用本系统!)close(w_ptlogin)endifname=ls