如何：创建和运行 CLR SQL Server 存储过程
通过将“存储过程”项添加到 SQL Server 项目，可以创建 SQL 存储过程。成功部署到 SQL Server 之后，可通过与任何其他存储过程相同的方式调用和执行在托管代码中创建的存储过程。
注意
在默认情况下，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 中。
在“输出”窗口中查看结果，然后选择“从此处显示输出：数据库输出”。
示例
下面的代码示例创建一个存储过程，向 Adventure Works 示例数据库的 Currency 表中插入一条记录。并在创建了该存储过程之后，将其部署到 SQL Server。有关更多信息，请参见如何：将 SQL Server 项目项部署到 SQL Server 中。
Visual Basic 复制代码
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports Microsoft.SqlServer.Server
Partial Public Class StoredPRocedures
<SqlProcedure()> _
Public Shared Sub InsertCurrency( _
ByVal currencyCode As SqlString, ByVal name As SqlString)
Using conn As New SqlConnection("context connection=true")
Dim InsertCurrencyCommand As New SqlCommand()
Dim currencyCodeParam As New SqlParameter("@CurrencyCode", SqlDbType.NVarChar)
Dim nameParam As New SqlParameter("@Name", SqlDbType.NVarChar)
currencyCodeParam.Value = currencyCode
nameParam.Value = name
InsertCurrencyCommand.CommandText = _
"INSERT Sales.Currency (CurrencyCode, Name, ModifiedDate)" & _
" VALUES(@CurrencyCode, @Name)"
InsertCurrencyCommand.Connection = conn
conn.Open()
InsertCurrencyCommand.ExecuteNonQuery()
conn.Close()
End Using
End Sub
End Class
C# 复制代码
using System;
using System.Data;
using System.Data.SqlClient;
using System.Data.SqlTypes;
using Microsoft.SqlServer.Server;
public partial class StoredProcedures
{
[SqlProcedure()]
public static void InsertCurrency_CS(
SqlString currencyCode, SqlString name)
{
using (SqlConnection conn = new SqlConnection("context connection=true"))
{
SqlCommand InsertCurrencyCommand = new SqlCommand();
SqlParameter currencyCodeParam = new SqlParameter("@CurrencyCode", SqlDbType.NVarChar);
SqlParameter nameParam = new SqlParameter("@Name", SqlDbType.NVarChar);
InsertCurrencyCommand.CommandText =
"INSERT Sales.Currency (CurrencyCode, Name, ModifiedDate)" +
" VALUES(@CurrencyCode, @Name)";
InsertCurrencyCommand.Connection = conn;
conn.Open();
InsertCurrencyCommand.ExecuteNonQuery();
conn.Close();
}
}
}
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 Microsoft::SqlServer::Server;
// In order to debug your Stored Procedure, add the following to your debug.sql file:
//
// EXEC InsertCurrency_CPP 'AAA', 'Currency Test'
// SELECT * FROM Sales.Currency WHERE CurrencyCode = 'AAA'
public ref class StoredProcedures
{
public:
[SqlProcedure]
static void InsertCurrency_CPP(SqlString currencyCode, SqlString name)
{
SqlConnection ^conn = gcnew SqlConnection("context connection=true");
SqlCommand ^insertCurrencyCommand = gcnew SqlCommand();
SqlParameter ^currencyCodeParam =
gcnew SqlParameter("@CurrencyCode", SqlDbType::NVarChar);
SqlParameter ^nameParam =
gcnew SqlParameter("@Name", SqlDbType::NVarChar);
insertCurrencyCommand->CommandText =
"insert Sales.Currency(CurrencyCode, Name, ModifiedDate)" +
" values(@CurrencyCode, @Name)";
insertCurrencyCommand->Connection = conn;
conn->Open();
insertCurrencyCommand->ExecuteNonQuery();
conn->Close();
}
};
将用于执行和测试存储过程的代码添加到“Test.sql”（Visual C++ 中为“debug.sql”）文件中，该文件在项目的“TestScripts”文件夹中。例如，如果部署了一个存储过程，则可以通过调用 EXEC <StoredProcedureName> 并传入任何预期的参数来运行该过程。如果存储过程没有返回任何值，则请插入一段其他代码以验证存储过程是否对数据产生影响。
复制代码
EXEC InsertCurrency 'AAA', 'Currency Test'
SELECT * from Sales.Currency where CurrencyCode = 'AAA'
