|
4.4.3话费管理表单的设计 1.话费存入 内容来自论文无忧网 www.paper51.com 该表单是为用户需要存入一定的话费而设计的，用户可以进行状态查询，当用户的存款金额不足时，管理员可以输入用户的手机号码为用户存入一定的话费。 http://www.paper51.com
copyright paper51.com 图4-9话费存入表单 copyright paper51.com 2.话费清单录入 paper51.com
话费清单录入的主要目的是要录入话费，其中有两种录入方式，一种是键盘录入，另一种是文件导入，同时还有备份的功能。 内容来自www.paper51.com (1)键盘录入：管理员可以通过键盘录入来添加或删除用户的记录。 paper51.com copyright paper51.com 图4-10键盘输入表单 copyright paper51.com (2)文件导入：该表单是将备份好的数据导入数据库之中，将原来的记录覆盖掉。 copyright paper51.com (3)备份 内容来自论文无忧网 www.paper51.com 此表单是将话费清单备份到后缀名为.dhzf的文件之中。其中表单有两个按钮组成，一个是取消按钮，一个是备份按钮。表单中表格的数据是要备份的数据，如果确认备份，点击备份按钮即可。 http://www.paper51.com
paper51.com 图4-11备份表单 内容来自论文无忧网 www.paper51.com 4.4.4话费清单查询 paper51.com 1.话费状态 paper51.com 该表单由一个文本框text1，一个命令按钮command1和一个表格grid1组成。在查询过程中，先在文本框中输入手机号码，然后点击“查询”按钮，查询的结果就会显示在表格中，若要退出查询，可以直接点击关闭。其中，手机号码保证查询条件的唯一性。 内容来自www.paper51.com 内容来自www.paper51.com 图4-12当前话费状态表单 内容来自论文无忧网 www.paper51.com
2.月话费帐单查询 内容来自www.paper51.com
该表单由两个文本框text1,text2，一个命令按钮command1和一个表格grid1组成。在查询过程中，必须首先填入手机号码和需要查询的月份，然后点击查询按钮。此时查询结果会显示在表格中，如果没有填入完整信息，则会出现提示对话框“请把信息输全！！！”，查询显示的是用户在某个月份的总的话费帐单。 内容来自www.paper51.com
copyright paper51.com 图4-13月话费帐单查询 内容来自论文无忧网 www.paper51.com
3.月话费清单查询 http://www.paper51.com 该表单由一个文本框text1，一个命令按钮command1和一个表格grid1组成。用户在text1中输入手机号码后，点击查询按钮，表格中会详细显示用户在该月份的所有话费记录。 http://www.paper51.com http://www.paper51.com 图4-14月话费清单查询 paper51.com
5系统实现 http://www.paper51.com
编码阶段的主要任务是将详细设计确定的具体功能用程序设计语言描述出来，生成目标系统对应的源程序。在编码实现系统功能的过程中，应确保程序编写正确且理解容易，结构清晰明了。现在设计主要功能模块的关键代码。 http://www.paper51.com 5.1系统登录 内容来自论文无忧网 www.paper51.com 若每一个进入计算机的人都能够对系统进行操作,就可能有意或无意的破坏数据,因此，在进入系统之前要设置密码输入功能。在进入系统时，首先进入登录表单，在登录密码输入窗口选择姓名和用户密码，只有姓名和密码都正确时,才能进入系统。为了防止恶意用户登陆系统，系统设置了一个循环变量，如密码连续错了3次，系统将强行退出。另外，为了加强管理，提高安全性，在系统中定义了一个全局变量qx,用户登录时的权限就在qx 中，此时系统就可以对用户实行级别控制。 内容来自www.paper51.com
在Form表单的“确定”按钮中输入如下代码： copyright paper51.com if len(thisform.text2.value)<>0 andlen(thisform.text1.value)<>0 内容来自论文无忧网 www.paper51.com
pass1=alltrim(thisform.text2.value) 内容来自论文无忧网 www.paper51.com
ifpass1="管理员" andalltrim(thisform.text1.value)="hjm" 内容来自www.paper51.com
qx=.f. http://www.paper51.com do"main.mpr" http://www.paper51.com thisform.release 内容来自www.paper51.com return copyright paper51.com
endif 内容来自论文无忧网 www.paper51.com cs=cs+1 http://www.paper51.com
SELECT*; http://www.paper51.com FROM 帐户管理!帐户; 内容来自论文无忧网 www.paper51.com WHERE 帐户.手机号码 =pass1; copyright paper51.com INTOCURSOR mima查询 paper51.com pass2=alltrim(mima查询.手机密码) 内容来自论文无忧网 www.paper51.com mypass2=alltrim(thisform.text1.value) 内容来自www.paper51.com if(pass2==mypass2)and cs<=3 paper51.com open database mypath+"帐户管理" &&打开数据 内容来自论文无忧网 www.paper51.com qx=.t. 内容来自论文无忧网 www.paper51.com
do "main.mpr" copyright paper51.com thisform.release http://www.paper51.com else http://www.paper51.com if cs<3 内容来自www.paper51.com
messagebox("输入密码错误,请重新输入","提示窗口") copyright paper51.com thisform.text1.value="" 内容来自论文无忧网 www.paper51.com else http://www.paper51.com
messagebox("输入次数超过三次","警告窗口") 内容来自论文无忧网 www.paper51.com
thisform.release 内容来自论文无忧网 www.paper51.com
clear events 内容来自论文无忧网 www.paper51.com endif http://www.paper51.com endif 内容来自www.paper51.com SETEXACT OFF copyright paper51.com else copyright paper51.com
messagebox("请选择用户名和填入密码",0+48,"提示窗口") 内容来自www.paper51.com endif 内容来自论文无忧网 www.paper51.com 5.2帐户管理 copyright paper51.com 在帐户查询表单中，为了防止操作人员的无意操作带来的不可预计的后果我们把表的只读属性改为真、文本框和编辑框的属性enabled=.f.，使用户不能修改。用户需要修改其中的内容需要点击编辑按钮，使文本框和编辑框的属性enabled=.t.就可以修改其中的内容了，此表单只有管理员才可以进入进行操作。 内容来自www.paper51.com 其中查询按钮的代码为： paper51.com use 帐户 copyright paper51.com
if len(alltrim(thisform.txt手机号码.value))<>0 copyright paper51.com SELECT*; 内容来自www.paper51.com FROM 帐户管理!帐户; paper51.com WHERE 帐户.手机号码 = alltrim(thisform.txt手机号码.value); copyright paper51.com INTO CURSOR 查询帐户 内容来自www.paper51.com thisform.grd帐户.recordsource="查询帐户" paper51.com thisform.refresh copyright paper51.com else 内容来自www.paper51.com messagebox("请输入手机号码","提示窗口") copyright paper51.com endif 内容来自www.paper51.com |