|
 Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
 SQL SERVER 2005 - CREER UN ROLE AUTOMATIQUEMENT (MODE LECTEUR OU UTILISATEUR)
 Information sur la source
 Description
En cours de développement, on peut vouloir mettre en place un politique de gestion basée sur les ROLES SQL Server 2005. Or on a bien souvent déjà créé une quantité plus ou moins importante d'objets (tables, vues, SP, fonctions) pour lesquels il faut alors appliquer les droits à la main. Ce script vous permet de faire ce travail en spécifiant au départ le nom du rôle et le type de rôle (lecteur ou utilisateur).
 Source
USE [MaBase]
GO
DECLARE @RoleName AS VARCHAR(100)
DECLARE @SQL AS VARCHAR(MAX)
DECLARE @TypeRole AS INT
DECLARE @SQLCMD AS VARCHAR(200)
SET @RoleName = 'LECTEUR'
SET @TypeRole = 0 -- 0 = UNIQUEMENT dataReader/executeFN | 1 = dataReader/dataWriter/executeSP/executeFN |
------------------------------------------------------------------------------------------
---- CREATION DU ROLE
------------------------------------------------------------------------------------------
IF NOT EXISTS (SELECT * FROM sys.database_principals WHERE name = @RoleName AND type = 'R')
BEGIN
SET @SQL = 'CREATE ROLE ['+ @RoleName +'] AUTHORIZATION [dbo] '
EXECUTE (@SQL)
END
IF(@TypeRole = 1)
BEGIN
------------------------------------------------------------------------------------------
---- BOUCLE SUR LES TABLES ET VUES
---- AJOUTE LES DROITS DE MODIFICATION SUR LES TABLES ET VUES
------------------------------------------------------------------------------------------
PRINT '--------------------------------------------------------------------------------------------------'
PRINT '-- MISE EN PLACE DU ROLE UTILISATEUR SUR LES TABLES ET VUES : DROIT SUR LE SELECT/UPDATE/INSERT/DELETE ET EXECUTE DES SP ET FN'
DECLARE CURSORTABLESANDVUES CURSOR FOR SELECT '['+ TABLE_SCHEMA +'].['+ TABLE_NAME +']' AS TABLE_COMPLETE_NAME FROM INFORMATION_SCHEMA.TABLES
OPEN CURSORTABLESANDVUES
FETCH NEXT FROM CURSORTABLESANDVUES INTO @SQLCMD
WHILE (@@fetch_status >= 0)
BEGIN
SET @SQL = 'GRANT SELECT ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
SET @SQL = 'GRANT UPDATE ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
SET @SQL = 'GRANT DELETE ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
SET @SQL = 'GRANT INSERT ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
FETCH NEXT FROM CURSORTABLESANDVUES INTO @SQLCMD
END
CLOSE CURSORTABLESANDVUES
DEALLOCATE CURSORTABLESANDVUES
------------------------------------------------------------------------------------------
---- BOUCLE SUR LES FONCTIONS ET PROCEDURES STOCKEES
---- AJOUTE LES DROITS EXECUTE DES SP ET FONCTIONS
------------------------------------------------------------------------------------------
PRINT '--------------------------------------------------------------------------------------------------'
PRINT '-- MISE EN PLACE DU ROLE UTILISATEUR SP ET FUNCTION : DROIT SUR LE EXECUTE'
DECLARE CURSORSP CURSOR FOR SELECT '['+ sys.schemas.name +'].['+ sys.objects.name +']' AS SPFN_COMPLETE_NAME FROM sys.objects INNER JOIN sys.schemas ON sys.schemas.schema_id = sys.objects.schema_id WHERE sys.objects.type = 'P' OR sys.objects.type = 'FN' ORDER BY sys.objects.type, sys.objects.name
OPEN CURSORSP
FETCH NEXT FROM CURSORSP INTO @SQLCMD
WHILE (@@fetch_status >= 0)
BEGIN
SET @SQL = 'GRANT EXECUTE ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
FETCH NEXT FROM CURSORSP INTO @SQLCMD
END
CLOSE CURSORSP
DEALLOCATE CURSORSP
PRINT '--------------------------------------------------------------------------------------------------'
END
ELSE
BEGIN
------------------------------------------------------------------------------------------
---- BOUCLE SUR LES TABLES ET VUES
---- AJOUTE LES DROITS DE SELECTION SUR LES TABLES ET VUES
------------------------------------------------------------------------------------------
PRINT '--------------------------------------------------------------------------------------------------'
PRINT '-- MISE EN PLACE DU ROLE LECTEUR SUR LES TABLES ET VUES : DROIT SUR LE SELECT'
DECLARE CURSORTABLESANDVUES CURSOR FOR SELECT '['+ TABLE_SCHEMA +'].['+ TABLE_NAME +']' AS TABLE_COMPLETE_NAME FROM INFORMATION_SCHEMA.TABLES
OPEN CURSORTABLESANDVUES
FETCH NEXT FROM CURSORTABLESANDVUES INTO @SQLCMD
WHILE (@@fetch_status >= 0)
BEGIN
SET @SQL = 'GRANT SELECT ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
FETCH NEXT FROM CURSORTABLESANDVUES INTO @SQLCMD
END
CLOSE CURSORTABLESANDVUES
DEALLOCATE CURSORTABLESANDVUES
------------------------------------------------------------------------------------------
---- BOUCLE SUR LES FONCTIONS
---- AJOUTE LES DROITS EXECUTE DES FONCTIONS
------------------------------------------------------------------------------------------
PRINT '--------------------------------------------------------------------------------------------------'
PRINT '-- MISE EN PLACE DU ROLE LECTEUR FUNCTION : DROIT SUR LE EXECUTE'
DECLARE CURSORSP CURSOR FOR SELECT '['+ sys.schemas.name +'].['+ sys.objects.name +']' AS SPFN_COMPLETE_NAME FROM sys.objects INNER JOIN sys.schemas ON sys.schemas.schema_id = sys.objects.schema_id WHERE sys.objects.type = 'FN' ORDER BY sys.objects.type, sys.objects.name
OPEN CURSORSP
FETCH NEXT FROM CURSORSP INTO @SQLCMD
WHILE (@@fetch_status >= 0)
BEGIN
SET @SQL = 'GRANT EXECUTE ON '+ @SQLCMD +' TO ['+ @RoleName +']'
PRINT (@SQL)
EXECUTE (@SQL)
FETCH NEXT FROM CURSORSP INTO @SQLCMD
END
CLOSE CURSORSP
DEALLOCATE CURSORSP
PRINT '--------------------------------------------------------------------------------------------------'
END
 Conclusion
