SQL SERVER 2000 - CREER DES INDEXES SUR UN CHAMP EXISTANT DANS TOUTES LES TABLES DE LA BASE indexes, index, sqlserver, sql2000, creation, Source N°40793

Information sur la source

Catégorie :Tâches Classé sous : indexes, index, sqlserver, sql2000, creation Niveau : Expert Date de création : 20/12/2006 Vu : 2 665

Auteur : fabrice69

Site perso

Ecrire un message privé

Ce membre participe au partage de revenus publicitaires

Note :
Aucune note

Commentaire sur cette source (1)

Ajouter un commentaire et/ou une note

Description

Dans le même ordre d'idée que la source :
- http://www.sqlfr.com/code.aspx?ID=39938

Voila le script qui effectue la création des indexes sur un ensemble de tables sur une base SQL Server 2000.

Source

-----------------------------------------------------------------
USE [MaDataBase]
-----------------------------------------------------------------
-- Spécification du champ qui doit être indexé
-----------------------------------------------------------------
DECLARE @NOM_CHAMP AS VARCHAR(50)
SET @NOM_CHAMP = 'MonNomDeChamp'
-----------------------------------------------------------------
DECLARE @TCompleteName AS VARCHAR(500)
DECLARE @SQL AS VARCHAR(4000)
DECLARE @NomIDX AS VARCHAR(500)
-----------------------------------------------------------------
-- Déclaration du Curseur de sélection
-----------------------------------------------------------------
DECLARE TESTCURSEUR CURSOR
FOR SELECT
'[IDX_'+ UPPER(TAB.TABLE_NAME) +'_'+ UPPER(@NOM_CHAMP) +']' AS TIndex,
'['+ TAB.TABLE_SCHEMA +'].['+ TAB.TABLE_NAME +']' AS TCompleteName
FROM
INFORMATION_SCHEMA.COLUMNS COL
INNER JOIN INFORMATION_SCHEMA.TABLES TAB
ON (TAB.TABLE_SCHEMA = COL.TABLE_SCHEMA AND TAB.TABLE_NAME = COL.TABLE_NAME)
LEFT OUTER JOIN dbo.sysindexes IDX
ON IDX.name = 'IDX_'+ UPPER(TAB.TABLE_NAME) +'_'+ UPPER(@NOM_CHAMP)
WHERE
COL.COLUMN_NAME = @NOM_CHAMP
AND
TAB.TABLE_TYPE = 'BASE TABLE'
AND
IDX.name IS NULL
-----------------------------------------------------------------
-- Déclaration du Curseur sur la liste des Bases de données
OPEN TESTCURSEUR
FETCH NEXT FROM TESTCURSEUR INTO @NomIDX, @TCompleteName
WHILE (@@FETCH_STATUS >= 0)
BEGIN
SET @SQL = 'CREATE NONCLUSTERED INDEX '+ @NomIDX +' ON '+ @TCompleteName +' (['+ @NOM_CHAMP +'] ASC) ON [PRIMARY]'
EXECUTE (@SQL)
FETCH NEXT FROM TESTCURSEUR
INTO @NomIDX, @TCompleteName
END
-----------------------------------------------------------------
-- Fermeture du Curseur
CLOSE TESTCURSEUR
-- Libération de la mémoire prise par le Curseur
DEALLOCATE TESTCURSEUR
-----------------------------------------------------------------

----------------------------------------------------------------- 
USE [MaDataBase] 
  
----------------------------------------------------------------- 
-- Spécification du champ qui doit être indexé 
----------------------------------------------------------------- 
DECLARE @NOM_CHAMP AS VARCHAR(50) 
SET @NOM_CHAMP = 'MonNomDeChamp' 
  
----------------------------------------------------------------- 
DECLARE @TCompleteName AS VARCHAR(500) 
DECLARE @SQL AS VARCHAR(4000) 
DECLARE @NomIDX AS VARCHAR(500) 
  
----------------------------------------------------------------- 
-- Déclaration du Curseur de sélection 
----------------------------------------------------------------- 
DECLARE TESTCURSEUR CURSOR 
   FOR SELECT 
    '[IDX_'+ UPPER(TAB.TABLE_NAME) +'_'+ UPPER(@NOM_CHAMP) +']' AS TIndex, 
    '['+ TAB.TABLE_SCHEMA +'].['+ TAB.TABLE_NAME +']' AS TCompleteName 
FROM 
    INFORMATION_SCHEMA.COLUMNS COL 
INNER JOIN INFORMATION_SCHEMA.TABLES TAB 
    ON (TAB.TABLE_SCHEMA = COL.TABLE_SCHEMA AND TAB.TABLE_NAME = COL.TABLE_NAME) 
LEFT OUTER JOIN dbo.sysindexes IDX 
    ON IDX.name = 'IDX_'+ UPPER(TAB.TABLE_NAME) +'_'+ UPPER(@NOM_CHAMP)     
WHERE 
    COL.COLUMN_NAME = @NOM_CHAMP 
AND 
    TAB.TABLE_TYPE = 'BASE TABLE' 
AND 
    IDX.name IS NULL 
  
----------------------------------------------------------------- 
-- Déclaration du Curseur sur la liste des Bases de données 
OPEN TESTCURSEUR 
FETCH NEXT FROM TESTCURSEUR INTO @NomIDX, @TCompleteName 
    
WHILE (@@FETCH_STATUS >= 0) 
    BEGIN 
         
        SET @SQL = 'CREATE NONCLUSTERED INDEX '+ @NomIDX +' ON '+ @TCompleteName +' (['+ @NOM_CHAMP +'] ASC) ON [PRIMARY]' 

	EXECUTE (@SQL) 
  
        FETCH NEXT FROM TESTCURSEUR 
        INTO @NomIDX, @TCompleteName 
    END 
  
----------------------------------------------------------------- 
-- Fermeture du Curseur 
CLOSE TESTCURSEUR 
   
-- Libération de la mémoire prise par le Curseur 
DEALLOCATE TESTCURSEUR 
  
-----------------------------------------------------------------

Conclusion

Bon coding

Romelard Fabrice [MVP]

Sources du même auteur

Toutes les sources de fabrice69

Sources de la même categorie

Toutes les sources de la catégorie Tâches

Sources en rapport avec celle ci

Commentaires

Commentaire de amina2986 le 08/02/2007 11:27:07

bien

Ajouter un commentaire

Discussions en rapport avec ce code source

creation d'index sous ms sql serveur ? par jimmy69

probleme de creation de requete sql server par firas_tn

Sauvegarde automatique sqlserver 2000 par jojos89

aide pour SQLSERVER par nagrom_om

ms access - sqlserver - procédurestockée par metasky

combien d'index faut il créer ? par vincentstryckmans

Quel outil pour SqlServer par padurand

exporter des donnees de sqlserver 2005 vers access (dts) par tenrod

SQLServer remplacer Null par 0 par BasicInstinct

creation d'un fichier bat en sql sous sql server par dbaf