邮局订阅管理系统

1、1 概述1.1 选题背景在Internet飞速发展的今天，互联网成为人们快速获取、发布和传递信息的重要渠道，它在人们政治、经济、生活等各个方面发挥着重要的作用.因此网站建设在Internet应用上的地位显而易见，它已成为政府、企事业单位信息化建设中的重要组成部分，从而倍受人们的重视。 这次我们所设计的课题正是互联网与社会生活之间的紧密关系的体现，现今的社会，人们已经离不开了网络，网络已经成为人与人之间交流的一种形式，他能够把事情的复杂化转为简单化。邮局订报管理系统的建设不仅能够使该事业单位的工作方式有所改变，也大大地提高了该单位工作人员的办事效率，也增加了该单位的知明度，更重要的是为我们的居民

2、提供了一个网络生活空间，促进了他们对网络知识的进一步地了解。 通过该系统展示了各种报纸信息的在线订阅功能及报纸、客户信息管理功能，方便了客户与邮局的各种信息沟通，同时也给予了管理人员极大的方便。近年来我国信息产业发展迅速，手工管理方式在报纸订阅管理等需要大量事务处理的应用中已显得不相适应，采用IT技术提高服务质量和管理水平势在必行。面对各种媒体的强势竞争，因此，邮局必须提高其工作效率，改善其工作环境。这样，管理信息化势在必行。  在传统的邮局订阅管理中，其过程往往是很复杂的，繁琐的，管理以售出和进货两项内容为核心，在此过程中又需要经过若干道手续，因为整个过程都需要手工操作，效率十分低

3、下，且由于他们之间关联复杂，统计和查询的方式各不相同；且会出现信息的重复传递问题，因此该过程必须实现信息化。  我们的系统开发的整体任务是实现邮局订报管理的系统化、规范化、自动化和智能化，从而达到提高管理效率的目的。1.2 系统环境 系统开发环境为局域网网络环境，使用 PowerBuilder9.0开发工具，并充分利用其自带的数据库Adaptive Server Anywhere实现系统的功能。1.2.1 PowerBuilder9.0简介PowerBuilder（简称pb）是美国Sybase公司研制的一种新型、快速开发工具，是客户机/服务器结构下，基于Windows3.x、Wind

4、ows95和WindowsNT的一个集成化开发工具。它包含一个直观的图形界面和可扩展的面向对象的编程语言PowerScript，提供与当前流行的大型数据库的接口，并通过ODBC与单机数据库相连。其特点主要如下：可视化、多特性的开发工具；功能强大的面向对象技术；支持高效的复杂应用程序；企业数据库的连接能力；强大的查询、报表和图形功能。在当前，网络技术迅速发展，随之发展的还有OLE，OCX，跨平台等技术，而在PowerBuilder的PowerBuilder9.0中提供了对这些技术的全面支持。总之在数据库开发工具领域，PowerBuilder是其中非常优秀的一个，利用它我们可以开发出强大的数据库应

5、用程序。因此，PowerBuilde是一款很适合邮局订报信息系统的前台开发工具，能对订报实施即时、规范、高效的管理。1.2.2 PowerBuilder9.0 访问 ASAASA它可以在不同的环境下工作,能充分利用可用内存和 CPU 资源，在具有充足资源的环境中提供极佳的性能。它还可以在具有有限物理和数据库管理资源的环境下很好地工作，包括移动计算环境、嵌入式数据库使用，并可用作中小型业务的数据库服务器。1.2.3 语言环境系统开发主要采用PowerScript语言。PowerScript是Sybase公司研制PowerBuilder的一种编程语言，powerscript除了提供基本的流程控制语

6、句，还提供了几百个函数来操纵各种对象和提供诸如DDE，OLE等方面的支持。此外我们还可以定义自己的函数，处理特定的事件。2 系统分析2.1 系统目标需求邮政订阅管理信息系统涉及有用户信息、管理员信息、期刊信息等等，而由于使用者的计算机水平的不同为了满足大多数使用者的能力要开发的系统应简单易学、容易操作。系统需要满足的要求如下：统一友好的操作界面，保证系统的易用性尽量采用当前流行的图形界面设计并能进一步考虑子系统在安全性、完整性、备份恢复等方面的功能要求；期刊分类详尽，可按不同要求查看期刊的相关信息，同时可以能对个表进行输入、修改、删除、添加、查询等功能；提供简单的安全模型，让客户必须先进行登录

