压缩数据库(SQL)

--压缩系统所有资料库
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[PDBSHRINK]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[PDBSHRINK]
GO

SET QUOTED_IDENTIFIER ON 
GO
SET ANSI_NULLS ON 
GO

--压缩系统所有资料库
CREATE  PROCEDURE  PDBSHRINK  
@DISKPATH VARCHAR(100)
 AS

DECLARE  @DSTR VARCHAR(100),    
                    @SQLSTR VARCHAR(200),
                    @MAXID INT,
                    @DBNAME VARCHAR(30)

declare cur1 cursor for
select NAME  from MASTER.DBO.sysdatabases where NAME NOT IN ('master','tempdb','model','msdb','pubs','northwind') order by NAME
open cur1
fetch next from cur1 into @DBNAME
while @@fetch_status = 0
begin
    
    SET @SQLSTR='DUMP  TRANSACTION  '+@DBNAME+' WITH  NO_LOG '
    EXEC(@SQLSTR)
    PRINT @SQLSTR