数据库课程设计

发布 2022-10-04 15:08:28 阅读 4779

access课程设计。

学院班级指导老师。

姓名学号成绩。

教师管理系统。

1功能描述:

通过系统查找数据库中的老师的相关资料,实现添加资料,修改资料,删除资料,查询信息,和报表输出,能够便于查找相关信息。

2概要设计。

登录作为一个系统的门户要求有注册的的账号密码,如果是第一次登录要注册账号和密码,账号,密码由数字组成。如果账号密码都是正确那就可以进入教师系统了,教师管理系统中,系统包含一个主窗体,和一个子窗体和选项卡。选项卡分为教师信息修改和删除,查询,报表,和添加。

修改可以修改教师基本信息,删除用来删除表里面的信息,查询可以通过输入信息来查询相关信息。报表来输出相关的报表的。

3.详细设计。

1注册用来注册一个账号和密码可以进入系统,用一个宏,注册后用宏进入系统,来到窗体,可以通过加资料,删除资料,然后来查询资料,修改资料。然后报表输出资料。

1.注册。2登录。

3.添加。4.查询。

5.修改。6.删除。

7.报表:8.附录。

1)注册:private sub 注册_click()

dim rst as new

'第二步,设置连接。

set curconn = new

= "data source="

'第三步,让记录集从连接获取数据。

set rst = new

"用户表", curconn, adcmdtable, adlockpessimistic

'第四步,在数据集中添加一行空白记录。

'第五步,输入数据。

"id") 新用户。

"用户名") 新用户。

"用户密码") 用户密码。

msgbox ("注册成功")

'第六步,保存数据。

end sub

2)登录。private sub 确定_click()

if trim(dlookup("用户密码", 用户表", id ="cstr(cbol)))txt1 then

msgbox ("登录成功")

"教师系统", acnormal

elsemsgbox ("密码错误")

end if

end sub

3)退出:private sub 退出_click()

quitend sub

4)修改:private sub 修改_click()

dim curconn as new

dim rst as new

第二步,设置连接。

set curconn = new

= "data source="

从记录集中获取数据。

set rst = new

"教师", curconn, adcmdtable, adlockpessimistic

zgbh") zgbh

bmbh") bmbh

xm") xm

xb") xb

sfzh") sfzh

mz") mz

zc") zc

xw") xw

end sub

5)添加:private sub 添加_click()

dim curconn as new

dim rst as new

第二步,设置连接。

set curconn = new

= "data source="

从记录集中获取数据。

set rst = new

"教师", curconn, adcmdtable, adlockpessimistic

增加一个记录。

zgbh") zgbh

bmbh") bmbh

xm") xm

xb") xb

sfzh") sfzh

mz") mz

zc") zc

xw") xw

end sub

6)查询:private sub cbo1_click()

dim strsql as string

= false

if cbo1 <>then

if cbo2 <>then

strsql = select*from 教师where xb='"cbo1 & and zc='"cbo2 &

elsestrsql = select*from 教师 where xb='"cbo1 &

end if

me.基本信息 = strsql

end if

end sub

private sub cbo2_click()

dim strsql as string

= false

if cbo2 <>then

if cbo1 <>then

strsql = select*from 教师 where zc='"cbo2 & and xb='"cbo1 &

elsestrsql = select*from 教师 where zc='"cbo2 &

end if

me.基本信息 = strsql

end if

end sub

private sub cmdclose_click()

end sub

private sub cmdfind_click()

dim strsql as string

if <>then

strsql = select*from 教师 where xm='"

elseend if

me.基本信息 = strsql

end sub

private sub text1_gotfocus()

cbo1 =

cbo2 =

end sub

数据库库课程设计

目录。引言11 开发环境1 1.1 硬件环境1 1.2 软件环境1 1.2.1 sql server 2005 delphi7简单介绍2 2 需求分析3 2.1 信息需求3 2.2 功能需求3 2.3 安全性与完整性要求3 3 概念结构设计3 4 逻辑结构设计4 5 数据库实现6 5.1 创建数据库...

数据库课程设计总结数据库课程设计个人总结

数据库课程设计个人总结 4班6组赵 王婆卖瓜时间过了,言归正传吧。凡是都要有个总结,以下便是我在这个课程设计中的一点心得。首先我分析一下我们组任务顺利完成的成功之处并总结一些经验,供以后反省参考用。凡事预则备,不预则废。这是我的座右铭,也是我深有感悟的几句古语之一。在这个项目的开始阶段,老师便让我们...

数据库课程设计

简单pos系统。班级 计科二班 姓名 韩田田 学号 201010510237 目录。前言。销售管理作为零售企业现代化管理不可缺少的组成部分,日益受到人们的重视。传统销售模式以及销售管理体系和机制,已经越来越难以适应零售企业现代化管理的需求。pos point of sales,销售终端的英文缩写 是...