access数据库关联

㈠ ACCESS数据库里不同表格中字段关联

我们用个假设法来解答这个问题：
表A有以下列：id,a1,a2,a3
,id为自动编号且为主键
表B有以下列：id,b1（外键来自A表id）,b2,b3,id为自动编号且为主键
如果现在表A与表B是一对多的关系：
因为表A的主键是id（自动编号的，是数字整形）,那么B表的B1(外键)列必须为整形数字。
这样才可以建立两表的关系！

㈡ ACCESS中如何让表关联

步骤如下：
关闭已打开的所有表。您不能创建或修改打开的表之间的关系。
按F11键切换到数据库窗口。
在工具菜单中上,单击关系。
如果您尚未尚未定义任何关系数据库中，显示表对话框会自动显示。如果希望向中添加要关联，但将不会显示显示表对话框的表，单击显示表在关系菜单上。
双击要关联，表的名称，然后关闭显示表对话框。要创建一个表与其本身之间的关系，请按如下所两次添加的表。
将拖动要从一个表与其他表中，相关字段。若要拖动多个字段，按Ctrl键，单击每个字段中，然后拖动这些。

在大多数的情况下应主键字段（以加粗文本显示）将从一个表拖动到一个类似字段（通常具有相同的名称）其他表中称为外键。
在出现编辑关系对话框。请确保两个列中显示的字段名称正确。如果需要，可以更改它们。

如果需要，请设置关系选项。如果您需要有关特定物料，在编辑关系对话框的信息，请单击问号按钮，然后单击物料。将被下文中的详细解释这些选项。
单击创建以创建关系。
重复步骤5至第8步每对要关联的表。

当您关闭编辑关系对话框时，MicrosoftAccess会询问是否要保存布局。是否保存布局或不，您创建的关系被保存在数据库。

注意：您可以在查询和表中创建关系。但是，查询不实施参照完整性。
如何定义多多关系
要创建多对多关系，请按下列步骤操作：
创建将具有多对多关系的两个表。
创建第三个表称为一个联接表并将然后添加到联接表新字段，与作为主键字段相同的定义从每个其他两个表。在联接表中主键字段作为外键。可以添加到联接表的其他字段一样可以向任何其他表。
在联接表中设置将其他两个表中的主键字段主键。是例如TitleAuthors联接表中主键将组成订单ID和产品ID字段。

注意：创建主键，请按照下列步骤：
在设计视图中打开表。
选择您要定义主键字段值。若要选择一个字段，请单击所需的字段的行选择器。

要选择多个的域，请按下该Ctrl键，然后单击每个字段在行选择器。
单击工具栏上的主键。

注意：如果您希望多字段主键中字段次序与表中的这些字段的次序不同，请在以显示索引对话框，然后重新排列字段名称索引名为PrimaryKey的工具栏上单击索引。
定义每个两个主表和联接表之间的一对多关系。

㈢ Access怎么建立数据表间的关系

1、首先，在打开Access数据库之后，我们创建两个数据表作为示例。

㈣ office2007里的access数据库，怎么对2张表进行关联查询啊

1，打开该access数据库，数据库工具，点击关系。
2，然后便会出现各个表之间对应的关系，右击它们之间的连线，点击删除。

3，右击空白处，点击插入，然后选择这两张表，将一张表中的某个字段拉到另一张表中的相同字段，然后在跳出的窗体中进行设置就可以了。

㈤ access数据库关联表和删除关联的关系

select
*
from
表一,表二
whre
表一.ID
=
表二.ID
或者用
select
*
from
表一
as
a
inner
join
表二
as
b
on
a.ID
=
b.ID
一般情况下不用弄什么外键关联，ID
相同了，就可以了。
至于删除，你要先知道是哪个ID。如果想用一条语句删除俩张表的数据是不可能的。
不过，你可以使用触发器。一般都在主表上加。

㈥ ACCESS数据库关联

