《Visual FoxPro 数据库程序设计》教学总结

教学总结

Visual FoxPro 数据库程序设计作为国家计算机等级考试的一部分，其重要性不言而喻。该课程的突出特点是可视化操作居多，简单、易于理解，结合本人的教学过程及同学们的学习特点，主要有以下两点值得注意的地方：

1. 学生学习的主动性有待加强。学生对该课程的接受相当快，很容易理解和上手，但通常学生们在上完课之后，几乎不会再利用业余时间复习，这严重影响了辅导的有效性。

2. VFP课程作为一种可视化的软件系统，其界面操作是很重要的一部分，如果条件允许，建议在多媒体教室进行该课程的讲解。相信直观的多媒体教学方式能使教学效果事半功倍。以上是本人考虑的有待改进的地方，如有偏颇，望谅解。当然，鉴于荣宇教育严格的管理制度和学生考试意识的浓重，相信本次考试会取得比较良好的成绩。

考点总结

一 VFP基础知识

1.基本概念—选择和填空题

数据库，数据模型，数据库管理系统，类和对象，事件，方法

2.关系数据库

(1) 关系数据库：关系模型，关系模式，关系，元组，属性，域，主关键字和外部关键字

(2) 关系运算：选择，投影，连接

(3) 数据的一致性和完整性：实体完整性，域完整性，参照完整性—掌握完整性与索引类型之间的对应关系，以及不同索引类型的作用

3. VFP的基本数据元素：

(1) 常量，变量，表达式--掌握不同类型常量所占的字节数

(2) 常用函数：字符处理函数，数值计算函数，日期时间函数，数据类型转换函数，测试函数--掌握不同函数的返回值类型

二 VFP数据库的基本操作

1.数据库和表的建立、修改与有效性校验：--上机题的第一题，必须掌握

(1)表结构的建立与修改

(2)表记录的浏览、增加、删除与修改

(3)创建数据库，向数据库添加或移除表

(4)表的索引：主索引、候选索引、普通索引、唯一索引

2.多表操作

(1)选择工作区

(2)建立表之间的关联：一对一的关联，一对多的关联。

(3)设置参照完整性

(4)建立表间临时关联

3.建立视图与数据查询—上机题的第二题，必须掌握

(1)查询文件的建立、执行与修改

(2)视图文件的建立、查看与修改

(3)建立多表查询

(4)建立多表视图

三 SQL （笔试部分最重要的章节，是二级考试的核心内容，必须熟练掌握，机试部分也有所体现）

1.SQL的数据定义功能：

(1)create table

(2)alter table

2.SQL的数据修改功能：

(1)DELETE

(2)INSERT

(3)UPDATE

3.SQL的数据修改功能：

(1)简单查询

(2)嵌套查询

(3)连接查询：内连接，外连接，左连接，右连接，完全连接

(4)分组域计算查询

(5)集合的并运算

四项目管理器、设计器和向导的使用

1.使用项目管理器：

(1)使用“数据”选项卡

(2)使用“文档”选项卡

2.使用表单设计器：--上机题

(1)在表单中加入和修改控件对象

(2)设定数据环境

3.使用菜单设计器：

(1)建立主选项

(2)设计子菜单

(3)设定菜单选项程序代码

4.使用报表设计器--上机题的最后一题，但出的几率不大

(1)生成快速报表

(2)修改报表布局

(3)设计分组报表

(4)设计多栏报表

复习建议：

笔试部分：在熟悉教材的基础上，反复做培训机构发的套题，做完套题后，再回头看教材，然后再回头重新做题，如此在不断的反复中查漏补缺。

机试部分：在发的模拟光盘里有上机样本试题，附有视频演示，熟悉考试的机试环境。

第二篇：二级(Visual FoxPro数据库程序设计)考试大纲

二级（Visual FoxPro数据库程序设计）考试大纲

一、公共基础知识

基本要求

1. 掌握算法的基本概念；

2. 掌握基本数据结构及其操作；

3. 掌握基本排序和查找算法；

4. 掌握逐步求精的结构化程序设计方法；

5. 掌握软件工程的基本方法，具有初步应用相关技术进行软件开发的能力；

6. 掌握数据库的基本知识，了解关系数据库的设计。

考试内容

一、基本结构与算法

