清华大佬耗费三个月吐血整理的几百G的资源,免费分享!....>>>
use msdb
go
if exists (select * from sysobjects where name = N'sp_sqlagent_read_errorlog' and type ='P')
drop proc dbo.sp_sqlagent_read_errorlog
go
create proc dbo.sp_sqlagent_read_errorlog @fileversion int = null
as
set nocount on
declare @rc int
declare @version int
declare @pos int
declare @errorlog_file nvarchar(255)
declare @filename nvarchar(255)
declare @filename_no_ext nvarchar(255)
declare @dirname nvarchar(255)
declare @buf nvarchar(255)
-- SQL Server 7.0
if (charindex(N'7.00', @@version, 0) > 0)
begin
exec @rc = master.dbo.xp_regread
N'HKEY_LOCAL_MACHINE',
N'SOFTWARE\Microsoft\MSSQLServer\SQLServerAgent',
N'ErrorLogFile',
@errorlog_file OUTPUT,
N'no_output'
end
-- SQL Server 2000 needs to use instance aware Registry read
if (charindex(N'8.00', @@version, 0) > 0)
begin
exec @rc = master.dbo.xp_instance_regread
N'HKEY_LOCAL_MACHINE',
N'SOFTWARE\Microsoft\MSSQLServer\SQLServerAgent',
N'ErrorLogFile',
@errorlog_file OUTPUT,
N'no_output'
end
-- reverse the string to find the last slash '\'
select @buf = reverse(@errorlog_file)
-- determine posiktion of last slash, now first slash in reversed string
select @pos = len(@buf) - charindex(char(92), @buf, 0) + 1
-- extract the directory only part, part before the last slash
select @dirname = substring(@errorlog_file, 0, @pos)
-- extract the filename, part after the last slash
select @filename = substring(@errorlog_file, @pos + 1, len(@errorlog_file) - @pos)
-- extract the filename with extension, part after dot in @filename
select @filename_no_ext = substring(@filename, 0, charindex(N'.', @filename, 0))
-- change errorlog file to version X
if (@fileversion is not null)
select @errorlog_file = @dirname +N'\' + @filename_no_ext + N'.' + convert(nchar, @fileversion)
-- read file
exec master.dbo.xp_readerrorlog 1, @errorlog_file
go
-- sample usage
-- read currently active log file, SQLAGENT.OUT
-- exec msdb.dbo.sp_sqlagent_read_errorlog
-- read version 1 of log, SQLAGENT.1
-- exec msdb.dbo.sp_sqlagent_read_errorlog 1