vfp 数据库系统开发应用2.ppt

第十三章;13.1数据库应用系统开发的基本步骤 13.2 “学生信息管理系统”的开发简介 ;13.1 数据库应用系统的开发步骤;3、系统实现;5、系统运行维护;13.2.1需求分析 ;收集数据; 13.2.2系统设计 ;;文件类型;13.2.3 系统实现 ;主程序文件的内容如下： clear all close all set default to e:\学生信息管理 设置默认路径 set database e:\学生信息管理\学生信息.dbc 打开数据库 set talk off 关闭对话 set escape off 关闭Esc键 set sysmenu off 关闭系统菜单 set exclusive on 将输出结果发送到Visual FoxPro窗口或当前活动窗口中 set delete off 显示加了删除标记的记录 set safety off 在改写已有文件时不显示 对话框 _screen.windowstate=2 设置窗体状态最大化 _screen.caption=学生信息管理系统 设置窗体标题 do form login.scx 打开登录窗口 read events 建立应用程序的事件循环 return ;3. 创建系统菜单;菜单名称;4. 系统功能实现 ;(1)设计系统登录;对象名;表单的Init事件代码： public n n=1 thisform.text3.value=date() 表单的“登录”按钮的Click事件代码如下： if (n2) messagebox(密码输入超过3次，不能使用本系统！) thisform.release else use e:\学生信息管理\学生信息数据\管理员.dbf temp1=alltrim(thisform.text1.value) temp2=alltrim(thisform.text2.value) locate for alltrim(姓名)==temp1 .and.alltrim(密码)==temp2 if found() release thisform do form main else messagebox(密码或用户名输入错误码，重新输入！) thisform.text1.value= thisform.text2.value= n=n+1 thisform.text1.setfocus endif endif 表单的“退出”按钮的Click事件代码如下： Thisform.release;13.2.4 应用系统的连编 ;图13-12 “数据”选项卡;⑶ 添加表单文件;⑷添加应用程序;图13-15 设置主文件;①打开应用程序项目(学生信息管理系统.pjx)，在项目管理器中选择主程序，单击“连编”按钮，出现如图13-16所示的“连编选项”对话框。 ②在“连编选项”对话框选择“连编可执行文件”选项、“重新编译全部文件”和“显示错误”选项，最后单击“确定”按钮，生成可执行文件。 ;发布应用程序 1）定位文件; 2）指定组件;3）、磁盘映象;4）安装选项;5）默认目录;6）改变文件位置;7）完成