1. 算法的基本概念；算法复杂度的概念和意义（时间复杂度与空间复杂度）。

2. 数据结构的定义；数据的逻辑结构与存储结构；数据结构的图形表示；线性结构与非线性结构的概念。

3. 线性表的定义；线性表的顺序存储结构及其插入与删除运算。

4. 栈和队列的定义；栈和队列的顺序存储结构及其基本运算。

5. 线性单链表、双向链表与循环链表的结构及其基本运算。

6. 树的基本概念；二叉树的定义及其存储结构；二叉树的前序、中序和后序遍历。

7. 顺序查找与二分查找算法；基本排序算法（交换类排序，选择类排序，插入类排序）。

二、程序设计基础

1. 程序设计方法与风格。

2. 结构化程序设计。

3. 面向对象的程序设计方法，掌握理解对象、方法、属性以及继承与多态性的概念。

三、软件工程基础

1. 软件工程基本概念；软件生命周期概念；软件工具与软件开发环境。

2. 结构化分析方法；数据流图，数据字典，软件需求规格说明书。

3. 结构化设计方法；总体设计与详细设计。

4. 软件测试方法；白盒测试，黑盒测试，测试用例设计；软件测试的实施；单元测试，集成测试，系统测试。

5. 程序的调试，静态调试与动态调试。

四、数据库设计基础

1. 数据库的基本概念：数据库、数据库管理系统、数据库系统。

2. 数据模型：实体联系模型及E-R图，从E-R图导出关系数据模型。

3. 关系代数运算，包括集合运算及选择、投影、连接运算；数据库规范化理论。

4. 数据库设计方法和步骤：需求分析、概念设计、逻辑设计和物理设计的相关策略。

二、Visual FoxPro数据库程序设计

基本要求

1. 具有数据库系统的基础知识。

2. 基本了解面向对象的概念。

3. 掌握关系数据库的基本原理。

4. 掌握数据库程序设计方法。

5. 能够使用Visual FoxPro建立一个小型的数据库应用系统。

考试内容

一、Visual Foxpro的基础知识

1. 基本概念：

数据库，数据模型，数据库管理系统，类和对象，事件，方法。

2. 关系数据库：

（1）关系数据库：关系模型，关系模式，关系，元组，属性，域，主关键字和外部关键字。

（2）关系运算：投影，选择，联接。

（3）数据库的一致性和完整性：实体完整性，域完整性，参照完整性。

3. Visual FoxPro系统特点与工作方式：

（1）Windows版本的数据库特点。

（2）数据类型和主要文件类型。

（3）各种设计器和向导。

（4）工作方式：交互方式（命令方式、可视化操作）和程序运行方式。

4. Visual Foxpro的基本数据元素：

（1）常量，变量，表达式。

（2）常用函数：字符处理函数，数值运算函数，日期时间函数，数据类型转换函数，测试函数。

二、Visual FoxPro数据库的基本操作

1. 数据库和表的建立、修改与有效性检验：

（1）表结构的建立与修改。

（2）表记录的浏览、增加、删除与修改。

（3）创建数据库，向数据库添加或从移出表。

（4）设定字段级规则和记录级规则。

（5）表的索引：主索引、候选索引、普通索引、唯一索引。

2. 多表操作：

（1）选择工作区。

（2）建立表之间的关联：一对一关联、一对多关联。

（3）设置参照的完整性。

（4）建立表间临时关联。

3. 建立视图与数据查询：

（1）查询文件的建立、执行与修改。

（2）视图文件的建立、查看与修改。

（3）建立多表查询。

（4）建立多表视图。

三、关系型数据库标准语言SQL

1、SQL的数据定义功能：

（1）CREATE TABLE-SQL。

（2）ALTER TABLE-SQL。

2. SQL的数据修改功能：

（1）DELETE-SQL

（2）INSERT-SQL

（3）UPDATE-SQL

3. SQL的数据查询功能：

（1）简单查询。

（2）嵌套查询。

（3）连接查询。

内连接

外连接：左连接，右连接，完全连接

（4）分组与计算查询。

（5）集合的并运算。

四、项目管理器、设计器和向导的使用

1. 使用项目管理器：

（1）使用“数据”选项卡。

（2）使用“文档”选项卡。