microsoft
access是一种关系式数据库，关系式数据库由一系列表组成，表又由一系列行和列组成，每一行是一个记录，每一列是一个字段，每个字段有一个字段名，字段名在一个表中不能重复。图1是一个“产品”表的例子。“产品”表由10个记录组成，一个记录占一行，每一个记录由产品id、产品名称、库存量、订货量、单价和折扣率6个字段组成。“产品id”是字段名，其下面的1，2等是字段的值。
表与表之间可以建立关系（或称关联，连接），以便查询相关联的信息。access数据库以文件形式保存，文件的扩展名是mdb。
access
数据库由六种对象组成，它们是表、查询、窗体、报表、宏和模块。
表(table)
——表是数据库的基本对象，是创建其他5种对象的基础。表由记录组成，记录由字段组成，表用来存贮数据库的数据，故又称数据表。
查询(query)——查询可以按索引快速查找到需要的记录，按要求筛选记录并能连接若干个表的字段组成新表。
窗体(form)——窗体提供了一种方便的浏览、输入及更改数据的窗口。还可以创建子窗体显示相关联的表的内容。窗体也称表单。
报表(report)——报表的功能是将数据库中的数据分类汇总，然后打印出来，以便分析。
宏(macro)——宏相当于dos中的批处理，用来自动执行一系列操作。access列出了一些常用的操作供用户选择，使用起来十分方便。
模块(mole)——模块的功能与宏类似，但它定义的操作比宏更精细和复杂，用户可以根据自己的需要编写程序。模块使用visual
basic编程。

㈦ access数据库关联

你这两个字段都不是主键。
所以在数据库中没有办法设置。
只能在写程序的时候实现。
方法如下：
1，首先查找原表中的star的最大值
select max(star) as star from 表
2，根据读出来的值 ，按你imageindex的值，再写入数据库
insert into 表(imageindex,star) values (imageindex值,star值)

以上供参考

㈧ access数据库中各表间的连接关系是如何建立的

方法/步骤
1.首先我们打开Access数据库后，建立两个数据表来作为举例。
2.建立好数据表以后，点击表可以看到两个表中包含不同的字段内容，如果我们要查询任何一个字段的记录内容，就要将两个表建立起关系，相互关联。
选中任何一个表，然后点击工具栏上的视图图标。
3.现在切换到设计界面，点击工具栏上的【关系】按钮，打开关系窗口。
4.在关系窗口的【添加表】中，依次选择要添加的表，然后点击添加按钮，将表添加到关系窗口中。添加好以后点击关闭，回到关系窗口。
5.鼠标点击其中一个表的主键字段，即没有重复值的唯一字段。按住鼠标不放，然后拖动到另一个表的相同字段松开，在弹出的窗口中点击确定。
6.现在两个表已经建立了以【上岗证号】为关联的关系。以后可以通过查询来显示任何一个表中的符合条件的字段记录。

㈨ access数据库里如何创建关联

做关系，确定是否存在逻辑关系。字段数据类型一致。即可直接拖曳建立关系

㈩ ACCESS数据库关联

是，用链接表可以实现。
下面是代码的动态实现表链接。

'首先 , 作如下测试工作:
'新建空白 Access 数据库 (.mdb) 文件,
'并添加若干类型链接表:
'dBase 5 (*.dbf)、
'Microsoft Excel (*.xls)、
'Microsoft Access (*.mdb;*.mda;*.mde) 等,
'然后再编写如下 VB6 程序:
'Delphi、VC 等程序同理也可引用 ADOX
'引用 Microsoft ActiveX Data Objects 2.x Library
'引用 Microsoft ADO Ext. 2.x for DDL and Security
'控件: Form1、Command1、Command2、Command3
Private Sub Command1_Click() '测试链接表信息
Dim adoConnection As New ADODB.Connection
adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\LnkTbls.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123"
Dim adoCatalog As New ADOX.Catalog
Set adoCatalog.ActiveConnection = adoConnection
Dim adoTable As New ADOX.Table
Set adoTable.ParentCatalog = adoCatalog
Dim i As Integer
For Each adoTable In adoCatalog.Tables
If adoTable.Type = "LINK" Then
Debug.Print adoTable.Name
For i = 0 To adoTable.Properties.Count - 1
Debug.Print " " & adoTable.Properties.Item(i).Name & ": " & adoTable.Properties.Item(i).Value
Next i
Debug.Print VBA.vbCrLf
End If
Next adoTable
End Sub
'编程添加链接表
Private Sub Command2_Click()
Dim adoConnection As New ADODB.Connection
adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\LnkTbls.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123"
Dim adoCatalog As New ADOX.Catalog
Dim adoTable As New ADOX.Table

