lundi 16 novembre 2009

[SQL Server 2008]Login associé à dbo est vide


Lors de la restauration d’une base de données, si le login propriétaire de dbo n’existe pas sur le nouveau serveur, le login associé à dbo est vide.

Nous pouvons modifier le login associé à l'utilisateur dbo avec la commande:

'sp_changedbowner login'

Par exemple, si on souhaite définir sa en tant que dbo sur la base de données nommée TEST :

1. Aller dans SQL Server Management Studio


2. Sélectionner la base de données


3. Cliquer droit puis sélectionner Nouvelle Requête


4. Exécuter la commande sp_changedbowner sa

jeudi 30 juillet 2009

SQL Server 2000 Mettre à jour le contenu d’une colonne du type NTEXT

Ci-dessous le script que j’ai utilisé pour mettre à jour une colonne du type NTEXT.
Le but est de remplacer un texte dans cette colonne.


SET NOCOUNT ON


DECLARE @ptrval binary(16);
DECLARE @offset int;

DECLARE @Cle varchar;
DECLARE @TexteARemplacer varchar; --Texte à remplacer
DECLARE @LenTexteARemplacer int; --Longueur de la chaîne à remplacer
DECLARE @NouveauTexte varchar; --Nouveau texte

SET @Cle = 'cle';
SET @TexteARemplacer = 'Texte à remplacer';
SET @LenTexteARemplacer = LEN(@TexteARemplacer)
SET @NouveauTexte = 'Nouveau texte';

-- Récupérer le contenu de la colonne à mettre à jour
SELECT
@ptrval = TEXTPTR(TEST_COLONNE_LIBELLE)
FROM TEST_TABLE
WHERE
TEST_COLONNE_CLE = ' + @Cle + '

--Récupérer la première position du texte à remplacer dans le libellé
SELECT
@offset = PATINDEX('%'+@TexteARemplacer+'%', TEST_COLONNE_LIBELLE) - 1
FROM TEST_TABLE
WHERE
TEST_COLONNE_CLE = ' + @Cle + '

--Mettre à jour le libellé
WHILE @offset > -1
BEGIN
UPDATETEXT TEST_TABLE.COLONNE_LIBELLE @ptrval @offset @LenTexteARemplacer @NouveauTexte;
SELECT
@offset = PATINDEX('%'+@TexteARemplacer+'%', COLONNE_LIBELLE) - 1
FROM TABLE
WHERE
COLONNE_CLE = ' + @Cle +'
END


SET NOCOUNT OFF

mercredi 29 juillet 2009

IE8 Impossible à débugger un projet web depuis Visual Studio s'il y a déjà IE8 ouvert

IE8 possède une propriété Loosely-Coupled Internet Explorer (LCIE) qui lui permet de s'exécuter sur plusieurs processus actives.

Débugger de Visual Studio n'arrive pas à déterminer sur quel processeur il faut attacher le débuggeur.
Vous pouvez corriger ce problème en désactivant la propriété "process growth" de LCIE.

1. Ouvrir RegEdit
2. Aller sur HKEY_LOCALMACHINE -> SOFTWARE -> Microsoft -> Internet Explorer -> Main
3. Ajouter un dword nommé TabProcGrowth
4. Adjuster TabProcGrowth à 0
5. Redémarrer IE8
Ce problème n'apparaît plus sur Visual Studio 2008.

mardi 28 juillet 2009

Impossible de démarrer le débogage sur le serveur web

J'ai trouvé des explications très complètes pour le message d'erreur : Impossible de démarrer le débogage sur le serveur web lorsqu’on lance un projet web ASP.NET sur Visual Studio .NET.

http://msdn.microsoft.com/en-us/library/aa290100(VS.71).aspx

Pour information, c’est écrit en anglais mais facile à comprendre.

vendredi 10 juillet 2009

sp_help_revlogin Transférer les utilisateurs entre SQL Server 2000 et 2008

Lors d'un projet de migration de base de données SQL Server 2000 vers 2008, j'ai recherché une procédure permettant de transférer les utilisateurs.

J’ai retrouvé un script sur le site laboratoire-microsoft.com, une version de procédure sp_help_revlogin pour SQL server 2005. J’ai essayé de l’exécuter mais j’ai obtenu un message d’erreur suivant :

Serveur : Msg 195, Niveau 15, État 10, Procédure sp_help_revlogin, Ligne 53
'LOGINPROPERTY' n'est pas un nom de fonction reconnu.


J’ai donc continué ma recherche. C’est sur le site de support de Microsoft que j’ai retrouvé la solution.


USE master
GO

IF OBJECT_ID ('sp_hexadecimal') IS NOT NULL
DROP PROCEDURE sp_hexadecimal
GO

