access数据库设计作品（ACCESS数据库查询设计）

本文目录

• ACCESS数据库查询设计
• 求一份access数据库的设计方案
• 如何把用ACCESS设计的数据库美化
• ACCESS数据库结构设计

ACCESS数据库查询设计

从学生表中查询入学总分最高的学生学号姓名
SELECT 学生表.学号, 学生表.姓名, 学生表.入学总分
FROM 学生表
WHERE (((学生表.入学总分)=(SELECT Max(学生表.入学总分) FROM 学生表)))
从学生表中查询所有 入学总分 高于平均入学总分的学生的学号姓名
SELECT 学生表.学号, 学生表.姓名, 学生表.入学总分
FROM 学生表
WHERE (((学生表.入学总分)》(SELECT Avg(学生表.入学总分) FROM 学生表)))

求一份access数据库的设计方案

1、2、你只要在Access里面菜单 工具-》数据库实用工具 -》 压缩修复数据库 就可以了
原因是：Access在删除记录或者进行其他需要临时数据的操作后，并不物理删除这些无用数据，只有压缩修复数据库的时候才真正删除。就象windows中将文件放进回收站中无法增加可用空间必须清空回收站是一个道理。
如何操作请参考以下 FLASH 动画：
手动压缩修复数据库。
***隐藏网址***
***隐藏网址***
3、手动将文件插入ole字段的文件，实际保存在数据库中时ole引擎会在文件数据的前面增加一段信息，用于让ole引擎处理你放进去的文件，所以体积会变大。
4、请查看一下，你的数据库里面是否有包含ole字段的表，ole字段可以存储体积非常大的文件，导致体积增长很正常。再看一下你的数据库中窗体、报表中有没有嵌入使用图片做背景。Access中的背景图片全部是以bmp图片格式存放的，即使你原先指定的是jpg格式，Access也会自动将文件格式转换为bmp再存放。
无论是背景还是控件，只要有图片，体积就会不正常地增大。还有，如果你的程序设计成运行时会使用大量临时数据，用完了再删除的，也会造成体积暴增。
5、可以设置退出时自动压缩，步骤如下：
菜单 -》 工具 -》 选项 -》 常规关闭时压缩 -》 前面打上勾
以上为转贴，以下为原创。
上面的是几种数据库变大后的解决方案。
我想说的是如何防止数据库变的如此大。
站在程序员的角度来说，所以不一定对各位站长有用。
只是或许可以给各位Asp+Access的程序作者一点小小的建议而已。。
采用多个数据库，而不是一个数据库。
可以大概指定一定范围，例如从0到1W使用1号数据库。
1W到2W使用2号数据库。
如何使用？。。
con和rs定义多个。。
con1是一号数据库的，con2是二号数据库的。。
rs1是一号数据库的，rs2是二号数据库的。。
添加：
当数据达到XW条时使用新的conX和rsX。。
修改：
查询要修改的ID号。。去指定是数据库执行操作。
删除：
同修改。
用这个有一个不是很好解决的地方。比如我要查询用户排行，查询积分最大的10个用户。
由于用的多个数据库，而且用的多个rs。。
找到了两种方法，各位依照喜好使用。
第一种：
以上部分全文转载无修改。前几天采集了一个3万6千数据，但是发现空闲的主机上已经没有数据库空间了，转换为mdb后，产生了一个巨大的网站，现在经常宕机。
总而言之，如果使用access作为网站的数据库，集中生产HTML页面的时候，是很痛苦的。
作者：小K(Kid)
Private Function UnionRs(rsA As Recordset, rsB As Recordset) As Recordset
Dim rs As New Recordset, i%
For i = 0 To rsA.Fields.Count - 1
’设置记录集标题列
rs.Fields.Append rsA.Fields(i).Name, rsA.Fields(i).Type, adFldMayBeNull + adFldIsNullable + adFldUpdatable
Next
’添加rsA到rs
If Not rsA.EOF Then
rsA.MoveFirst
If rs.State = adStateClosed Then rs.Open
While Not rsA.EOF
rs.AddNew
For i = 0 To rs.Fields.Count - 1
rs(i) = rsA(i)
Next
rsA.MoveNext
Wend
rs.UpdateBatch
End If
’添加rsB到rs
If Not rsB.EOF Then
rsB.MoveFirst
If rs.State = adStateClosed Then rs.Open
While Not rsB.EOF
rs.AddNew
For i = 0 To rs.Fields.Count - 1
rs(i) = rsB(i)
Next
rsB.MoveNext
Wend
rs.UpdateBatch
End If
’返回合成后的新的记录集
Set UnionRs = rs
End Function
’调用合并函数
Private Sub Command1_Click()
Dim rs As Recordset
Set rs = UnionRs(rsA, rsB) ’合并rsA和rsB
Set DataGrid1.DataSource = rs
End Sub
第二种：
当记录条数很多的时候，用循环的方法确实比较慢，比较快一点的，可以借助临时表来做：
假设你的两个数据库位置为：C:\testA.mdb和C:\testB.mdb
Dim cnA As New ADODB.Connection, cnB As New ADODB.Connection, rs As New ADODB.Recordset
cnA.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TestA.mdb;User Id=admin;Password=;"
cnB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TestB.mdb;User Id=admin;Password=;"
cn.Execute ("select * into temp from tableA") ’把tableA的数据插入到临时表temp里(具体的查询数据的语句自己改)
cn1.Execute ("INSERT INTO .temp SELECT * From tableB") ’tableB的数据追加testA的临时表temp里(具体的查询数据的语句自己改)
rs.Open "temp", cnA, adOpenDynamic, adLockReadOnly, adCmdTable
采用多个相同数据库，访问时随机选择数据库。
这个相对来说方便一点，不过不会减少数据库的体积，而是减少数据库的连接数。
也在一定程度上减轻了数据库的压力。
灵感来自镜像站点的访问。
conn.asp（通常为数据库文件）里面加个随机数。。
例如有10个相同数据库，那么随机小于10的整数就OK。
这样以前一个数据库的压力会分配给10个数据库。
虽然不一定平均。。（如果你算法不错，做到平均也不难）
记得后台要有个克隆数据库的操作选项，当然手工也可以。
OK。写完了。希望对各位程序员有点小小的作用。
期望你们写出更优秀的程序来。谢谢。
--------------------------------------------------------------------------------
以上部分全文转载无修改。前几天采集了一个3万6千数据，但是发现空闲的主机上已经没有数据库空间了，转换为mdb后，产生了一个巨大的网站，现在经常宕机。
总而言之，如果使用access作为网站的数据库，集中生产HTML页面的时候，是很痛苦的。

如何把用ACCESS设计的数据库美化

access可以设计得很美，你可以在窗口上加一个网页控件,用网页制作菜单，就什么效果都可以做出来了。
如果你懂得制作vb控件，也可以制作更精美的效果。
弄个无边框窗口，里面只放一张精美的图片，作为启动窗口，隐藏所有的菜单，启动时先启动这张有图片的窗口。如果懂其它编程，可以编一个美丽的启动界面，再调用access。
其实把里面窗体上的控件安排好，整齐美观也很好看了。
无论窗口有多平凡，最后出来的报表效果才是最重要的。学好报表设计更实用一些。

ACCESS数据库结构设计

1，物料做为一个表，就像你这样，
物料编号，物料名称，类型，默认的单位,
2，做一个上下级的关系表
上级车型，下级物料编号，数量，
3，最后再做两个视图，
3.1 可以查看每个车型的所有物料
3.2 可以查看每个物料用到的车型，用量多少！
因为没有看到有库存相关，所以简单的做了一下，希望能帮到你