Obtener el nombre del servidor

Declare @Servidor as varchar(40)
Select @Servidor = Cast(ServerProperty('MachineName') as Varchar(30))
Select @Servidor