7、，才允许进入网站查看网站内容和订阅情况，在客户订阅信息和供应商供给信息发生变更时，能对相关信息作必要的调整；设计网站后台操作平台，管理网站的各项基本数据；期刊出入库管理，对进、出库信息进行记录，传统的手工录入耗时多，成本高而且容易出错，因此新开发的系统要充分体现计算机这一信息处理器的强大作用，尽可能减少数据输入量并具有出错信息提示功能，在最大限度减少库房管理人员体力劳动的同时中保证出入库信息的准确度；邮政部门为了方便管理者利用库存信息进行计划管理采购管理等方面的决策和客户订阅管理进行不同的查询。2.2 开发的可行性分析2.1.1 管理上的可行性邮政部门通过在Internet上反映图书信息，建立

8、期刊订阅网站，对邮政部门来说，是邮政部门对外展示信息，从事邮政订阅活动的窗口和界面。因此，邮政部门高中层管理人员不会对此有很大的抵触情绪，主管领导也能够相应的支持与此同时也给相关工作人员带来了便利。 2.1.2 技术上的可行性 根据系统目标需求分析得结果来看，不需要通过购买专业软件，仅采用PB为开发工具，选择PB语言和其自身所带的ASA数据库就可以解决相关的问题，从而保证系统功能的实现。2.1.3 经济上的可行性在客户进行报刊订阅过程中，经常会遇到期刊信息受到限制，客户只能通过上门咨询、电话沟通等方式进行各种信息的获取，受一定的时间与物理空间的局限并且成本较高。而本系统可以帮助人们认识到网络在

9、现代社会生活中的重要作用，以少量的时间和资金建立邮政门户网站来方便客户的订阅，以此来是客户的经济活动变得更灵活、更主动也更便捷。2.3 业务流程分析网站浏览者必须先进行注册，才能够以网站用户的身份进入网站预定展示的期刊，还可以根据自己的需求查找需要订购的类型的期刊；管理员和已注册的用户可以直接进入网站预订。浏览者注册的信息提交到网站后台，由网站管理员进行管理。网站为用户提供图书查询，图书预订的功能记录客户的预定选择，从而形成订单信息。在系统后台，管理员除了管理用户信息，供应商信息以及期刊信息外，还要及时的对期刊信息进行统计方便对图书进行发放和购入。主要业务流程如图2-1所示：图2-1系统业务流

10、程图2.4 数据流程图2-2系统数据流程图2.5 数据字典表2-1 数据元素描述（部分）编号标识符含义类型长度特殊说明YS01khbh客户编号char10YS02pwd客户密码char10YS03khmc客户名称char60YS04lxdh联系电话char20YS05lxdz联系地址char60YS06yzbm邮政编码char6YS07qkdm期刊代码char5YS08qkbh期刊编号char10YS09qkmc期刊名称char30YS10lxdm类型代码char10YS11lxmc类型名称char20YS12dmmc代码名称char20YS13dybh订阅编号char10YS14dysl订阅

11、数量char5YS15dj单价floatYS16dyrq订阅日期data82011-7-5YS17rkbh入库编号char10YS18rksl入库数量char10YS19rkrq入库日期data82011-7-5YS20ffbh发放编号char10YS21ffsl发放数量char5YS22ffrq发放日期data82011-7-5YS23fzr负责人char10表2-2 数据流描述（部分）编号名称来源去向组成高峰流量平均流量最低流量L01期刊信息邮政浏览者期刊编号、期刊代码、期刊名称、价格60条/天35条/天10条/天L02类型信息邮政浏览者类型代码、类型名称60条/天35条/天10条/天L0

12、2客户信息浏览者后台管理处客户编号、客户代码、联系地址、邮政编码、联系电话240条/天140条/天40条/天L03订购信息管理员客户订阅编号、订阅数量、订阅日期900条/天700条/天500条/天表2-3 数据存储描述（部分）编号名称组成关键字存储大小CC01期刊列表期刊代码、期刊编号 、期刊名称、期刊单价、发布日期、代码名称期刊编号4000条/月CC02类型列表类型代码、类型名称类型代码4000条/月CC03客户列表客户编号、客户名称、联系地址、联系电话、邮政编码客户编号1000条/月CC04订阅列表订阅编号、商品编号、订阅数量、订阅日期、用户名称、联系电话、送货地址、邮政编码、负责人订阅编

