Remova um usuário sem deixar dados orphan no SQL Server

Remova completamente os usuários do SQL Server sem deixar dados orfãos

Contexto

Soltar um usuário da seção de logins pode criar usuários órfãos nos bancos de dados, por isso é aconselhável que você remova o acesso ao banco de dados antes de excluir o usuário.

Isso pode ser bastante demorado, então armado com as várias informações que encontrei, surgiu o código abaixo.

Isso me salvou tempo ao remover os usuários, então espero que possa ajudá-lo.

SQL

DECLARE @UserName SysName='dfgsfdg'--Add Domain if Windows User
SET NOCOUNT ON
CREATE TABLE #UserTable(UserName sysname,GroupName sysname,LoginName sysname NULL,DefDBName sysname NULL,DefSchemaName sysname NULL,UserID smallint,SID smallint)
CREATE TABLE #Databases(DATABASE_NAME sysname,DATABASE_SIZE INT, REMARKS varchar(254))
INSERT INTO #Databases EXEC sp_databases

DECLARE @DBName sysname

DECLARE c1 CURSOR FOR (SELECT DATABASE_NAME FROM #Databases)
open c1
fetch next from c1 into @DBName
WHILE @@FETCH_STATUS= 0
BEGIN
PRINT @DBName
EXEC ('USE'+ @DBName +' INSERT INTO #UserTable EXEC sp_helpuser')
  IF (SELECT COUNT(*)FROM #UserTable WHERE UserName=@UserName)>0
  BEGIN
  PRINT'Removing '''+@UserName +''' FROM '+@DBName
  EXEC ('USE '+ @DBName +' EXEC sp_dropuser '''+@UserName +'''')
  END
DELETE FROM #UserTable--ClearTable
fetch next from c1 into @DBName
END
CLOSE C1
deallocate c1
PRINT 'Revoking Login'
IF CHARINDEX(@UserName,'\')>1 BEGIN
EXEC ('EXEC sp_revokelogin '''+ @UserName +'''')--Check string for domain info, assume windows if '/' found
END
IF CHARINDEX(@UserName,'\')=0 AND EXISTS(SELECT * FROM sys.server_principals WHERE name =@UserName) BEGIN--Check if SQL Login
EXEC ('DROP LOGIN ['+ @UserName +']')
END
DROP TABLE #UserTable
DROP TABLE #Databases