通過向 SQL Server 項目添加“觸發器”創建 SQL 觸發器。成功部署后，就可以像其他任何 T-SQL 觸發器一樣調用和執行在托管代碼中創建的觸發器。使用托管語言編寫的觸發器可以使用 SqlTriggerContext 類獲得對相關信息的訪問，這些信息與 T-SQL 觸發器的可用信息相同。

注意; 在默認情況下，Microsoft SQL Server 中關閉了公共語言運行庫 (CLR) 集成功能。必須啟用該功能才能使用 SQL Server 項目項。若要啟用 CLR 集成，請使用 sp_configure 存儲過程的“啟用 clr”選項。有關更多信息，請參見 啟用 CLR 集成。注意; 顯示的對話框和菜單命令可能會與幫助中的描述不同，具體取決于您現用的設置或版本。若要更改設置，請在“工具”菜單上選擇“導入和導出設置”。有關更多信息，請參見 Visual Studio 設置。

創建 SQL Server 觸發器創建 SQL Server 觸發器打開一個現有的“SQL Server 項目”，或者創建一個新項目。有關更多信息，請參見 如何：創建 SQL Server 項目。

從“項目”菜單中選擇“添加新項”。

在 “添加新項”對話框 中選擇“觸發器”。

鍵入新觸發器的“名稱”。

添加觸發器執行時要運行的代碼。請參見下面的第一個示例。

注意; C++ 示例在編譯時必須使用 /clr:safe 編譯器選項。

對于 Visual Basic 和 Visual C#，在“解決方案資源管理器”中，打開“TestScripts”文件夾，再雙擊“Test.sql”文件。

對于 Visual C++，在“解決方案資源管理器”中，雙擊“debug.sql”文件。

將代碼添加到“Test.sql”（Visual C++ 中為“debug.sql”）文件中以執行觸發器。請參見下面的第二個示例。

按 F5 生成、部署并調試此觸發器。有關不進行調試直接部署的信息，請參見 如何：將 SQL Server 項目項部署到 SQL Server 中。

在 “輸出”窗口 中查看結果，然后選擇“從此處顯示輸出：數據庫輸出”。

示例此示例演示以下這種情況：用戶選擇他們需要的任何用戶名，但是您希望知道哪些用戶輸入了電子郵件地址作為用戶名。此觸發器檢測該信息并將它記錄到審核表。

Visual Basic 復制代碼Imports System.Data.SqlClientImports System.Text.RegularExpressionsImports Microsoft.SqlServer.Server

Partial Public Class Triggers

<SqlTrigger(Name:='UserNameAudit', Target:='Users', Event:='FOR INSERT')> _ Public Shared Sub UserNameAudit()

Dim triggContext As SqlTriggerContext = SqlContext.TriggerContext() Dim userName As New SqlParameter('@username', SqlDbType.NVarChar)

If triggContext.TriggerAction = TriggerAction.Insert Then

Using conn As New SqlConnection('context connection=true')

conn.Open() Dim sqlComm As New SqlCommand Dim sqlP As SqlPipe = SqlContext.Pipe()

sqlComm.Connection = conn sqlComm.CommandText = 'SELECT UserName from INSERTED'

userName.Value = sqlComm.ExecuteScalar.ToString()

If IsEMailAddress(userName.ToString) Then sqlComm.CommandText = 'INSERT UsersAudit(UserName) VALUES(username)' sqlP.Send(sqlComm.CommandText) sqlP.ExecuteAndSend(sqlComm) End If End Using End If End Sub

Public Shared Function IsEMailAddress(ByVal s As String) As Boolean

Return Regex.IsMatch(s, '^([w-]+.)*?[w-]+@[w-]+.([w-]+.)*?[w]+$') End FunctionEnd ClassC# 復制代碼using System.Data.SqlClient;using System.Text.RegularExpressions;using Microsoft.SqlServer.Server;