13、号4000条/月CC05库存列表入库编号、入库数量、入库日期、发放编号、发放数量、发放日期、负责人入库编号发放编号500条/月表2-4 数据结构描述（部分）编号SJJG01名称期刊标识组成客户编号+期刊名称类型编号订阅数量单价相关数据流客户信息、期刊信息、类型信息、订阅信息相关处理逻辑客户管理、期刊管理、期刊查询、订购管理表2-5 处理逻辑描述（部分）编号名称输入处理输出LJ01期刊管理期刊信息根据期刊基本信息，存入后台数据库，当客户注册登录后选择主菜单项目查找期刊信息期刊列表LJ02期刊查询查询要求根据客户选择的期刊种类或客户输入的商品相关信息查找符合客户订阅的期刊查询结果LJ03客户查询查

14、询要求管理员进入主页面可以查看各个客户的信息查询结果LJ04客户注册客户信息将客户输入的基本信息存入后台数据库用户列表LJ05客户管理用户列表查看客户的基本信息，管理员可以修改客户信息，客户通过修改密码可以修改客户信息修改后的用户列表LJ06订购管理订购信息根据客户预订获得的信息，制订成订单，按客户需求查看期刊库存，管理员确认后发放书刊订阅列表LJ07管理员管理库存信息根据期刊基本信息，存入后台数据库，仅供管理员查看，方便期刊的入库和发放库存列表3 系统设计3.1平台设计表3-1 系统平台设计系统平台详细设计硬件平台服务器：PIIII及以上CPU，512M内存，硬盘20G, 10/100M网络

15、客户端：IE7.0及以上软件平台操作系统：Windows XP开发工具：PowerBuilder 9.0数据库：Adaptive Server Anywhere3.2 软件总体结构设计3.2.1功能结构图图3-1邮局订阅管理系统功能结构图3.2.2 模块说明书表3-2 “系统管理”模块说明书模块标识01所属子系统模块名称系统管理主要功能实现客户和管理员的登录，以及新客户的注册调用模块客户登录、新客户注册、管理员登录输 入客户信息或管理员信息输 出客户操作界面或管理员操作界面相关数据表客户表和管理员表主要内部变量客户编号、管理员名称、密码 、所处状态算 法1）通过全局变量记录登录的客户或管理员，

16、在“修改资料”和“查询资料中”中引用该变量，修改相关的资料。2）通过所处状态，允许或拒绝客户和管理员的进入 表3-3 “客户管理”模块说明书模块标识02所属子系统模块名称客户管理主要功能实现客户个人信息管理、个人订阅管理、报刊预定管理等调用模块密码修改、个人订阅查询、个人订阅信息打印、报刊出售查询以及报刊预定输 入个人信息、报刊预定信息输 出个人修改信息、相关报刊信息、预定信息、订阅信息表格相关数据表客户表、订阅表主要内部变量期刊代码，期刊价格，期刊数量算 法1） 通过个人信息管理，修改登录密码2） 根据登录的客户编号查询个人订阅信息3） 查询销售期刊种类，并进行报刊预定4） 可以打印报刊订阅

17、表格作为凭证表3-4 “期刊数据管理”模块说明书模块标识03所属子系统模块名称期刊数据管理主要功能实现期刊代码、期刊类型、期刊数据的管理调用模块查询功能、添加功能、删除功能、修改功能输 入期刊代码信息、期刊类型信息、期刊数据信息输 出期刊修改信息、期刊类型信息、期刊数据信息以及期刊添加信息、期刊类型信息、期刊数据信息相关数据表期刊类型表、期刊代码表、期刊数据表主要内部变量类型代码、期刊代码、期刊编号算 法通过查询期刊代码、期刊类型和期刊数据的信息，对他们进行、添加、删除、修改等操作表3-5 “期刊订阅管理”模块说明书模块标识04所属子系统模块名称期刊订阅管理主要功能实现对客户报刊订阅的管理调用

18、模块查询功能、添加功能、删除功能、修改功能、打印功能输 入客户订阅报刊的信息输 出期刊订阅修改信息、期刊订阅添加信息相关数据表订阅表主要内部变量订阅编号、期刊编号、订阅数量、定价、订阅日期算 法1） 通过查询期刊的订阅信息，对它们进行添加、删除、修改以及打印等操作2） 能够随时跟踪客户订阅信息，及时统计期刊订阅量，对期刊进行发放和订购表3-6 “期刊入库管理”模块说明书模块标识05所属子系统模块名称期刊入库管理主要功能实现对期刊入库的管理调用模块查询功能、添加功能、删除功能、修改功能、打印功能输 入期刊入库的各种相关信息输 出期刊入库的修改信息、期刊的添加信息相关数据表入库表主要内部变量入库编

