批量修改所有服务器的dbmail配置

DECLARE @EmailAccount sysname;
DECLARE @SmtpServer sysname;
DECLARE @EmailAddress NVARCHAR(120);
DECLARE @EmailSuffix NVARCHAR(32);
DECLARE @NewEamilAddress NVARCHAR(120);
--DECLARE @ActualEmailSuffix NVARCHAR(32)='xxxx.com';  SQL Server 2005不支持此功能,会报Cannot assign a default value to a local variable.
DECLARE @ActualEmailSuffix NVARCHAR(32);
DECLARE @ActualSmtpServer sysname;
 
SET @ActualEmailSuffix='xxx.com';
SET @ActualSmtpServer='192.168.xxx.xxx';
 
DECLARE EmailAccount_Cursor CURSOR FAST_FORWARD
FOR
SELECT sa.[name]        
      ,ss.[servername] 
      ,sa.email_address
  FROM [msdb].[dbo].[sysmail_server] ss 
  INNER JOIN [msdb].[dbo].[sysmail_account] sa
  ON ss.[account_id]=sa.[account_id];
 
 
OPEN EmailAccount_Cursor;
 
FETCH NEXT FROM EmailAccount_Cursor INTO @EmailAccount, @SmtpServer,@EmailAddress;
 
WHILE @@FETCH_STATUS = 0
BEGIN
 
    IF LTRIM(RTRIM(@SmtpServer))!=@ActualSmtpServer
    BEGIN
        
 
        EXECUTE msdb.dbo.sysmail_update_account_sp
             @account_name = @EmailAccount
            ,@mailserver_name=@ActualSmtpServer;
        
        PRINT @SmtpServer;
        PRINT @EmailAccount;
    END;
 
    SET @EmailSuffix=SUBSTRING(@EmailAddress,CHARINDEX('@',@EmailAddress)+1, LEN(@EmailAddress) -CHARINDEX('@',@EmailAddress))
 
    IF @EmailSuffix!=@ActualEmailSuffix
    BEGIN
        SET @NewEamilAddress= REPLACE(@EmailAddress,@EmailSuffix,@ActualEmailSuffix);
 
        EXECUTE msdb.dbo.sysmail_update_account_sp
             @account_name = @EmailAccount
            ,@email_address=@NewEamilAddress
            ,@mailserver_name=@SmtpServer;
 
        PRINT @EmailAccount;
        PRINT @NewEamilAddress;
 
 
    END;
 
    FETCH NEXT FROM EmailAccount_Cursor INTO @EmailAccount, @SmtpServer,@EmailAddress;
END
 
CLOSE EmailAccount_Cursor;
 
DEALLOCATE EmailAccount_Cursor;
posted @ 2017-09-18 21:42  王超元  阅读(311)  评论(0编辑  收藏  举报
友情链接:回力球鞋 | 中老年高档女装