一步一步跟我学写易程序二今天我们在上一次所书写程序的基础上继续加入新功能:密码校验,即只有存在该密码的用户才能进入系统,并且进入的用户将被记录到系统日志数据库中去。请先参阅《一步一步跟我学写易程序一》。一、数据库部分:根据本程序的需要,需要增加两个数据库:“密码”和“系统日志”。密码数据库的字段列表如下:1、密码类型为“文本型”,字段长度为10,本字段用作记录用户密码;2、密码所有者类型为“文本型”,字段长度为10,本字段用作记录用户名。数据库建立完毕后保存名称为“密码”。系统日志数据库的字段列表如下:3、进入者类型为“文本型”,字段长度为10,本字段用作记录进入用户的名称;4、进入时间类型为“日期时间型”,本字段用作记录用户进入系统的时间。数据库建立完毕后保存名称为“系统日志”。数据库创建完毕后将产生两个文件:“密码.edb”、“系统日志.edb”。二、输入初始数据:为了演示程序功能,我们使用“数据库->记录编辑器”菜单功能打开所创建的“密码”数据库,并加入一条初始记录:密码:“123”密码所有者:“吴涛”三、编写处理程序:1、界面部分:本程序无新增的界面部分。2、代码部分:程序在“__启动窗口_创建完毕”子程序前面增加了一部分代码以完成新增功能:子程序:__启动窗口_创建完毕局部容器:密码数据类型:文本型局部容器:进入者数据类型:文本型如果真(输入框(“密码校验”,“请输入密码:”,,密码,)=假)*备注:可以自己设计一个密码输入窗体代替输入框结束()*备注:如果不输入密码,则直接退出.如果真结束如果(打开(“密码”,,,,,,)=真且查找(读(“密码”)=密码))进入者=读(“密码所有者”)如果真(打开(“系统日志”,,,,,,))加记录(进入者,取现行时间())*备注:记录当前进入者和进入时间如果真结束全部关闭()*备注:关闭可能已经打开的所有数据库否则信息框(“密码校验失败!”,0,“错误”)结束()如果结束……后面为原有代码程序分析:在启动窗口创建完毕调用“__启动窗口_创建完毕”时,程序打开一个输入框请求用户输入密码,如果用户没有输入密码就退出输入框,程序直接结束,否则程序打开“密码”数据库并在该库中查找对应密码,如果没有找到,显示密码校验失败并退出程序。如果找到,则将用户进入信息记录到系统日志数据库中。