19、号、期刊编号、入库数量、入库日期、负责人算 法1）通过查询期刊的入库信息，对它们进行添加、删除、修改以及打印等操作2）能够随时跟踪期刊入库信息，及时发放期刊给客户表3-7“期刊发放管理”模块说明书模块标识06所属子系统模块名称期刊发放管理主要功能实现对期刊发放的管理调用模块查询功能、添加功能、删除功能、修改功能、打印功能输 入期刊发放的各种相关信息输 出期刊发放的修改信息、期刊的添加信息相关数据表发放表主要内部变量发放编号、期刊编号、发放数量、发放日期、负责人算 法1）通过查询期刊的发放信息，对它们进行添加、删除、修改以及打印等操作2）能够随时跟踪期刊发放给客户的信息，预算库房中各种期刊的剩余

20、量，及时订购期刊，保证不能缺货3.3 代码设计 本系统中对期刊进行了代码设计，为使期刊编号实现系统自动编码，编码采用特征码加顺序码，层次码表示国际标准书号的前缀，顺序码则表示期刊订购时形成的先后次序。代码模型如图3-2所示：图3-2期刊编号的代码模型3.4 输入输出设计3.4.1 输入设计在一个处理管理领域的信息系统中输入输出界面很重要，一个好的输入设计能为今后系统带来很多方便，可以为用户和系统双方带来良好的工作环境，从而保证向系统输入正确的数据。本系统的输入设计具有一下优点：1） 输入操作简单，提示简单明了：设置容忍用户操作上的失误，并允许用户改正的机制；给出运行状态提示，防止错误积累；检测

21、用户错误，屏蔽输入错误。2） 在数据输入过程中有效得减少了操作员的击键次数，采用了交互式的操作过程提高输入速度。3） 输入界面简单明了，色彩适中，风格统一，使操作员缩短培训与学习的时间，能尽快掌握系统使用的方法。3.4.2 输出设计输入信息只有根据输出要求才能确定，输出设计的目的是为了正确及时地反映和组成管理员、客户之间的有用信息。一个好的输出设计可以为管理者提供简捷、明了、有效、实用的管理和控制信息。本系统的输出内容有：客户资料、期刊订阅信息、期刊入库信息、期刊发放信息；输出格式：表格、文件；输出设备：打印机；输出介质：普通白纸。3.5 数据库设计数据库在一个信息管理系统中占有非常重要的地位

22、，数据库结构设计的好坏将直接决定对应用系统的效率以及实现的效果的影响。合理的数据库结构设计可以提高数据存储的效率，保证数据的完整和一致。同时，合理的数据库也有利与应用系统程序的实现。3.5.1 E-R图在充分需求分析的基础上，经过逐步抽象、概括、分析、充分研讨，可画出如下反应邮局订阅管理系统数据的全局E-R图，如图3-3所示：图3-3系统全局E-R图其中重要实体的E-R图如下：图3-4客户实体E-R图图3-5期刊实体E-R图图3-6订阅实体E-R图3.5.2数据表设计本系统的数据库设计是对分析和创建保存管理系统数据的数据库结构进行设计。它包含了一下数据信息：客户数据：包含的数据项有系统用户名、

23、登录密码等。管理员数据：包含的数据项有系统用户名、登录密码等。期刊数据：包含的数据项有期刊编号、期刊名称、类型名称、代码名称、定价、出版社、联系电话、联系人、联系地址、邮政编码等。期刊代码数据：包含的数据项有期刊代码、期刊名称等。类型代码数据：包含的数据项有类型代码、类型名称等。客户数据：包含的数据项有客户编号、客户名称、联系地址、联系电话、邮政编码等。订阅数据：包含的数据项有客户编号、客户名称、类型名称、代码名称、定价、出版社、联系电话、联系人、联系地址、邮政编码、订阅日期等。入库数据：包含的数据项有入库编号、期刊编号、入库数量、入库日期、负责人等。发放数据：包含的数据项有发放编号、期刊编号