2. 使用表单设计器：

（1）在表单中加入和修改控件对象。

（2）设定数据环境。

3. 使用菜单设计器：

（1）建立主选项。

（2）设计子菜单。

（3）设定菜单选项程序代码。

4. 使用报表设计器：

（1）生成快速报表。

（2）修改报表布局。

（3）设计分组报表。

（4）设计多栏报表。

5. 使用应用程序向导。

6. 应用程序生成器与连编应用程序。

五、Visual FoxPro程序设计

1. 命令文件的建立与运行：

（1）程序文件的建立。

（2）简单的交互方式输入、输出命令。

（3）应用程序的调试与执行。

2. 结构化程序设计：

（1）顺序结构程序设计。

（2）分支结构程序设计。

（3）循环结构程序设计。

3. 过程与过程调用：

（1）子程序设计与调用。

（2）过程与过程文件。

（3）局部变量和全局变量、过程调用中的参数传递。

4. 用户定义对话框（MESSAGEBOX）的使用。

三、考试方式

1. 笔试：90分钟，满分100分，其中含公共基础知识部分的30分。

2. 上机操作：90分钟，满分100分。

（1）基本操作。

（2）简单应用。

（3）综合应用。

第三篇：数据库设计论文

数据库系统概论课程设计报告

设计题目

图书馆服务系统

学生姓名：

学号：_

班级：_

指导老师：______ ______

日期：___20##-6-10___________

成绩：_______________

图书馆服务系统

一、需求分析

对于每一位图书借阅用户来说，有一款方便简洁的图书馆服务系统将可以为广大用户节省很多不必要的麻烦，同时也给图书馆的内部人员的管理带来了便利，同时设计图书馆的服务系统还要根据实际的要求。基于此两点，该图书馆服务系统设计思路如下。

二、E-R图建模

根据系统需求分析的结果设计该系统的E－R图。

管理可以对图书进行增、删、改；

管理员可以对用户进行管理；

管理员可以对图书、读者借阅情况的统计；

每条书目对应一个asp文件

每条栏目对应一个文件夹

每条书目对应一个栏目

图2.1 检索功能E-R图

图2.2 管理员信息实体E-R图

图2.3 单本图书实体E-R图

图2.4 图书栏目E-R图

图2.5 会员信息实体E-R图

三、库文件结构设计

a)概念模型设计

1) 读者信息

2) 书籍信息

3) 管理员信息

4) 栏目信息

5) 读者与书籍之间的关系（借阅读关系E-R图）

6) 管理员与书籍之间的关系（管理员_书籍E-R图）

7) 管理员与学生之间的关系（管理员_学生E-R图）

b)逻辑设计——从理论“E/R模型”到理论“关系模型”的整理转换，通过E/R模型到关系模型的转化，可以得到如下关系模式：

借阅关系

属性：工作号，读者学号，ISBN,是否续借，借书日期，还书日期，备注

主键：工作号，读者学号，ISBN,管理员_书籍关系

属性：工作号，ISBN，添加时间，是否在馆

主键：工作号

b) 数据库表的设计

表4.1 图书栏目表

表4.2图书内容表

表4.3 管理员信息表

表4.4会员信息表

四、用户接口设计及主要功能实现

1）主页面端口：default.asp

<html>

<p>

<dl>

<dd><div align=center style="font-size:xx-large"><font color

="crimson">

<p>WUST图书馆服务系统</P></font></div></dd>

</dl>

<tr>

<td width=20% align=center><a href="login.htm">[会员登录]

</a></td>

<td width=20% align=center><a href="managerlogin.htm">[管理员登录]</a></td>

<td width=20% align=center><a href="help.htm">[帮助信息]

</a></td>

</tr>

</table>

<br>

</body>

</html>

2）会员登录模块：login.htm和login.asp

<html>

<head>

</head>

<p align=center><font size=5>图书馆服务——会员登陆</font></p>

<hr>

<tr>

<td width=50%><input name=name

style="height:22px;width:167px"><br></td>

</tr>

<tr>

<td width=50%><input type=password name=password

style="height:22px;width:167px"><br></td>

</tr>

<tr>

<td width=30% align=left>  <input id=submit1 name=submit1

type=submit value=确定> 

</tr>

</table>

</form>

<tr>

