SQLServer 2005触发器调用批处理文件

1.首先在Visual Stdio 2005中建立一个 VB 数据库Sql Server 工程，工程名为【MyCLRProcedure】，如下图


2.选择数据库链接

3.在新建工程上右键 →　追加  →　StoredProcedures，选择StoredProcedures ，设置名称为【MyProc.vb】,程序如下

Partial Public Class StoredProceduresClass StoredProcedures
    <Microsoft.SqlServer.Server.SqlProcedure()> _
    Public Shared Sub MyProc()Sub  MyProc ()
        ' コードをここに追加してください
    End Sub
End Class

在绿色注释部分追加调用bat文件的操作，本例是创建一个文件夹，带一个参数做为文件夹名。
run.bat文件内容如下：

@echo ■■■Trigger Test Start ■■■
if "%1"=="" goto END
set DIRNAME=%1

rmdir c:temp%DIRNAME%
mkdir c:temp%DIRNAME%

:END
@echo ■■■Trigger Test End   ■■■
pause

修改MyProc方法如下，追加一个参数【dirname】做为文件夹名：

    Public Shared Sub MyProc()Sub MyProc(ByVal dirname As String)
        ' コードをここに追加してください
        SqlContext.Pipe.Send("MyProcStart！")
        Try
            Dim objExecuteFile As New System.Diagnostics.ProcessStartInfo
            Dim objExecute As New System.Diagnostics.Process
            objExecuteFile.FileName = "c: emp un.bat"
            SqlContext.Pipe.Send(objExecuteFile.FileName)
            objExecuteFile.Arguments = dirname
            objExecuteFile.UseShellExecute = True
            objExecute.StartInfo = objExecuteFile
            objExecute.Start()
        Catch ex As Exception
            SqlContext.Pipe.Send(ex.ToString)
        End Try
        SqlContext.Pipe.Send("MyProc End！")
    End Sub

将做成的【MyProc.vb】拷贝到【D：】盘根目录，打开【Microsoft .NET Framework SDK v2.0】  →　【SDK Command Prompt】，键入以下命令

C:Program FilesMicrosoft Visual Studio 8SDKv2.0>vbc /target:library D:MyProc.vb
Microsoft(R) Visual Basic Compiler Version 8.0.50727.42
for Microsoft(R) .NET Framework version 2.0.50727.42
Copyright (C) Microsoft Corporation.  All rights reserved.


C:Program FilesMicrosoft Visual Studio 8SDKv2.0>

生成【MyProc.dll】文件，拷贝至数据库服务器上的【C:/temp】目录下。

4.打开【Microsoft SQL Server 2005】 →　【SQL Server Management Studio】，在【DataBase】 【数据库名】 【Programming】 【ASSEMBLY】上右键选中【New ASSEMBLY】，弹出新窗口，选择上步生成的【MyProc.dll】文件。

点击OK即可

5.建立一个Procedure，在上步【ASSEMBLY】同级别目录下选择【StoredProcedures】，右键新建一个【StoredProcedures】，修改内容为如下表示：

CREATE PROCEDURE MyProcedure
      @dirname   nchar(10)
AS
EXTERNAL NAME MyProc.StoredProcedures.MyProc

6.在需要操作的数据表下的【Trigger】上右键选择新建，修改为如下：

CREATE TRIGGER MyTrigger 
   ON  DateTable 
   AFTER INSERT,DELETE,UPDATE
AS 
EXEC MyProcedure AABBCC

其中【AABBCC】为传入的参数。点击OK，创建完毕，下面进行测试。

7.执行数据表删除语句，查看后台信息。

DELETE FROM DateTable where id = '11'

后台信息如下：
MyProc Start！
c:/temp/run.bat
MyProc End！

(1 行処理されました)

再看服务器上【C:/temp】目录下，新建了一个【AABBCC】文件夹。