24、、客户编号、发放数量、发放日期、负责人等。使用数据库的名称为“paper.db”，他的各个数据表结构依次如下：表3-8 t_user(管理员表) 表3-9 t_khb（客户表）表3-10 t_qkb(期刊表)表3-11 td_qkdm(期刊代码表)表3-12 td_lxdm(类型代码表)表3-13 t_dyb(订阅表)表3-14 t_rkb(入库表)表3-15 t_ffb(发放表)3.6 界面设计用户界面是系统系统与用户之间的借口，也是控制和选择信息输入输出的主要途径。本系统的界面设计具有如下特点：界面设计友好、简单、便捷、实用、易于操作界面图片色彩适中、风格统一操作提示和要点同时显示在屏幕旁

25、边不同类型的用户拥有不同的权限，区分明确，易于管理使用用户能理解的简单语言，而非技术的语言用户一次就能进入系统，选择目标菜单项在两个邻近的功能菜单之间。使用深浅不同的对比色调退出简单方便，能够随时转移界面3.6.1 系统首页界面本系统的首页简单明了，直接显示管理员和客户的入口，对不同用户进行权限设置，以保证用户明确登录身份，进入有效的操作界面，从而减少没必要的重复和无用操作。系统首页界面由窗口w_load实现，界面如图3-8所示： 图3-8系统首页界面3.6.2 客户登录界面客户点击“客户请进入”按钮后必须经过系统验证即客户登录才能使用该系统的各个功能模块。客户登录由窗口w_login1实现，

26、为确保信息的安全，密码输入的数据显示由黑点替代，运行程序出现如图3-9所示的界面:图3-9客户登录界面3.6.3 新客户注册界面若客户没有登录帐号，可以点击“新客户注册”按钮后进行客户注册才能登录帐号使用该系统的各个功能模块。新客户注册由窗口w_regester实现，为确保信息的安全，密码输入的数据显示由黑点替代，运行程序出现如图3-10所示的界面：图3-10新客户注册界面3.6.4 客户管理界面客户成功进行登录验证后，进入客户管理界面，由窗口w_menu1实现。能够选择各种功能操作，包括密码修改、订阅查询、报刊预定和安全退出等功能。运行程序出现如图3-11所示的界面：图3-11客户管理界面3

27、.6.5 客户密码修改界面客户进入管理界面后，点击“密码修改”按钮，出现密码修改界面，它由窗口w_modipasswd实现。为确保信息的安全性，密码输入的数据显示由黑点替代。因此，可以设计如图3-12所示的密码修改界面：图3-12密码修改界面3.6.6 客户订阅查询界面客户进入管理界面后，点击“订阅查询”按钮，出现个人订阅查询界面，它由窗口w_grdy实现。客户可以很容易查询自己的期刊订阅情况，并能根据情况打印订阅表格。因此，可以设计如图3-13所示的订阅查询界面(图为客户111的期刊订阅情况)：图3-13个人订阅查询界面3.6.7 客户报刊预定界面客户进入管理界面后，点击“报刊预定”按钮，出

28、现报刊预定界面，它由窗口w_gryd实现。客户可以按期刊名称查询需要预定的期刊了解相关信息，然后填写右边的表单完成预定。因此，可以设计如图3-14所示的报刊预定界面：图3-14报刊预定界面3.6.8 管理员登录界面管理员点击“管理员请进入”按钮后必须经过系统验证即管理员登录才能使用该系统的各个功能模块。管理员登录由窗口w_login实现，为确保信息的安全，密码输入的数据显示由黑点替代，运行程序出现如图3-15所示的界面：图3-15管理员登录界面3.6.9 管理员管理界面管理员成功进行登录验证后，进入管理员管理界面，由窗口w_main实现。能够选择各种功能操作，包括管理员数据管理、期刊数据管理、

29、客户数据管理订阅数据管理、期刊入库管理、期刊发放管理和安全退出等功能。运行程序出现如图3-16所示的界面：图3-16管理员管理界面3.6.10 管理员数据管理界面选择“管理员数据管理”“修改密码”菜单命令，打开“管理员密码修改”窗口，它由窗口w_modipasswd1实现。为确保信息的安全性，密码输入的数据显示由黑点替代。因此，可以设计如图3-17所示的密码修改界面：图3-17密码修改界面选择“管理员数据管理”“管理员信息”菜单命令，打开“管理员信息”窗口它由窗口w_usergl实现，管理员信息功能模块主要是实现管理员用户的查询、添加、删除、修改等功能。运行程序出现如图3-18所示的界面：图3