<td width=20% align=center><a href="changepassword.htm">[修改密码]

</a></td>

</table>

</form>

</center>

</font></p>

</body>

</html>

<% @language=vbscript%>

<%response.buffer=true%>

<html>

<head>

<% set conn=server.createobject("adodb.connection")

conn.open "DRIVER={Microsoft SQL Driver

(*.mdb)};DBQ="&Server.MapPath("BBS.MDB")%>

</head>

<% set rstemp=server.createobject("addb.recordset")

dim strname,strpassword,sql

strname=request.form("Name")

strpassword=request.form("password")

sql="select * from user where username='"& strname & "'"

rstemp.open sql,conn,1,3

if strname=" " then

response.write"账号不能为空<p></p>"

<% response.end

end if

if strpassword=" " then

response.write"密码不能为空<p></p>"

<% response.end

end if

if rstemp.RecordCount=1 then

if rstemp("userpassword")=strpassword then

session ("name")=strname

response.redirect "user.htm"

else

<a href=javascript:history.back()>账号错误请重新输入</a>

<% response.end

end if

rstemp.close

set rstemp=nothing

</body>

</html>

3）会员密码修改端口：changepassword.htm和changepassword.asp

<html>

<% if session("name")=" " then

response.write "请你首先登录，才能留言"

response.end

<% dim stroldpassword,strnewpassword,strconfirmpassword

dim strwhere,strsql,strdsn,strchangesql

stroldpassword=request.form("oldpassword")

strnewpassword=request.form("newpassword")

strconfirmpassword=request.form("confirmpassword")

if stroldpassword=" " or strnewpassword=" " then

response.write" 请输入密码"

response.end

end if

if strnewpassword<>strconfirmpassword then

response.write"两次密码不相同"

response.end

end if

strwhere="where username='" & session("name") & "' and userpassword= '" & stroldpassword & "'"

strsql="select * from user "& strwhere

strchangesql="update user set userpassword='" & strnewpassword & "'"

& strwhere

set rs=server.createobject("adodb.recordset")

rs.open strsql,conn,1,3

<br>

if rs.recordcount=1 then

set changers=server.createobject("adodb.recordset")

changers.open strchangesql,conn,1,3

set changers=nothing

response.write "密码已成功修改"

else response.write "密码输入错误，无法修改密码"

else if

rs.close

set rs=nothing

</body>

</font></p>

</body>

</html>

<html>

<% if session("name")=" " then

response.write "请你首先登录，才能留言"

response.end

<% dim stroldpassword,strnewpassword,strconfirmpassword

dim strwhere,strsql,strdsn,strchangesql

stroldpassword=request.form("oldpassword")

strnewpassword=request.form("newpassword")

strconfirmpassword=request.form("confirmpassword")

if stroldpassword=" " or strnewpassword=" " then

response.write" 请输入密码"

response.end

end if

if strnewpassword<>strconfirmpassword then

response.write"两次密码不相同"

response.end

end if

strwhere="where username='" & session("name") & "' and userpassword= '" & stroldpassword & "'"

strsql="select * from user "& strwhere

strchangesql="update user set userpassword='" & strnewpassword & "'"

& strwhere

set rs=server.createobject("adodb.recordset")

rs.open strsql,conn,1,3

<br>

if rs.recordcount=1 then

set changers=server.createobject("adodb.recordset")

changers.open strchangesql,conn,1,3

set changers=nothing

response.write "密码已成功修改"

else response.write "密码输入错误，无法修改密码"

else if

rs.close

set rs=nothing

</body>

</font></p>

</body>

</html>

4）管理员登陆模块：managerlogin.htm和managerlogin.asp

<html>

<head>

</head>

<p align=center><font size=5>图书馆服务——管理员登陆</font></p>

<hr>

<tr>

<td width=50%><input name=name

style="height:22px;width:167px"><br></td>

</tr>

<tr>

<td width=50%><input type=password name=password

style="height:22px;width:167px"><br></td>

</tr>

<tr>

<td width=30% align=left>  <input id=submit1 name=submit1

type=submit value=确定> 

</tr>

</table>

</form>

<tr>

<td width=20% align=center><a href="del.htm">[图书删除]

</a></td>

</tr>

</form>

<tr>

