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