30、-18管理员信息界面3.6.11 期刊数据管理界面选择“期刊数据管理”“期刊代码”菜单命令，打开“期刊代码”窗口它由w_qkdm窗口实现。期刊代码管理功能是将期刊分为各种期刊代码，便于对期刊按代码进行分类。也可以对其进行增、删、改、查等操作。运行程序出现如图3-19所示的界面：图3-19期刊代码界面选择“期刊数据管理”“期刊类型”菜单命令，打开“期刊类型”窗口，它由窗口w_lxdm实现。期刊类型管理功能是将期刊分为各种类型，便于对期刊按类型进行分类，也可以对其进行增、删、改、查等操作。运行程序出现如图3-20所示的界面：图3-120密码修改界面选择“期刊数据管理”“期刊数据”菜单命令，打开“期

31、刊数据”窗口，它由窗口w_qkb实现。期刊数据管理功能是将所有的期刊数据录入到期刊数据表中。实现数据的添加、修改、删除、查询等功能，运行程序出现如图3-21所示的界面：图3-21密码修改界面3.6.12 客户数据管理界面选择“客户数据管理”“客户信息”菜单命令，打开“客户信息管理”窗口，它由窗口w_khb实现。客户资料管理功能是把邮局订阅期刊的客户资料都保存到客户资料表中，是便于订阅管理和期刊发放的重要资料。运行程序出现如图3-22所示的界面：图3-22客户信息管理界面3.6.13 订阅数据管理界面选择“订阅数据管理”“订阅管理”菜单命令，打开“订阅管理”窗口，它由窗口w_dyb实现。订阅管理

32、的功能是根据客户订阅信息，输入到订阅数据表中，减少数据输入的复杂度，提高信息录入效率，运行程序出现如图3-23所示的界面(图为点击“添加”按钮的界面)：图3-23订阅管理界面3.6.14 期刊入库管理界面选择“期刊入库管理”“期刊入库”菜单命令，打开“期刊入库”窗口，它由w_rkgl窗口实现.期刊入库管理功能是根据客户订阅信息汇总，将收到的期刊信息输入到库存数据表中，减少数据输入的复杂度，提高信息录入效率，运行程序出现如图3-24所示的界面(图为点击“添加”按钮的界面)：图3-24期刊入库界面3.6.15 期刊发放管理界面选择“期刊发放管理”“期刊发放”菜单命令，打开“期刊发放”窗口，它由w_

33、ffgl窗口实现。期刊发放管理功能是根据客户订阅信息，将库存中的期刊输入到发放库存数据表中，减少数据输入的复杂度，提高信息录入效率，运行程序出现如图3-25所示的界面(图为点击“添加”按钮的界面)：图3-25期刊发放界面3.6.16 数据备份管理界面选择“数据备份管理”“订阅数据备份”菜单命令，打开“订阅数据备份”窗口，它由窗口w_pipe1实现。订阅数据备份功能是将订阅信息备份，以防止数据的流失。运行程序出现如图3-26所示的界面(图为点击“开始”按钮的界面)：图3-26订阅数据备份界面选择“数据备份管理”“客户数据备份”菜单命令，打开“客户数据备份”窗口，它由窗口w_pipe2实现。客户数

34、据备份功能是将客户信息备份，以防止数据的流失。运行程序出现如图3-27所示的界面(图为点击“开始”按钮的界面)：图3-27订阅数据备份界面3.7系统安全设计本系统的安全设计主要是针对系统的数据安全去考虑的。包含以下几个方面的安全设计：对系统用户设计访问权限。如管理员只能访问管理员模块的数据信息，客户只能访问客户模块的信息，互不干扰，从而保证数据的安全。个模块功能明确清楚，能防止数据的混乱与错误。提供数据备份功能，系统遭到严重危害后，可调用备份数据来恢复重要数据信息。4 系统实施4.1 数据库的实施本系统的工作空间为wy，创建的Application为wy,组成库名wy.pbl以及目标文件名wy

35、.pbt。在工作空间目录窗口，双击应用程序图标wy，打开应用程序的脚本窗口的open事件，输入脚本如下：/ Profile PaperSQLCA.DBMS = "ODBC"SQLCA.AutoCommit = FalseSQLCA.DBParm = "Connectstring='DSN=paper'"connect using sqlca;if sqlca.sqlcode<>0 thenmessagebox("提示","数据库连接失败!");end ifopen(w_load)pape