public partial class Triggers{ [SqlTrigger(Name='UserNameAudit', Target='Users', Event='FOR INSERT')] public static void UserNameAudit() { SqlTriggerContext triggContext = SqlContext.TriggerContext; SqlParameter userName = new SqlParameter('@username', System.Data.SqlDbType.NVarChar);

if (triggContext.TriggerAction == TriggerAction.Insert) { using (SqlConnection conn = new SqlConnection('context connection=true')) { conn.Open(); SqlCommand sqlComm = new SqlCommand(); SqlPipe sqlP = SqlContext.Pipe;

sqlComm.Connection = conn; sqlComm.CommandText = 'SELECT UserName from INSERTED';

userName.Value = sqlComm.ExecuteScalar().ToString();

if (IsEMailAddress(userName.ToString())) { sqlComm.CommandText = 'INSERT UsersAudit(UserName) VALUES(userName)'; sqlP.Send(sqlComm.CommandText); sqlP.ExecuteAndSend(sqlComm); } } } }

public static bool IsEMailAddress(string s) { return Regex.IsMatch(s, '^([w-]+.)*?[w-]+@[w-]+.([w-]+.)*?[w]+$'); }}C++ 復制代碼#include 'stdafx.h'

#using <System.dll>#using <System.Data.dll>#using <System.Xml.dll>

using namespace System;using namespace System::Data;using namespace System::Data::Sql;using namespace System::Data::SqlClient;using namespace System::Data::SqlTypes;using namespace System::Text::RegularExpressions;using namespace Microsoft::SqlServer::Server;

// In order to debug your Trigger, add the following to your debug.sql file://// -- Insert one user name that is not an e-mail address and one that is// INSERT INTO Users(UserName, Pass) VALUES(N'someone', N'cnffjbeq')// INSERT INTO Users(UserName, Pass) VALUES(N'[email protected]', N'cnffjbeq')//// -- check the Users and UsersAudit tables to see the results of the trigger// SELECT * FROM Users// SELECT * FROM UsersAudit//

public ref class AddNewTrigger{public: [SqlTrigger(Name='UserNameAudit', Target='Users', Event='FOR INSERT')] static void UserNameAudit() { SqlTriggerContext ^triggContext = SqlContext::TriggerContext; SqlParameter ^userName = gcnew SqlParameter('@username', System::Data::SqlDbType::NVarChar);

if (triggContext->TriggerAction == TriggerAction::Insert) { SqlConnection ^conn = gcnew SqlConnection('context connection=true'); conn->Open(); SqlCommand ^sqlComm = gcnew SqlCommand(); SqlPipe ^sqlP = SqlContext::Pipe;

sqlComm->Connection = conn; sqlComm->CommandText = 'SELECT UserName from INSERTED';

userName->Value = sqlComm->ExecuteScalar()->ToString();

if (IsEMailAddress(userName->ToString())) { sqlComm->CommandText = 'INSERT UsersAudit(UserName) VALUES(userName)'; sqlP->Send(sqlComm->CommandText); sqlP->ExecuteAndSend(sqlComm); }

conn->Close(); } }

static bool IsEMailAddress(String ^s) { return Regex::IsMatch(s, '^([w-]+.)*?[w-]+@[w-]+.([w-]+.)*?[w]+$'); }};

向位于項目的 TestScripts 文件夾中的 Test.sql 文件（Visual C++ 中為 debug.sql）添加代碼以執行和測試您的觸發器。例如，如果已部署了觸發器，您可以通過運行腳本對其進行測試，該腳本向設置了此觸發器的表中插入新行，從而可激發此觸發器。以下調試代碼假定存在具有以下定義的兩個表：

CREATE TABLE Users

(

UserName NVARCHAR(200) NOT NULL,

Pass NVARCHAR(200) NOT NULL

)

CREATE TABLE UsersAudit

(

UserName NVARCHAR(200) NOT NULL

)

復制代碼-- Insert one user name that is not an e-mail address and one that isINSERT INTO Users(UserName, Pass) VALUES(N'someone', N'cnffjbeq')INSERT INTO Users(UserName, Pass) VALUES(N'[email protected]', N'cnffjbeq')

-- check the Users and UsersAudit tables to see the results of the triggerselect * from Usersselect * from UsersAudit