批量修改所有服务器的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_FORWARDFORSELECT 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 = 0BEGIN  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;ENDCLOSE EmailAccount_Cursor;DEALLOCATE EmailAccount_Cursor;