Bon coding Romelard Fabrice [MVP]
 Sources du même auteur
 Sources de la même categorie
Sources en rapport avec celle ci
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
Fonction Difference (soundex) SQL server [ par oluha ]
BonjourJ'ai besoin d'utiliser la fonction Difference (qui se base sur le soundex) mais je trouve qu'elle n'est pas assez précise du fait que le sounde
CREATION DE TYPE TABLE [ par AABS ]
Bonjour tout le mondeje travaille sous SQL* Plus (de Oracle 8i)et j'ai fait les instructions suivantes:CREATE TYPE ADRESSE AS OBJECT (RUE CHAR(20),VIL
creation d'index sous ms sql serveur ? [ par jimmy69 ]
Bonjour a tous, Mes tables sont presque crees sous ms sql serveur 2000...J'avais lu un article sur l'utilite de la creation d' index ...sur les tables
privilège group, role, grant [ par rabbiwan ]
BonjourJ'ai une petite question.Voila je voudrai administrer des utilisateurs à travers des groups, en mettant les privilèges sur le gr
Like dans une procédure stockée [ par veronique1 ]
Bonjour à tous,j'utilise une requête dans une procédure stockée avec un like , la valeur provient d'un paramètre , et ma rqu&
probleme de creation de requete sql server [ par firas_tn ]
Bonjour a tous je suis débutant en sql server, j'ai une base de donnée en sql server et une table qui m'intéresse ou il ya beaucoup de
Erreur sur fonction IIF sous SQL server ? [ par mmaidev ]
La fonction "UPDATE Tab_NumCycle SET Cycle = IIF(cycle>4999,1,cycle + 1) qui fonctionnait avec une base Acces ne fonctionne pas avec une base SQL;
Existe-il une fonction qui retourne toujours la dernière ligne d'une table [ par SwatchDev ]
La question est dans le titre... "Existe-il une fonction qui retourne toujours la dernière ligne d'une table"Dans mon cas, ça serait pour fa
utilisation d'une fonction dans une requête [ par Marie15 ]
Bonjour,j'ai un petit problème avec ma requête.En effet dans celle-ci je doit utiliser une fonction 'f' de cette facon:select champ1,champ2,
fonction nvl [ par Rjoe ]
Bonjouravec quoi remplace t'on dans access pour nvl( , )exemple:select sum(nvl(montant_facture,0)) from FACTUREmerciio
|
 Téléchargements
Logiciels à télécharger sur le même thème :
|