<td width=20% align=center><a href="update.htm">[新书上架]

</a></td>

</tr>

</form>

<tr>

<td width=20% align=center><a href="addmember">[添加会员]

</a></td>

</tr>

</form>

</table>

</center>

</font></p>

</body>

</html>

<% @language=vbscript%>

<%response.buffer=true%>

<html>

<head>

<% set conn=server.createobject("adodb.connection")

conn.open "DRIVER={Microsoft SQL Driver

(*.mdb)};DBQ="&Server.MapPath("BBS.MDB")%>

</head>

<% set rstemp=server.createobject("addb.recordset")

dim strname,strpassword,sql

strname=request.form("Name")

strpassword=request.form("password")

sql="select * from manager where username='"& strname & "'"

rstemp.open sql,conn,1,3

if strname=" " then

response.write"账号不能为空<p></p>"

<% response.end

end if

if strpassword=" " then

response.write"密码不能为空<p></p>"

<% response.end

end if

if rstemp.RecordCount=1 then

if rstemp("userpassword")=strpassword then

session ("name")=strname

response.redirect "user.htm"

else

<a href=javascript:history.back()>账号错误请重新输入</a>

<% response.end

end if

rstemp.close

set rstemp=nothing

</body>

</html>

6)帮助信息模块：

<HTML>

<HEAD>

</HEAD>

<p>

欢迎同学们来到进入图书馆服务系统，本系统只针对已经通过管理员审核的同学方能使用该系统。本图书系统收录图书馆的大部分书，并且有新的书目不断上架以满足同学学习的需要。鉴如图书馆书目有限，对于没有收录图书对你和你很多同学作用较大而本馆没有收录，请在“请你留言”处留言。

</font></p>

</BODY>

</HTML>

7）请你留言模块：

<html>

<head>

</head>

<tr>

</tr>

<tr>

</tr>

<tr>

<tr>

<td>

<OPTION value="1">计算机学院</OPTION>

<OPTION value="2">机械自动化学院</OPTION>

<OPTION value="5">文法与经济学院</OPTION>

<OPTION value="9">汽车与交通学院</OPTION>

<OPTION value="10">外国语学院</OPTION>

<OPTION value="12">艺术与设计学院</OPTION>

</SELECT>

</td>

</tr>

<tr>

<TD>

<INPUT type="radio" name="radiobutton1" value="1" checked>男

<INPUT type="radio" name="radiobutton1 value="0">女

</TD>

</tr>

</table>

</center>

</form>

</font></p>

</body>

</html>

<% @language=vbscript%>

<html>

<head>

</head>

dim strarticletitle,strarticletlecontent,strarticleauthor,strarticleid

dim strtable,strdsn

if session("name")=" " then

response.write "请你首先登录，才能留言"

response.end

end if

strarticletitle=request.form("title")

strarticlecontent=request.form("content")

strarticleauthor=session("name")

strarticleid=request.form("articleid")

strtable="article"

if trim(strarticletitle)=" " then

response.write "主题不能为空"

response.end

end if

if trim(strarticlecontent)=" " then

strarticletitle=strarticletitle &"(无内容)"

end if

set rs=server.createobject("adodb.recordset")

rs.open strtable,conn,3,2

rs.addnew

if request.form("submit")="提交" then

rs("articletitle")=strarticletitle

rs("articleauthor")=strarticleauthor

rs("articlecontent")=strarticlecontent

response.write "您的意见提交成功"

end if

rs.update

rs,close

set rs=nothing

</body>

</html>

8）管理员图书下架模块：del.htm和del.asp

<html>

<head>

</head>

if session("name")=" " then

response.write "请你首先登录，才能留言"

response.end

end if

dim strdsn,strselectsql

dim intarticleid

if request.querystring("ID")=" " then

intarticleid=0

end if

set rs=server.createobject("adodb.recordset")

strselectsql="select * from book where bookid=" & intaricleid

rs.open strselectsql,conn,3,1

rs.pagesize=10

nextpage=request.form("nextpage")

if nextpage=" " then

session("abspage")=1

else

if nextpage="上一页" then

session("abspage")=session("abspage") -1

else if nextpage="下一页" then

session("abspage")=session("abspage") +1

else if nextpage="第一页" then

session("abspage")=1

else if nextpage="最后一页" then

