Creazione, modifica e rimozione di chiavi esterne
In SMO (SQL Server Management Objects) le chiavi esterne sono rappresentate dall'oggetto ForeignKey.
Per creare una chiave esterna in SMO, è necessario specificare la tabella in cui la chiave esterna viene definita nel costruttore dell'oggetto ForeignKey. Dalla tabella, è necessario selezionare almeno una colonna che rappresenti la chiave esterna. A questo scopo, creare una variabile oggetto ForeignKeyColumn e specificare il nome della colonna che rappresenta la chiave esterna. Specificare quindi la tabella e la colonna a cui si fa riferimento. Utilizzare il metodo Add per aggiungere la colonna alla proprietà dell'oggetto Columns.
Le colonne che rappresentano la chiave esterna sono elencate nella proprietà dell'oggetto Columns dell'oggetto ForeignKey. La chiave primaria a cui la chiave esterna fa riferimento è rappresentata dalla proprietà ReferencedKey che si trova nella tabella specificata nella proprietà ReferencedTable.
Esempio
Per utilizzare qualsiasi esempio di codice fornito, è necessario scegliere l'ambiente, il modello e il linguaggio di programmazione per la creazione dell'applicazione. Per ulteriori informazioni, vedere Procedura: Creazione di un progetto Visual Basic SMO in Visual Studio .NET o Procedura: Creazione di un progetto Visual C# SMO in Visual Studio .NET.
Creazione, modifica e rimozione di una chiave esterna in Visual Basic
In questo esempio di codice viene illustrato come creare una relazione di chiave esterna tra una o più colonne in una tabella e una colonna chiave primaria in un'altra tabella.
'Connect to the local, default instance of SQL Server.
Dim srv As Server
srv = New Server
'Reference the AdventureWorks2008R2 database.
Dim db As Database
db = srv.Databases("AdventureWorks2008R2")
'Declare a Table object variable and reference the Employee table.
Dim tbe As Table
tbe = db.Tables("Employee", "HumanResources")
'Declare another Table object variable and reference the EmployeeDepartmentHistory table.
Dim tbea As Table
tbea = db.Tables("EmployeeDepartmentHistory", "HumanResources")
'Define a Foreign Key object variable by supplying the EmployeeDepartmentHistory as the parent table and the foreign key name in the constructor.
Dim fk As ForeignKey
fk = New ForeignKey(tbea, "test_foreignkey")
'Add BusinessEntityID as the foreign key column.
Dim fkc As ForeignKeyColumn
fkc = New ForeignKeyColumn(fk, "BusinessEntityID", "BusinessEntityID")
fk.Columns.Add(fkc)
'Set the referenced table and schema.
fk.ReferencedTable = "Employee"
fk.ReferencedTableSchema = "HumanResources"
'Create the foreign key on the instance of SQL Server.
fk.Create()
Creazione, modifica e rimozione di una chiave esterna in Visual C#
In questo esempio di codice viene illustrato come creare una relazione di chiave esterna tra una o più colonne in una tabella e una colonna chiave primaria in un'altra tabella.
{
//Connect to the local, default instance of SQL Server.
Server srv;
srv = new Server();
//Reference the AdventureWorks2008R2 database.
Database db;
db = srv.Databases["AdventureWorks2008R2"];
//Declare another Table object variable and reference the EmployeeDepartmentHistory table.
Table tbea;
tbea = db.Tables["EmployeeDepartmentHistory", "HumanResources"];
//Define a Foreign Key object variable by supplying the EmployeeDepartmentHistory as the parent table and the foreign key name in the constructor.
ForeignKey fk;
fk = new ForeignKey(tbea, "test_foreignkey");
//Add BusinessEntityID as the foreign key column.
ForeignKeyColumn fkc;
fkc = new ForeignKeyColumn(fk, "BusinessEntityID", "BusinessEntityID");
fk.Columns.Add(fkc);
//Set the referenced table and schema.
fk.ReferencedTable = "Employee";
fk.ReferencedTableSchema = "HumanResources";
//Create the foreign key on the instance of SQL Server.
fk.Create();
}
Creazione, modifica e rimozione di una chiave esterna in PowerShell
In questo esempio di codice viene illustrato come creare una relazione di chiave esterna tra una o più colonne in una tabella e una colonna chiave primaria in un'altra tabella.
# Set the path context to the local, default instance of SQL Server and to the
#database tables in Adventureworks2008R2
CD \sql\localhost\default\databases\AdventureWorks2008R2\Tables\
#Get reference to the FK table
$tbea = get-item HumanResources.EmployeeDepartmentHistory
# Define a Foreign Key object variable by supplying the EmployeeDepartmentHistory
# as the parent table and the foreign key name in the constructor.
$fk = New-Object -TypeName Microsoft.SqlServer.Management.SMO.ForeignKey `
-argumentlist $tbea, "test_foreignkey"
#Add BusinessEntityID as the foreign key column.
$fkc = New-Object -TypeName Microsoft.SqlServer.Management.SMO.ForeignKeyColumn `
-argumentlist $fk, "BusinessEntityID", "BusinessEntityID"
$fk.Columns.Add($fkc)
#Set the referenced table and schema.
$fk.ReferencedTable = "Employee"
$fk.ReferencedTableSchema = "HumanResources"
#Create the foreign key on the instance of SQL Server.
$fk.Create()
Esempio: chiavi esterne, chiavi primarie e colonne con vincolo univoco
In questo esempio vengono illustrate le operazioni seguenti:
Individuazione di una chiave esterna in un oggetto esistente.
Modalità di creazione di una chiave primaria.
Modalità di creazione di una colonna con vincolo univoco.
Versione C# di questo esempio:
// compile with:
// /r:Microsoft.SqlServer.Smo.dll
// /r:microsoft.sqlserver.management.sdk.sfc.dll
// /r:Microsoft.SqlServer.ConnectionInfo.dll
// /r:Microsoft.SqlServer.SqlEnum.dll
using Microsoft.SqlServer.Management.Smo;
using Microsoft.SqlServer.Management.Sdk.Sfc;
using Microsoft.SqlServer.Management.Common;
using System;
public class A {
public static void Main() {
Server svr = new Server();
Database db = new Database(svr, "TESTDB");
db.Create();
// PK Table
Table tab1 = new Table(db, "Table1");
// Define Columns and add them to the table
Column col1 = new Column(tab1, "Col1", DataType.Int);
col1.Nullable = false;
tab1.Columns.Add(col1);
Column col2 = new Column(tab1, "Col2", DataType.NVarChar(50));
tab1.Columns.Add(col2);
Column col3 = new Column(tab1, "Col3", DataType.DateTime);
tab1.Columns.Add(col3);
// Create the ftable
tab1.Create();
// Define Index object on the table by supplying the Table1 as the parent table and the primary key name in the constructor.
Index pk = new Index(tab1, "Table1_PK");
pk.IndexKeyType = IndexKeyType.DriPrimaryKey;
// Add Col1 as the Index Column
IndexedColumn idxCol1 = new IndexedColumn(pk, "Col1");
pk.IndexedColumns.Add(idxCol1);
// Create the Primary Key
pk.Create();
// Create Unique Index on the table
Index unique = new Index(tab1, "Table1_Unique");
unique.IndexKeyType = IndexKeyType.DriUniqueKey;
// Add Col1 as the Unique Index Column
IndexedColumn idxCol2 = new IndexedColumn(unique, "Col2");
unique.IndexedColumns.Add(idxCol2);
// Create the Unique Index
unique.Create();
// Create Table2
Table tab2 = new Table(db, "Table2");
Column col21 = new Column(tab2, "Col21", DataType.NChar(20));
tab2.Columns.Add(col21);
Column col22 = new Column(tab2, "Col22", DataType.Int);
tab2.Columns.Add(col22);
tab2.Create();
// Define a Foreign Key object variable by supplying the Table2 as the parent table and the foreign key name in the constructor.
ForeignKey fk = new ForeignKey(tab2, "Table2_FK");
// Add Col22 as the foreign key column.
ForeignKeyColumn fkc = new ForeignKeyColumn(fk, "Col22", "Col1");
fk.Columns.Add(fkc);
fk.ReferencedTable = "Table1";
// Create the foreign key on the instance of SQL Server.
fk.Create();
// Get list of Foreign Keys on Table2
foreach (ForeignKey f in tab2.ForeignKeys) {
Console.WriteLine(f.Name + " " + f.ReferencedTable + " " + f.ReferencedKey);
}
// Get list of Foreign Keys referencing table1
foreach (Table tab in db.Tables) {
if (tab == tab1)
continue;
foreach (ForeignKey f in tab.ForeignKeys) {
if (f.ReferencedTable.Equals(tab1.Name))
Console.WriteLine(f.Name + " " + f.Parent.Name);
}
}
}
}
Versione Visual Basic dell'esempio:
' compile with:
' /r:Microsoft.SqlServer.Smo.dll
' /r:microsoft.sqlserver.management.sdk.sfc.dll
' /r:Microsoft.SqlServer.ConnectionInfo.dll
' /r:Microsoft.SqlServer.SqlEnum.dll
Imports Microsoft.SqlServer.Management.Smo
Imports Microsoft.SqlServer.Management.Sdk.Sfc
Imports Microsoft.SqlServer.Management.Common
Public Class A
Public Shared Sub Main()
Dim svr As New Server()
Dim db As New Database(svr, "TESTDB")
db.Create()
' PK Table
Dim tab1 As New Table(db, "Table1")
' Define Columns and add them to the table
Dim col1 As New Column(tab1, "Col1", DataType.Int)
col1.Nullable = False
tab1.Columns.Add(col1)
Dim col2 As New Column(tab1, "Col2", DataType.NVarChar(50))
tab1.Columns.Add(col2)
Dim col3 As New Column(tab1, "Col3", DataType.DateTime)
tab1.Columns.Add(col3)
' Create the ftable
tab1.Create()
' Define Index object on the table by supplying the Table1 as the parent table and the primary key name in the constructor.
Dim pk As New Index(tab1, "Table1_PK")
pk.IndexKeyType = IndexKeyType.DriPrimaryKey
' Add Col1 as the Index Column
Dim idxCol1 As New IndexedColumn(pk, "Col1")
pk.IndexedColumns.Add(idxCol1)
' Create the Primary Key
pk.Create()
' Create Unique Index on the table
Dim unique As New Index(tab1, "Table1_Unique")
unique.IndexKeyType = IndexKeyType.DriUniqueKey
' Add Col1 as the Unique Index Column
Dim idxCol2 As New IndexedColumn(unique, "Col2")
unique.IndexedColumns.Add(idxCol2)
' Create the Unique Index
unique.Create()
' Create Table2
Dim tab2 As New Table(db, "Table2")
Dim col21 As New Column(tab2, "Col21", DataType.NChar(20))
tab2.Columns.Add(col21)
Dim col22 As New Column(tab2, "Col22", DataType.Int)
tab2.Columns.Add(col22)
tab2.Create()
' Define a Foreign Key object variable by supplying the Table2 as the parent table and the foreign key name in the constructor.
Dim fk As New ForeignKey(tab2, "Table2_FK")
' Add Col22 as the foreign key column.
Dim fkc As New ForeignKeyColumn(fk, "Col22", "Col1")
fk.Columns.Add(fkc)
fk.ReferencedTable = "Table1"
' Create the foreign key on the instance of SQL Server.
fk.Create()
' Get list of Foreign Keys on Table2
For Each f As ForeignKey In tab2.ForeignKeys
Console.WriteLine((f.Name + " " + f.ReferencedTable & " ") + f.ReferencedKey)
Next
' Get list of Foreign Keys referencing table1
For Each tab As Table In db.Tables
If (tab.Name.Equals(tab1.Name)) Then
Continue For
End If
For Each f As ForeignKey In tab.ForeignKeys
If f.ReferencedTable.Equals(tab1.Name) Then
Console.WriteLine(f.Name + " " + f.Parent.Name)
End If
Next
Next
End Sub
End Class