CREATE PROCEDURE sp_hexadecimal
@binvalue varbinary(256),
@hexvalue varchar(256) OUTPUT
AS
DECLARE @charvalue varchar(256)
DECLARE @i int
DECLARE @length int
DECLARE @hexstring char(16)
SELECT @charvalue = '0x'
SELECT @i = 1
SELECT @length = DATALENGTH (@binvalue)
SELECT @hexstring = '0123456789ABCDEF'
WHILE (@i <= @length)
BEGIN
DECLARE @tempint int
DECLARE @firstint int
DECLARE @secondint int
SELECT @tempint = CONVERT(int, SUBSTRING(@binvalue,@i,1))
SELECT @firstint = FLOOR(@tempint/16)
SELECT @secondint = @tempint - (@firstint*16)
SELECT @charvalue = @charvalue +
SUBSTRING(@hexstring, @firstint+1, 1) +
SUBSTRING(@hexstring, @secondint+1, 1)
SELECT @i = @i + 1
END

SELECT @hexvalue = @charvalue
GO

IF OBJECT_ID ('sp_help_revlogin') IS NOT NULL
DROP PROCEDURE sp_help_revlogin
GO

CREATE PROCEDURE sp_help_revlogin @login_name sysname = NULL AS
DECLARE @name sysname
DECLARE @xstatus int
DECLARE @binpwd varbinary (256)
DECLARE @txtpwd sysname
DECLARE @tmpstr varchar (256)
DECLARE @SID_varbinary varbinary(85)
DECLARE @SID_string varchar(256)