36、r表示该数据库连接的名字；SQLCA.DBMS = "ODBC"表示数据连接的借口是ODBC；如果数据库连接出错，系统会提示出错信息，通过正确的连接，系统才能正常使用。4.2 系统程序的实现4.2.1 系统登录模块的编写（分为管理员登录和客户登录） （1）制作管理员登录页面w_login在“确定”按钮输入如下：string pwd,username SELECT t_user.username,t_user.pwd INTO :username,:pwd FROM t_user WHERE t_user.username = :sle_1.text;if sle_1.tex

37、t="" or sle_2.text="" then messagebox("错误！","用户名或密码不能为空！")else if username=sle_1.text and pwd=sle_2.text then open(w_main) close(w_login) else messagebox("错误！","用户名或密码错误，请重新输入！") sle_1.text="" sle_2.text="" end ifend if

38、“重置”按钮代码如下：sle_1.text=""sle_2.text="" “关闭”按钮代码如下：open(w_load)close(w_login) （2）制作客户登录页面w_login1在“确定”按钮输入如下：string khbh,mima SELECT t_khb.khbh,t_khb.mima INTO :khbh,:mima FROM t_khb WHERE t_khb.khbh = :sle_1.text;if sle_1.text="" or sle_2.text="" then messagebo

39、x("错误！","用户名或密码不能为空！")else if khbh=sle_1.text and mima=sle_2.text then open(w_menu1) close(w_login1) else messagebox("错误！","用户名或密码错误，请重新输入！")sle_1.text=""sle_2.text=""end ifend if“重置”按钮代码如下：sle_1.text=""sle_2.text=""如果用户