'Access
Set adoCatalog.ActiveConnection = adoConnection
Set adoTable.ParentCatalog = adoCatalog
adoTable.Properties.Item("Jet OLEDB:Link Datasource").Value = "e:\nwind2kpwd.mdb"
adoTable.Properties.Item("Jet OLEDB:Remote Table Name").Value = "产品"
adoTable.Properties.Item("Jet OLEDB:Create Link").Value = True
adoTable.Properties.Item("Jet OLEDB:Link Provider String").Value = "MS Access;Pwd=456"
adoTable.Name = "Access"
adoCatalog.Tables.Append adoTable
adoConnection.Close

'dBase
adoConnection.Open
Set adoCatalog.ActiveConnection = adoConnection
Set adoTable.ParentCatalog = adoCatalog
adoTable.Properties.Item("Jet OLEDB:Link Datasource").Value = "E:\Borland\Shared\Data"
adoTable.Properties.Item("Jet OLEDB:Remote Table Name").Value = "animals#dbf"
adoTable.Properties.Item("Jet OLEDB:Create Link").Value = True
adoTable.Properties.Item("Jet OLEDB:Link Provider String").Value = "dBase 5.0"
adoTable.Name = "dBase5"
adoCatalog.Tables.Append adoTable
adoConnection.Close

'Excel
adoConnection.Open
Set adoCatalog.ActiveConnection = adoConnection
Set adoTable.ParentCatalog = adoCatalog
adoTable.Properties.Item("Jet OLEDB:Link Datasource").Value = "E:\Book97.xls"
adoTable.Properties.Item("Jet OLEDB:Remote Table Name").Value = "Sheet1$"
adoTable.Properties.Item("Jet OLEDB:Create Link").Value = True
adoTable.Properties.Item("Jet OLEDB:Link Provider String").Value = "Excel 5.0;HDR=NO;IMEX=2"
adoTable.Name = "Excel"
adoCatalog.Tables.Append adoTable
adoConnection.Close
'...
End Sub
'编程删除链接表
Private Sub Command3_Click()
Dim adoConnection As New ADODB.Connection
adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\LnkTbls.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123"
Dim adoCatalog As New ADOX.Catalog
Set adoCatalog.ActiveConnection = adoConnection
Dim j As Integer
Dim i As Integer
For i = adoCatalog.Tables.Count To 1 Step -1
If adoCatalog.Tables.Item(i - 1).Type = "LINK" Then
Debug.Print adoCatalog.Tables.Item(i - 1).Name
For j = 0 To adoCatalog.Tables.Item(i - 1).Properties.Count - 1
Debug.Print " " & adoCatalog.Tables.Item(i - 1).Properties.Item(j).Name & ": " & adoCatalog.Tables.Item(i - 1).Properties.Item(j).Value
Next j
Debug.Print VBA.vbCrLf
If VBA.MsgBox("Delete link table [" & adoCatalog.Tables.Item(i - 1).Name & "]?", vbYesNo) Then
adoCatalog.Tables.Delete adoCatalog.Tables.Item(i - 1).Name
End If
End If
Next i
End Sub

Private Sub Command4_Click()
Dim adoConnection As New ADODB.Connection
adoConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\LnkTbls.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123"
Dim adoCatalog As New ADOX.Catalog
Set adoCatalog.ActiveConnection = adoConnection
adoCatalog.Tables.Item("Excel").Properties.Item("Jet OLEDB:Link Provider String").Value = "Excel 5.0;HDR=yes;IMEX=2"
End Sub

Private Sub Form_Load()
Command1.Caption = "链接表信息"
Command2.Caption = "添加链接表"
Command3.Caption = "删除链接表"
Command4.Caption = "刷新链接表"
End Sub