session("abspage")=rs.pagecount

end if

rs.absolutepage=session("abspage")

end if

if rs.recordcount>0 then

i=0

response.write"<table border=1 width=100%/>"

if intaricleid=0 then

response.write "第" &session("abspage") & "页" & "&mbsp;[主题共有"& rs.recordcount&" 个]"

<tr>

</tr>

</tr>

<%rs.movenext i=i+1

loop

response.write"</table></center>"

response.write"<center><form action showlise.asp method=post>"

if rs.pagecount>1 then

response.write"<input type=submit value=上一页 name=nextpage>"&" "

end if

if(session("abspage"))<rs.pagecount then

response.write"<input type=submit value=下一页 name=nextpage>"

end if

'end if

response.write"</form>"

end if

rs.close

set rs=nothing

</tr>

</table>

<hr>

</font></p>

</body>

</html>

if session("name")=" " then

response.write "请你首先登录，才能删除图书"

response.end

<% dim sql

dim rs

path=request("path")

file=request("file")

set rs=server.createobject("adodb.recorset")

sql=""delect from book where bookid=&request("ID")

rs.open sql,conn,1,1

rs.close

set rs=nothing

conn.close

setnonn=nithing

filepath=server.mappath(".")&"|"&path"\"&file

set fso=server.createobject("scripting.file systemobject")

fso.delete file(filepath)

set fso=nothing

9)图书上架模块：update.asp

<%if session("name")=" " then

response.write "请你首先登录，才能留言"

response.end

end if

<%if request("txttitle")=" " then

response.write"错误提示：请输入书目标题"

respons.end

end if

if request("txtcontent")=" " then

response.write"错误提示：请输入书目简介"

respons.end

end if

dim title.content,sql

dim rs

dim from.about

title=request("txttitle")

from=request("Nfrom")

zzbook=request("zzbook")

typeid=request("typeid")

about=request("about")

dim sql

dim rsl

dim typename1

set rs=server.createobject("adodb.recordset")

sql="select * from book where (bookid is null)"

rs.open sql,conn,1,3

rs.addnew

rs("title")=title

rs("path")=filepath

rs("content")=content

rs("Nfrom")=from

rs("typeid")=typeid

rs("tjbook")=tjbook

rs("bname")=bname

rs("zzbook")=zzbook

rs("about")=about

rs.update

bookid=("bookid")

rsl.close

set.rsl=nothing

rs.close

set rs=nothing

conn.close

set conn=nothing

response.write("OK")

10)添加会员模块：addmember.htm

<html>

<head>

</head>

<p align=center><font size=5>图书馆——新会员注册</font></p>

<hr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</td>

</tr>

</table>

</form>

</center>

<hr>

</font></p>

</body>

</html>

11)数据库的设计界面：

五、设计总结

通过几周的系统分析，设计，开发，系统编码的完成。在系统的开发过程中，以前学习感到抽象的课程，如数据库原理变得清晰起来，也学会了基于sql和IIS，使用asp建立简单的数据库。在本系统的开发工程中，由于我们是初次开发软件，在知识，经验方面都存在着不足。另外，在整个开发的过程中，时间也比较仓促。因此，该系统必然会存在一些缺陷和不足。因为对就图书管理的整个流程不够熟悉，在需求分析时尚未能做到完全满足用户的需要。

由于是第一次做数据库开发，对一些代码不够熟悉，所以本管理系统存在着很多不足，但它是我们花了许多心思和时间做出来的，今后会学习更多的数据库开发软件来完善它，使它能够有更全面的功能。通过开发这个系统，我们掌握了软件开发的基本过程，巩固了南四成员对asp的学习，但在这次课程设计中的最大收获不是掌握了asp开发工具的应用，而是学会了设计系统的思维方法，以及与同学们之间相互帮助的精神。由于个人能力有限和知识储备的不足，程序中存在纰漏，希望在以后的学习中完善对数据库的设计工作。

六、参考文献

内容：列出课程设计中所参考的所有书目，格式如下：

[1] 王珊，数据库系统概论（第四版），北京：高等教育出版社，2006.5

[2] 喵雪兰，数据库技术及应用，北京：机械工业出版社，2005.3

[3] 左健，ASP动态网站制作基础与上机实训

相关推荐