zoukankan      html  css  js  c++  java
  • 邮件发送过去24小时的自增长事件(MSSQL)

    此脚本需要启用DBMail以支持邮件的发送。可设为每日运行的JOB以追踪自增长事件,以便做出适当的调整。

    -- Email the Auto-growth events that have occurred in the last 24 hours to the DBA
    
    -- This script will email DBA if a auto-grow event occurred in the last day
    -- Date: 3/09/2026
    
    DECLARE @filename NVARCHAR(1000);
    DECLARE @bc INT;
    DECLARE @ec INT;
    DECLARE @bfn VARCHAR(1000);
    DECLARE @efn VARCHAR(10);
    DECLARE @DL VARCHAR(1000); -- email distribution list
    DECLARE @ReportHTML  NVARCHAR(MAX);
    DECLARE @Subject NVARCHAR (250);
    
    -- Set email distrubution list value
    SET @DL = 'xxxx@qq.com' -- Chanage these to the recipients you wish to get the email
    
    -- Get the name of the current default trace
    SELECT @filename = CAST(value AS NVARCHAR(1000))
    FROM ::fn_trace_getinfo(DEFAULT)
    WHERE traceid = 1 AND property = 2;
    
    -- SELECT @filename
    -- rip apart file name into pieces
    SET @filename = REVERSE(@filename);
    SET @bc = CHARINDEX('.',@filename);
    SET @ec = CHARINDEX('_',@filename)+1;
    SET @efn = REVERSE(SUBSTRING(@filename,1,@bc));
    SET @bfn = REVERSE(SUBSTRING(@filename,@ec,LEN(@filename)));
    
    -- set filename without rollover number
    SET @filename = @bfn + @efn
    
    SELECT @filename
    
    -- Any Events Occur in the last day
    IF EXISTS (SELECT *
                 FROM ::fn_trace_gettable(@filename, DEFAULT) AS ftg 
                   WHERE (EventClass = 92  -- Date File Auto-grow
                       OR EventClass = 93) -- Log File Auto-grow
                      AND StartTime > DATEADD(dy,-1,GETDATE())) 
    BEGIN -- If there are autogrows in the last day 
      SET @ReportHTML =
        N'<H1>' + N'Auto-grow Events for ' + 
       CAST(SERVERPROPERTY('MachineName') AS NVARCHAR(128)) + 
        + CASE WHEN SERVERPROPERTY('InstanceName') IS NULL 
               THEN ''  
               ELSE N'' +  CAST(SERVERPROPERTY('InstanceName') AS NVARCHAR(128)) 
          END +
        N'</H1>' +
        N'<table border="1">' +
        N'<tr><th>Start Time</th><th>Event Name</th>' +
        N'<th>Database Name</th><th>File Name</th><th>Growth in MB</th>' +
        N'<th>Duration in MS</th></tr>' +
        CAST((SELECT 
                  td = ftg.StartTime, '',
                  td = te.name, '',
                  td = DB_NAME(ftg.DatabaseID), '',
                  td = [FileName], '',
                  td =(ftg.IntegerData*8)/1024.0, '', 
                  td = (ftg.Duration/1000) 
              FROM ::fn_trace_gettable(@filename, DEFAULT) AS ftg 
                   INNER JOIN sys.trace_events AS te ON ftg.EventClass = te.trace_event_id  
              WHERE (EventClass = 92  -- Date File Auto-grow
                  OR EventClass = 93) -- Log File Auto-grow 
                 AND StartTime > DATEADD(dy,-1,GETDATE()) -- Less than 1 day ago
              ORDER BY StartTime  
              FOR XML PATH('tr'), TYPE 
        ) AS NVARCHAR(MAX) ) +
        N'</table>' ;
        
    
        
        -- Build the subject line with server and instance name
        SET @Subject = 'Auto-grow Events in Last Day ' + 
                       CAST(SERVERPROPERTY('MachineName') AS NVARCHAR(128)) + 
                     + CASE WHEN SERVERPROPERTY('InstanceName') IS NULL 
                            THEN ''  
                            ELSE N'' +  CAST(SERVERPROPERTY('InstanceName') AS NVARCHAR(128)) 
                       END 
    
        -- Send email to distribution list.     
        EXEC msdb.dbo.sp_send_dbmail @recipients=@DL,
               @subject = @Subject,  
               @body = @ReportHTML,
               @body_format = 'HTML'
             --  @profile_name='webmaster' ; -- Change this to your profile name
    END; -- If there are autogrows in the last day

     效果图如下:

  • 相关阅读:
    v-cloak无效解决方法
    堆栈,托管堆,堆,栈的区别
    2018-3-25至2018-8-9的日语笔记
    windows下远程连接redis
    windows cmd打开共享文件夹
    C#数据分组
    安装pyspider遇到的坑
    argument 1 must be 2-item sequence, not int
    python,pip环境变量设置
    python编程学习--Pygame
  • 原文地址:https://www.cnblogs.com/Geton/p/5256743.html
Copyright © 2011-2022 走看看