IF (@login_name IS NULL)
DECLARE login_curs CURSOR FOR
SELECT sid, name, xstatus, password FROM master..sysxlogins
WHERE srvid IS NULL AND name <> 'sa'
ELSE
DECLARE login_curs CURSOR FOR
SELECT sid, name, xstatus, password FROM master..sysxlogins
WHERE srvid IS NULL AND name = @login_name
OPEN login_curs
FETCH NEXT FROM login_curs INTO @SID_varbinary, @name, @xstatus, @binpwd
IF (@@fetch_status = -1)
BEGIN
PRINT 'No login(s) found.'
CLOSE login_curs
DEALLOCATE login_curs
RETURN -1
END
SET @tmpstr = '/* sp_help_revlogin script '
PRINT @tmpstr
SET @tmpstr = '** Generated '
+ CONVERT (varchar, GETDATE()) + ' on ' + @@SERVERNAME + ' */'
PRINT @tmpstr
PRINT ''
PRINT 'DECLARE @pwd sysname'
WHILE (@@fetch_status <> -1)
BEGIN
IF (@@fetch_status <> -2)
BEGIN
PRINT ''
SET @tmpstr = '-- Login: ' + @name
PRINT @tmpstr
IF (@xstatus & 4) = 4
BEGIN -- NT authenticated account/group
IF (@xstatus & 1) = 1
BEGIN -- NT login is denied access
SET @tmpstr = 'EXEC master..sp_denylogin ''' + @name + ''''
PRINT @tmpstr
END
ELSE BEGIN -- NT login has access
SET @tmpstr = 'EXEC master..sp_grantlogin ''' + @name + ''''
PRINT @tmpstr
END
END
ELSE BEGIN -- SQL Server authentication
IF (@binpwd IS NOT NULL)
BEGIN -- Non-null password
EXEC sp_hexadecimal @binpwd, @txtpwd OUT
IF (@xstatus & 2048) = 2048
SET @tmpstr = 'SET @pwd = CONVERT (varchar(256), ' + @txtpwd + ')'
ELSE
SET @tmpstr = 'SET @pwd = CONVERT (varbinary(256), ' + @txtpwd + ')'
PRINT @tmpstr
EXEC sp_hexadecimal @SID_varbinary,@SID_string OUT
SET @tmpstr = 'EXEC master..sp_addlogin ''' + @name
+ ''', @pwd, @sid = ' + @SID_string + ', @encryptopt = '
END
ELSE BEGIN
-- Null password
EXEC sp_hexadecimal @SID_varbinary,@SID_string OUT
SET @tmpstr = 'EXEC master..sp_addlogin ''' + @name
+ ''', NULL, @sid = ' + @SID_string + ', @encryptopt = '
END
IF (@xstatus & 2048) = 2048
-- login upgraded from 6.5
SET @tmpstr = @tmpstr + '''skip_encryption_old'''
ELSE
SET @tmpstr = @tmpstr + '''skip_encryption'''
PRINT @tmpstr
END
END
FETCH NEXT FROM login_curs INTO @SID_varbinary, @name, @xstatus, @binpwd
END
CLOSE login_curs
DEALLOCATE login_curs
RETURN 0
GO

Il s’agit de créer deux procédures stockées nommées sp_hexadecimal et sp_help_revlogin dans la base de données master.


Après avoir créé la procédure stockée sp_help_revlogin, je l’ai exécutée à partir de l'Analyseur de requêtes du serveur SQL Server 2000.
EXEC master.sp_help_revlogin;

La procédure stockée sp_help_revlogin produit des scripts de connexion qui créent des noms d'accès avec le SID et le mot de passe d'origine. J’ai fait copier-coller de la sortie, puis je l’ai exécutée dans l'Analyseur de requêtes du serveur SQL Server 2008.

jeudi 23 avril 2009

Validation de procédures stockées dans la base SQL Server

Dans un projet, j’ai travaillé avec des applications qui utilisent de nombreuses procédures stockées. Ceci donne la facilité qu’en cas de bug urgent, nous pouvons corriger la procédure concernée sans faire une livraison complète de l’application.

Un jour, on est amené à faire de nettoyage dans la base de données afin de supprimer des colonnes non utilisées. Il nous fallait un moyen de vérifier la validité des procédures stockées après la suppression des colonnes.

Pour cela j’ai fait une application Windows qui permet de valider les objets dans la base de données.
Plus loin, j’ai développé un outil qui permet de comparer l’état des bases de données. Dans mon cas, je l’utilise pour comparer la base de données de développement et celle de la production. Le comparateur de bases de données sera abordé prochainement.

Ci-dessous un extrait de code pour valider les objets de la base de données:

// Connexion à la base de données
SqlConnection conn = new SqlConnection("Data Source=" + pServer + ";Initial Catalog="+pDb+";User Id="+login+";Password="+password+";");
conn.Open();

/*Requête sur la table système sysobjects pour récupérer les objets de la base de données suivant le type d’objet (P pour procédure stockée, V pour vue,…)
OBJECTPROPERTY (id, propriété): Retourne les informations concernant les objets (id = id de l’objet)
OBJECTPROPERTY(id,'ExecIsQuotedIdentOn') : retourne la propriété de QUOTED_IDENTIFIER lors de création de l’objet
OBJECTPROPERTY(id, 'ExecIsAnsiNullsOn') : retourne la propriété d’AISI NULLS lors de création de l’objet

*/
string cmdText = "SELECT name, OBJECTPROPERTY(id,'ExecIsQuotedIdentOn') as ident_on, " +
" OBJECTPROPERTY(id,'ExecIsAnsiNullsOn') as ainsi_null ,USER_NAME(uid) as owner " +
" FROM sysobjects WHERE xtype= '" + objectType+"'";
SqlDataAdapter daTable1 = new SqlDataAdapter(cmdText,conn);
DataSet ds = new DataSet("Table");
daTable1.Fill(ds);

// Parcourir les objets
foreach(DataRow row in ds.Tables[0].Rows)
{
StringBuilder sbCmd = new StringBuilder();
StringBuilder sbCmdProc = new StringBuilder();
string objectName = row["name"].ToString();
string owner = row["owner"].ToString();
string ansi_null = Convert.ToBoolean(row["ainsi_null"])?"ON":"OFF";
string ident_on = Convert.ToBoolean(row["ident_on"])?"ON":"OFF";
SqlCommand cmd = new SqlCommand("",conn);
try
{
// sp_helptext : récupérer la definition d’objet
cmd = new SqlCommand("exec sp_helptext '" + owner + "." + objectName+"';",conn);
cmd.CommandType = CommandType.Text;
SqlDataReader drDef = cmd.ExecuteReader();

while(drDef.Read())
{
sbCmdProc.Append(drDef["text"].ToString());
}
drDef.Close();

// Ne pas exécuter la requête/ mode parse
sbCmd.Append("set noexec on;");


// Proriété ansi_null d’objet
sbCmd.Append("set ansi_nulls "+ ansi_null +";");


// Proriété quoted_identifier d’objet
sbCmd.Append("set quoted_identifier "+ ident_on+";");
cmd = new SqlCommand(sbCmd.ToString(),conn);
cmd.CommandType = CommandType.Text;
cmd.ExecuteNonQuery();

// Executer l’objet
cmd = new SqlCommand(sbCmdProc.ToString(),conn);
cmd.CommandType = CommandType.Text;
cmd.ExecuteNonQuery();
}
catch(Exception ex)
{
// Erreur dans l’exécution, l’objet n’est pas valide
// Ici, mettre un message d’erreur
}

finally
{
/*Mettre ainsi_null par défaut (ON) et quoted_identifier par défaut (OFF)
Et remettre en mode exécution
*/

sbCmd = new StringBuilder();
sbCmd.Append("set ansi_nulls ON;");
sbCmd.Append("set quoted_identifier OFF;");
sbCmd.Append("set parseonly off; set noexec off;");

cmd = new SqlCommand(sbCmd.ToString(),conn);
cmd.CommandType = CommandType.Text;
cmd.ExecuteNonQuery();
}
}
// Fermer la connexion de la base de données
conn.Close();

jeudi 16 avril 2009

Checkout from SVN and Rebuild Solution File from Command Line

I create a .bat file to checkout an application source from SVN and to rebuild solution file without opening Visual studio .NET.

rem ****Déclare path to Tortoise and Visual Studio .NET ***
set path=%path%;C:\Program Files\TortoiseSVN\bin;C:\Program Files\Microsoft Visual Studio .NET 2003\Common7\IDE\

rem ****Checkout application source from SVN****

rem ****/closeonend:1 Close automatically Tortoise Dialog Box if no error TortoiseProc.exe /command:checkout /path:"D:\MyProject" /url:"https://svn.toto.com/svnrepos/MyProject/trunk" /closeonend:1

rem ****Rebuild solution in debug mode - output to log file****
devenv.exe /rebuild Debug "D:\MyProject\MyProject.sln" /out "d:\logMyProject"