40、还未注册，则点击新用户注册按钮 “新用户注册”按钮代码如下：open(w_regester)close(w_login1)4.2.2 系统注册模块的编写（新客户注册） 制作新用户注册界面w_register“确定”按钮代码如下：string khbh,khmc,lxdz,lxdh,yzbm,mimaint iselect count(*)into :ifrom t_khb;i=i+1khbh =trim(string(sle_1.text)khmc=trim(string(sle_2.text)lxdz=trim(string(sle_3.text)lxdh=trim(string(sle_4

41、.text)yzbm=trim(string(sle_5.text)mima= string(sle_6.text)insert into t_khbvalues(:khbh,:khmc,:lxdz,:lxdh,:yzbm,:mima);messagebox("成功!","欢迎新客户注册!")“重置”按钮代码如下：sle_1.text=""sle_2.text=""sle_3.text=""sle_4.text=""sle_5.text=""sle_6.t

42、ext=""“退出”按钮代码如下：close(w_regester)open(w_login1)注册成功后可使用注册信息在登陆界面中登录，若用户或管理员考虑安全或其他方面问题，可对密码进行修改“确认修改”按钮代码如下：string i,j,pwd,newpwd1,newpwd2pwd=trim(sle_2.text)newpwd1=trim(sle_3.text)newpwd2=trim(sle_4.text)if pwd="" thenmessagebox("提示","您没有输入旧密码,请输入!")sle_1.s

43、etfocus()returnend if if newpwd1="" then messagebox("提示","您没有输入新密码,请输入!") sle_3.setfocus() return end ifj=string(sle_1.text)select t_user.pwdinto :ifrom t_userwhere username=:j; if i <> pwd then messagebox("提示","您输入的旧密码不正确,请重新输入!") sle_2.setfoc

44、us()returnend ifif newpwd1 <> newpwd2 thenmessagebox("提示","您输入的两次新密码不一致,请重新输 入!")sle_3.setfocus()returnend ifUPDATE t_userSET pwd= :newpwd1 WHERE username= :sle_1.text;if sqlca.sqlcode=0 thenmessagebox("提示","密码修改成功!")close(w_modipasswd1)elsemessagebox(&q

45、uot;提示","密码修改失败!")end if “重置”按钮代码如下：sle_1.text=""sle_2.text=""sle_3.text=""sle_4.text=""“关闭”按钮代码如下：close(w_modipasswd1)open(w_main)4.2.3 系统管理模块的编写管理功能界面的主要代码如下（包括：管理员信息管理、期刊代码管理、期刊类型管理、客户资料管理）：“第一条”代码如下：dw_1.scrolltorow(1)cb_2.enabled=falsecb_3.

46、enabled=truecb_4.enabled=truecb_1.enabled=false“前一条”代码如下：integer row_currentrow_current=dw_1.scrollpriorrow()if row_current=1 then cb_1.enabled=true cb_2.enabled=true cb_3.enabled=false cb_4.enabled=false else cb_3.enabled=true cb_4.enabled=trueend if“后一条”代码如下：integer row_current,row_countrow_curren

47、t=dw_1.scrollnextrow()row_count=dw_1.rowcount()if row_current=row_count then cb_1.enabled=falsecb_2.enabled=false cb_3.enabled=true cb_4.enabled=trueelse cb_1.enabled=true cb_2.enabled=trueend if“最后一条”代码如下：integer row_countrow_count=dw_1.rowcount()dw_1.scrolltorow(row_count)cb_1.enabled=truecb_2.ena

48、bled=truecb_3.enabled=falsecb_4.enabled=false“添加”代码如下：integer my_rownumbermy_rownumber=dw_1.insertrow(0)dw_1.setfocus()dw_1.scrolltorow(my_rownumber)dw_1.setcolumn(1)“删除”代码如下：integer row_currentrow_current=dw_1.getrow()dw_1.deleterow(row_current)“保存”代码如下：if update(dw_1,true,false)=1 thendw_1.resetup

49、date()messagebox("提示","数据保存成功!")commit;elserollback;messagebox("提示","数据保存失败!")end if“关闭”代码如下：close(w_usergl)open(w_main)其中用于管理员对期刊进行了解的期刊订阅管理和期刊发放管理以及期刊管理的主要代码如下："添加” 按钮代码如下:integer my_rownumber,c_row1,c_row2,c_row3,djstring qkbh,khbhmy_rownumber=dw_1.ins

50、ertrow(0)dw_1.setfocus()dw_1.scrolltorow(my_rownumber)c_row1=dw_2.getrow();qkbh=getitemstring(dw_2,c_row1,1)dj=getitemnumber(dw_2,c_row1,3)c_row2=dw_3.getrow();khbh=getitemstring(dw_3,c_row2,1)c_row3=dw_1.getrow();dw_1.setitem(c_row3,2,qkbh)dw_1.setitem(c_row3,3,khbh)dw_1.setitem(c_row3,5,dj)"删

51、除”按钮代码如下:integer row_currentrow_current=dw_1.getrow()dw_1.deleterow(row_current)"保存” 代码如下:if update(dw_1,true,false)=1 thendw_1.resetupdate()messagebox("提示","数据保存成功!")commit;elserollback;messagebox("提示","数据保存失败!")end if“打印”按钮代码如下：dw_1.print()"退出”按钮代码

52、如下:close(w_dygl)open(w_main)4.2.4 系统查询模块的编写点击个人订阅查询就会出现相关信息，还可以将所查询的信息打印“打印”按钮代码如下：dw_1.print()“退出”按钮代码如下：close(w_grdy)"查询” 代码如下:string format1,namename=sle_1.textformat1="qkmc='"+name+"'"dw_1.setfilter(format1)dw_1.filter()"浏览全部” 代码如下:dw_1.SetTransObject(SQLCA)

53、string null_strSetNull(null_str)dw_1.SetFilter("")dw_1.Filter()dw_1.retrieve()"添加”按钮代码如下:integer my_rownumbermy_rownumber=dw_1.insertrow(0)dw_1.setfocus()dw_1.scrolltorow(my_rownumber)dw_1.setcolumn(1)"删除” 代码如下:integer row_currentrow_current=dw_1.getrow()dw_1.deleterow(row_curren

54、t)"保存” 代码如下:if update(dw_1,true,false)=1 thendw_1.resetupdate()messagebox("提示","数据保存成功!")commit;elserollback;messagebox("提示","数据保存失败!")end if"退出” 代码如下:close(w_qkb)open(w_main)4.2.5 订阅模块的编写输入想要订阅期刊的信息或是点击“浏览全部”按钮，都都可以找到自己想要订阅的期刊代码如下：“查询”按钮代码如下:string

55、format1,namename=sle_1.textformat1="qkmc='"+name+"'"dw_1.setfilter(format1)dw_1.filter()“浏览全部”按钮代码如下:dw_1.SetTransObject(SQLCA)string null_strSetNull(null_str)dw_1.SetFilter("")dw_1.Filter()dw_1.retrieve()若选定了自己要订阅的期刊，则在右边的框框中输入该期刊的信息，点击“预订”按钮即可“预订”按钮代码如下：string dybh,khbh,