Como exportar dados de uma tabela do SQL Server para HTML

Post Views 8,594 views

Neste artigo

Reading time 5 minutes

Prezados,
Boa tarde.

Neste post irei demonstrar como exportar os dados de uma tabela do SQL Server para um arquivo HTML ou uma variável do tipo VARCHAR, onde serão apresentadas duas Procedures bem parecidas, onde uma gera o HTML em forma de arquivo físico no disco e a outra grava o HTML gerado em uma variável de OUTPUT.

Também fiz um post sobre essa mesma funcionalidade, mas utilizando o CLR, que permite exportar uma query para HTML de forma rápida e mais prática que utilizando OLE Automation. Se quiser saber mais, acesse o post SQL Server – Como enviar o resultado de uma query por e-mail no formato HTML utilizando o CLR (C#).

Pré-Requisitos

Caso você precise utilizar apenas a procedure em que o HTML é retornado como variável OUTPUT, pode pular os pré-requisitos.

Para a procedure onde é gerado um arquivo físico no disco, preciso que vocês tenham criado a procedure stpEscreve_Arquivo_FSO, que eu falei sobre ela no post Operações com arquivos utilizando OLE Automation no SQL Server.

Vale lembrar que para a utilização de OLE Automation, é necessário que esse recurso esteja habilitado no servidor. Caso não esteja habilitado, veja no post Habilitando OLE Automation via T-SQL no SQL Server como fazer isso.

Criando uma massa de dados para os testes

IF (OBJECT_ID('tempdb..##Teste') IS NOT NULL) DROP TABLE ##Teste
SELECT *
INTO ##Teste
FROM master.INFORMATION_SCHEMA.TABLES

IF (OBJECT_ID('tempdb..##Teste') IS NOT NULL) DROP TABLE ##Teste

SELECT *

INTO ##Teste

FROM master.INFORMATION_SCHEMA.TABLES

Retornando o HTML como variável OUTPUT

Essa funcionalidade deve ser utilizada quando você precisa tratar ou realizar alguma ação com o HTML gerado, como enviar um e-mail com os dados dessa tabela, por exemplo.

Usage example:

DECLARE @HTML VARCHAR(MAX)

EXEC dbo.stpExporta_Tabela_HTML_Output
    @Ds_Tabela = '##Teste', -- varchar(max)
    @Ds_Saida = @HTML OUT -- varchar(max)

PRINT @HTML

DECLARE @HTML VARCHAR(MAX)

EXEC dbo.stpExporta_Tabela_HTML_Output

@Ds_Tabela = '##Teste', -- varchar(max)

@Ds_Saida = @HTML OUT -- varchar(max)

PRINT @HTML

Exemplo de utilização com texto centralizado e ordenando os resultados pela coluna TABLE_NAME:

DECLARE @HTML VARCHAR(MAX)

EXEC dbo.stpExporta_Tabela_HTML_Output
    @Ds_Tabela = '##Teste', -- varchar(max)
    @Ds_Saida = @HTML OUT, -- varchar(max)
    @Ds_Alinhamento = 'center',
    @Ds_OrderBy = 'TABLE_NAME'

PRINT @HTML

DECLARE @HTML VARCHAR(MAX)

EXEC dbo.stpExporta_Tabela_HTML_Output

@Ds_Tabela = '##Teste', -- varchar(max)

@Ds_Saida = @HTML OUT, -- varchar(max)

@Ds_Alinhamento = 'center',

@Ds_OrderBy = 'TABLE_NAME'

PRINT @HTML

Código-fonte
Visualizar código-fonte

CREATE PROCEDURE [dbo].[stpExporta_Tabela_HTML_Output]
    @Ds_Tabela [varchar](max),
    @Fl_Aplica_Estilo_Padrao BIT = 1,
	@Ds_Alinhamento VARCHAR(10) = 'left',
	@Ds_OrderBy VARCHAR(MAX) = '',
    @Ds_Saida VARCHAR(MAX) OUTPUT
AS
BEGIN
    
    
    SET NOCOUNT ON
    
    
    DECLARE
        @query NVARCHAR(MAX),
        @Database sysname,
        @Nome_Tabela sysname

    
    
    IF (LEFT(@Ds_Tabela, 1) = '#')
    BEGIN
        SET @Database = 'tempdb.'
        SET @Nome_Tabela = @Ds_Tabela
    END
    ELSE BEGIN
        SET @Database = LEFT(@Ds_Tabela, CHARINDEX('.', @Ds_Tabela))
        SET @Nome_Tabela = SUBSTRING(@Ds_Tabela, LEN(@Ds_Tabela) - CHARINDEX('.', REVERSE(@Ds_Tabela)) + 2, LEN(@Ds_Tabela))
    END

    
    SET @query = '
    SELECT ORDINAL_POSITION, COLUMN_NAME, DATA_TYPE, CHARACTER_MAXIMUM_LENGTH, NUMERIC_PRECISION, NUMERIC_SCALE
    FROM ' + @Database + 'INFORMATION_SCHEMA.COLUMNS 
    WHERE TABLE_NAME = ''' + @Nome_Tabela + '''
    ORDER BY ORDINAL_POSITION'
    
    
    IF (OBJECT_ID('tempdb..#Colunas') IS NOT NULL) DROP TABLE #Colunas
    CREATE TABLE #Colunas (
        ORDINAL_POSITION int, 
        COLUMN_NAME sysname, 
        DATA_TYPE nvarchar(128), 
        CHARACTER_MAXIMUM_LENGTH int,
        NUMERIC_PRECISION tinyint, 
        NUMERIC_SCALE int
    )

    INSERT INTO #Colunas
    EXEC(@query)

    
    
    IF (@Fl_Aplica_Estilo_Padrao = 1)
    BEGIN
    
    SET @Ds_Saida = '<html>
<head>
    <title>Titulo</title>
    <style type="text/css">
        table { padding:0; border-spacing: 0; border-collapse: collapse; }
        thead { background: #00B050; border: 1px solid #ddd; }
        th { padding: 10px; font-weight: bold; border: 1px solid #000; color: #fff; }
        tr { padding: 0; }
        td { padding: 5px; border: 1px solid #cacaca; margin:0; text-align:' + @Ds_Alinhamento + '; }
    </style>
</head>'
    
    END
    
    
    
    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
<table>
    <thead>
        <tr>'


    -- Cabeçalho da tabela
    DECLARE 
        @contadorColuna INT = 1, 
        @totalColunas INT = (SELECT COUNT(*) FROM #Colunas), 
        @nomeColuna sysname,
        @tipoColuna sysname
    

    WHILE(@contadorColuna <= @totalColunas)
    BEGIN

        SELECT @nomeColuna = COLUMN_NAME
        FROM #Colunas
        WHERE ORDINAL_POSITION = @contadorColuna


        SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
            <th>' + @nomeColuna + '</th>'


        SET @contadorColuna = @contadorColuna + 1

    END



    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
        </tr>
    </thead>
    <tbody>'


    
    -- Conteúdo da tabela

    DECLARE @saida VARCHAR(MAX)

    SET @query = '
SELECT @saida = (
    SELECT '


    SET @contadorColuna = 1

    WHILE(@contadorColuna <= @totalColunas)
    BEGIN

        SELECT 
            @nomeColuna = COLUMN_NAME,
            @tipoColuna = DATA_TYPE
        FROM 
            #Colunas
        WHERE 
            ORDINAL_POSITION = @contadorColuna



        IF (@tipoColuna IN ('int', 'bigint', 'float', 'numeric', 'decimal', 'bit', 'tinyint', 'smallint', 'integer'))
        BEGIN
        
            SET @query = @query + '
    ISNULL(CAST([' + @nomeColuna + '] AS VARCHAR(MAX)), '''') AS [td]'
    
        END
        ELSE BEGIN
        
            SET @query = @query + '
    ISNULL([' + @nomeColuna + '], '''') AS [td]'
    
        END
    
        
        IF (@contadorColuna < @totalColunas)
            SET @query = @query + ','

        
        SET @contadorColuna = @contadorColuna + 1

    END



    SET @query = @query + '
FROM ' + @Ds_Tabela + (CASE WHEN ISNULL(@Ds_OrderBy, '') = '' THEN '' ELSE ' 
ORDER BY ' END) + @Ds_OrderBy + '
FOR XML RAW(''tr''), Elements
)'
    
    
    EXEC tempdb.sys.sp_executesql
        @query,
        N'@saida NVARCHAR(MAX) OUTPUT',
        @saida OUTPUT


    -- Identação
    SET @saida = REPLACE(@saida, '<tr>', '
        <tr>')

    SET @saida = REPLACE(@saida, '<td>', '
            <td>')

    SET @saida = REPLACE(@saida, '</tr>', '
        </tr>')


    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + @saida


    
    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
    </tbody>
</table>'
    
            
END

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

CREATE PROCEDURE [dbo].[stpExporta_Tabela_HTML_Output]

@Ds_Tabela [varchar](max),

@Fl_Aplica_Estilo_Padrao BIT = 1,

@Ds_Alinhamento VARCHAR(10) = 'left',

@Ds_OrderBy VARCHAR(MAX) = '',

@Ds_Saida VARCHAR(MAX) OUTPUT

BEGIN

SET NOCOUNT ON

DECLARE

@query NVARCHAR(MAX),

@Database sysname,

@Nome_Tabela sysname

IF (LEFT(@Ds_Tabela, 1) = '#')

BEGIN

SET @Database = 'tempdb.'

SET @Nome_Tabela = @Ds_Tabela

END

ELSE BEGIN

SET @Database = LEFT(@Ds_Tabela, CHARINDEX('.', @Ds_Tabela))

SET @Nome_Tabela = SUBSTRING(@Ds_Tabela, LEN(@Ds_Tabela) - CHARINDEX('.', REVERSE(@Ds_Tabela)) + 2, LEN(@Ds_Tabela))

END

SET @query = '

SELECT ORDINAL_POSITION, COLUMN_NAME, DATA_TYPE, CHARACTER_MAXIMUM_LENGTH, NUMERIC_PRECISION, NUMERIC_SCALE

FROM ' + @Database + 'INFORMATION_SCHEMA.COLUMNS

WHERE TABLE_NAME = ''' + @Nome_Tabela + '''

ORDER BY ORDINAL_POSITION'

IF (OBJECT_ID('tempdb..#Colunas') IS NOT NULL) DROP TABLE #Colunas

CREATE TABLE #Colunas (

ORDINAL_POSITION int,

COLUMN_NAME sysname,

DATA_TYPE nvarchar(128),

CHARACTER_MAXIMUM_LENGTH int,

NUMERIC_PRECISION tinyint,

NUMERIC_SCALE int

)

INSERT INTO #Colunas

EXEC(@query)

IF (@Fl_Aplica_Estilo_Padrao = 1)

BEGIN

SET @Ds_Saida = '<html>

<head>

<title>Titulo</title>

table { padding:0; border-spacing: 0; border-collapse: collapse; }

thead { background: #00B050; border: 1px solid #ddd; }

th { padding: 10px; font-weight: bold; border: 1px solid #000; color: #fff; }

tr { padding: 0; }

td { padding: 5px; border: 1px solid #cacaca; margin:0; text-align:' + @Ds_Alinhamento + '; }

</style>

</head>'

END

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

<table>

<thead>

<tr>'

-- Cabeçalho da tabela

DECLARE

@contadorColuna INT = 1,

@totalColunas INT = (SELECT COUNT(*) FROM #Colunas),

@nomeColuna sysname,

@tipoColuna sysname

WHILE(@contadorColuna <= @totalColunas)

BEGIN

SELECT @nomeColuna = COLUMN_NAME

FROM #Colunas

WHERE ORDINAL_POSITION = @contadorColuna

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

<th>' + @nomeColuna + '</th>'

SET @contadorColuna = @contadorColuna + 1

END

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

</tr>

</thead>

<tbody>'

-- Conteúdo da tabela

DECLARE @saida VARCHAR(MAX)

SET @query = '

SELECT @saida = (

SELECT '

SET @contadorColuna = 1

WHILE(@contadorColuna <= @totalColunas)

BEGIN

SELECT

@nomeColuna = COLUMN_NAME,

@tipoColuna = DATA_TYPE

FROM

#Colunas

WHERE

ORDINAL_POSITION = @contadorColuna

IF (@tipoColuna IN ('int', 'bigint', 'float', 'numeric', 'decimal', 'bit', 'tinyint', 'smallint', 'integer'))

BEGIN

SET @query = @query + '

ISNULL(CAST([' + @nomeColuna + '] AS VARCHAR(MAX)), '''') AS [td]'

END

ELSE BEGIN

SET @query = @query + '

ISNULL([' + @nomeColuna + '], '''') AS [td]'

END

IF (@contadorColuna < @totalColunas)

SET @query = @query + ','

SET @contadorColuna = @contadorColuna + 1

END

SET @query = @query + '

FROM ' + @Ds_Tabela + (CASE WHEN ISNULL(@Ds_OrderBy, '') = '' THEN '' ELSE '

ORDER BY ' END) + @Ds_OrderBy + '

FOR XML RAW(''tr''), Elements

EXEC tempdb.sys.sp_executesql

@query,

N'@saida NVARCHAR(MAX) OUTPUT',

@saida OUTPUT

-- Identação

SET @saida = REPLACE(@saida, '<tr>', '

<tr>')

SET @saida = REPLACE(@saida, '<td>', '

<td>')

SET @saida = REPLACE(@saida, '</tr>', '

</tr>')

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + @saida

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

</tbody>

</table>'

END

Resultado final:

Exportando o HTML para Arquivo

Essa funcionalidade deve ser utilizada quando você precisa gerar um arquivo físico no disco ou na rede contendo o conteúdo de uma tabela no formato HTML.

Usage example:

EXEC dbo.stpExporta_Tabela_HTML 
    @Ds_Tabela = '##Teste', -- varchar(max)
    @Ds_Arquivo_Saida = 'C:\Teste.html' -- varchar(max)

EXEC dbo.stpExporta_Tabela_HTML

@Ds_Tabela = '##Teste', -- varchar(max)

@Ds_Arquivo_Saida = 'C:\Teste.html' -- varchar(max)

Código-fonte
Visualizar código-fonte

CREATE PROCEDURE [dbo].[stpExporta_Tabela_HTML]
    @Ds_Tabela [varchar](max),
    @Fl_Aplica_Estilo_Padrao BIT = 1,
    @Ds_Arquivo_Saida VARCHAR(500)
WITH EXECUTE AS CALLER
AS
BEGIN
    
    
    SET NOCOUNT ON
    
    
    DECLARE
        @query NVARCHAR(MAX),
        @Database sysname,
        @Nome_Tabela sysname,
        @Ds_Saida VARCHAR(MAX)

    
    
    IF (LEFT(@Ds_Tabela, 1) = '#')
    BEGIN
        SET @Database = 'tempdb.'
        SET @Nome_Tabela = @Ds_Tabela
    END
    ELSE BEGIN
        SET @Database = LEFT(@Ds_Tabela, CHARINDEX('.', @Ds_Tabela))
        SET @Nome_Tabela = SUBSTRING(@Ds_Tabela, LEN(@Ds_Tabela) - CHARINDEX('.', REVERSE(@Ds_Tabela)) + 2, LEN(@Ds_Tabela))
    END

    
    SET @query = '
    SELECT ORDINAL_POSITION, COLUMN_NAME, DATA_TYPE, CHARACTER_MAXIMUM_LENGTH, NUMERIC_PRECISION, NUMERIC_SCALE
    FROM ' + @Database + 'INFORMATION_SCHEMA.COLUMNS 
    WHERE TABLE_NAME = ''' + @Nome_Tabela + '''
    ORDER BY ORDINAL_POSITION'
    
    
    IF (OBJECT_ID('tempdb..#Colunas') IS NOT NULL) DROP TABLE #Colunas
    CREATE TABLE #Colunas (
        ORDINAL_POSITION int, 
        COLUMN_NAME sysname, 
        DATA_TYPE nvarchar(128), 
        CHARACTER_MAXIMUM_LENGTH int,
        NUMERIC_PRECISION tinyint, 
        NUMERIC_SCALE int
    )

    INSERT INTO #Colunas
    EXEC(@query)

    
    
    IF (@Fl_Aplica_Estilo_Padrao = 1)
    BEGIN
    
    SET @Ds_Saida = '<html>
<head>
    <title>Titulo</title>
    <style type="text/css">
        table { padding:0; border-spacing: 0; border-collapse: collapse; }
        thead { background: #00B050; border: 1px solid #ddd; }
        th { padding: 10px; font-weight: bold; border: 1px solid #000; color: #fff; }
        tr { padding: 0; }
        td { padding: 5px; border: 1px solid #cacaca; margin:0; }
    </style>
</head>'
    
    END
    
    
    
    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
<table>
    <thead>
        <tr>'


    -- Cabeçalho da tabela
    DECLARE 
        @contadorColuna INT = 1, 
        @totalColunas INT = (SELECT COUNT(*) FROM #Colunas), 
        @nomeColuna sysname,
        @tipoColuna sysname
    

    WHILE(@contadorColuna <= @totalColunas)
    BEGIN

        SELECT @nomeColuna = COLUMN_NAME
        FROM #Colunas
        WHERE ORDINAL_POSITION = @contadorColuna


        SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
            <th>' + @nomeColuna + '</th>'


        SET @contadorColuna = @contadorColuna + 1

    END



    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
        </tr>
    </thead>
    <tbody>'


    
    -- Conteúdo da tabela

    DECLARE @saida VARCHAR(MAX)

    SET @query = '
SELECT @saida = (
    SELECT '


    SET @contadorColuna = 1

    WHILE(@contadorColuna <= @totalColunas)
    BEGIN

        SELECT 
            @nomeColuna = COLUMN_NAME,
            @tipoColuna = DATA_TYPE
        FROM 
            #Colunas
        WHERE 
            ORDINAL_POSITION = @contadorColuna



        IF (@tipoColuna IN ('int', 'bigint', 'float', 'numeric', 'decimal', 'bit', 'tinyint', 'smallint', 'integer'))
        BEGIN
        
            SET @query = @query + '
    ISNULL(CAST(' + @nomeColuna + ' AS VARCHAR(MAX)), '''') AS [td]'
    
        END
        ELSE BEGIN
        
            SET @query = @query + '
    ISNULL(' + @nomeColuna + ', '''') AS [td]'
    
        END
    
        
        IF (@contadorColuna < @totalColunas)
            SET @query = @query + ','

        
        SET @contadorColuna = @contadorColuna + 1

    END



    SET @query = @query + '
FROM ' + @Ds_Tabela + '
FOR XML RAW(''tr''), Elements
)'
    
    
    EXEC tempdb.sys.sp_executesql
        @query,
        N'@saida NVARCHAR(MAX) OUTPUT',
        @saida OUTPUT


    -- Identação
    SET @saida = REPLACE(@saida, '<tr>', '
        <tr>')

    SET @saida = REPLACE(@saida, '<td>', '
            <td>')

    SET @saida = REPLACE(@saida, '</tr>', '
        </tr>')


    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + @saida


    
    SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '
    </tbody>
</table>'

    
    IF (@Ds_Saida IS NOT NULL)
    BEGIN
        
        EXEC dbo.stpEscreve_Arquivo_FSO
            @String = @Ds_Saida, -- varchar(max)
            @Ds_Arquivo = @Ds_Arquivo_Saida -- varchar(1501)
            
            
        PRINT 'Arquivo com o conteúdo da tabela "' + @Ds_Tabela + '" foi gerado no caminho "' + @Ds_Arquivo_Saida + '"'
            
            
    END
    ELSE
        PRINT 'O retorno dos dados está vazio.'
            
END

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

CREATE PROCEDURE [dbo].[stpExporta_Tabela_HTML]

@Ds_Tabela [varchar](max),

@Fl_Aplica_Estilo_Padrao BIT = 1,

@Ds_Arquivo_Saida VARCHAR(500)

WITH EXECUTE AS CALLER

BEGIN

SET NOCOUNT ON

DECLARE

@query NVARCHAR(MAX),

@Database sysname,

@Nome_Tabela sysname,

@Ds_Saida VARCHAR(MAX)

IF (LEFT(@Ds_Tabela, 1) = '#')

BEGIN

SET @Database = 'tempdb.'

SET @Nome_Tabela = @Ds_Tabela

END

ELSE BEGIN

SET @Database = LEFT(@Ds_Tabela, CHARINDEX('.', @Ds_Tabela))

SET @Nome_Tabela = SUBSTRING(@Ds_Tabela, LEN(@Ds_Tabela) - CHARINDEX('.', REVERSE(@Ds_Tabela)) + 2, LEN(@Ds_Tabela))

END

SET @query = '

SELECT ORDINAL_POSITION, COLUMN_NAME, DATA_TYPE, CHARACTER_MAXIMUM_LENGTH, NUMERIC_PRECISION, NUMERIC_SCALE

FROM ' + @Database + 'INFORMATION_SCHEMA.COLUMNS

WHERE TABLE_NAME = ''' + @Nome_Tabela + '''

ORDER BY ORDINAL_POSITION'

IF (OBJECT_ID('tempdb..#Colunas') IS NOT NULL) DROP TABLE #Colunas

CREATE TABLE #Colunas (

ORDINAL_POSITION int,

COLUMN_NAME sysname,

DATA_TYPE nvarchar(128),

CHARACTER_MAXIMUM_LENGTH int,

NUMERIC_PRECISION tinyint,

NUMERIC_SCALE int

)

INSERT INTO #Colunas

EXEC(@query)

IF (@Fl_Aplica_Estilo_Padrao = 1)

BEGIN

SET @Ds_Saida = '<html>

<head>

<title>Titulo</title>

table { padding:0; border-spacing: 0; border-collapse: collapse; }

thead { background: #00B050; border: 1px solid #ddd; }

th { padding: 10px; font-weight: bold; border: 1px solid #000; color: #fff; }

tr { padding: 0; }

td { padding: 5px; border: 1px solid #cacaca; margin:0; }

</style>

</head>'

END

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

<table>

<thead>

<tr>'

-- Cabeçalho da tabela

DECLARE

@contadorColuna INT = 1,

@totalColunas INT = (SELECT COUNT(*) FROM #Colunas),

@nomeColuna sysname,

@tipoColuna sysname

WHILE(@contadorColuna <= @totalColunas)

BEGIN

SELECT @nomeColuna = COLUMN_NAME

FROM #Colunas

WHERE ORDINAL_POSITION = @contadorColuna

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

<th>' + @nomeColuna + '</th>'

SET @contadorColuna = @contadorColuna + 1

END

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

</tr>

</thead>

<tbody>'

-- Conteúdo da tabela

DECLARE @saida VARCHAR(MAX)

SET @query = '

SELECT @saida = (

SELECT '

SET @contadorColuna = 1

WHILE(@contadorColuna <= @totalColunas)

BEGIN

SELECT

@nomeColuna = COLUMN_NAME,

@tipoColuna = DATA_TYPE

FROM

#Colunas

WHERE

ORDINAL_POSITION = @contadorColuna

IF (@tipoColuna IN ('int', 'bigint', 'float', 'numeric', 'decimal', 'bit', 'tinyint', 'smallint', 'integer'))

BEGIN

SET @query = @query + '

ISNULL(CAST(' + @nomeColuna + ' AS VARCHAR(MAX)), '''') AS [td]'

END

ELSE BEGIN

SET @query = @query + '

ISNULL(' + @nomeColuna + ', '''') AS [td]'

END

IF (@contadorColuna < @totalColunas)

SET @query = @query + ','

SET @contadorColuna = @contadorColuna + 1

END

SET @query = @query + '

FROM ' + @Ds_Tabela + '

FOR XML RAW(''tr''), Elements

EXEC tempdb.sys.sp_executesql

@query,

N'@saida NVARCHAR(MAX) OUTPUT',

@saida OUTPUT

-- Identação

SET @saida = REPLACE(@saida, '<tr>', '

<tr>')

SET @saida = REPLACE(@saida, '<td>', '

<td>')

SET @saida = REPLACE(@saida, '</tr>', '

</tr>')

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + @saida

SET @Ds_Saida = ISNULL(@Ds_Saida, '') + '

</tbody>

</table>'

IF (@Ds_Saida IS NOT NULL)

BEGIN

EXEC dbo.stpEscreve_Arquivo_FSO

@String = @Ds_Saida, -- varchar(max)

@Ds_Arquivo = @Ds_Arquivo_Saida -- varchar(1501)

PRINT 'Arquivo com o conteúdo da tabela "' + @Ds_Tabela + '" foi gerado no caminho "' + @Ds_Arquivo_Saida + '"'

END

ELSE

PRINT 'O retorno dos dados está vazio.'

END

Resultado final:

É isso aí, pessoal.
Até a próxima!

Jorge Junior disse:

November 10, 2017 às 13:02

Já localizei em um outro post

Responder
- Dirceu Resende disse:
  
  November 11, 2017 às 01:38
  
  Opa, maravilha!
  
  Responder
Jorge Junior disse:

November 10, 2017 às 12:58

Olá Dirceu, não localizei o código da procedure ‘dbo.stpEscreve_Arquivo_FSO’ que consta

Responder
- Dirceu Resende disse:
  
  November 11, 2017 às 01:38
  
  Oi Jorge,
  Tudo certo?
  
  Primeiramente, obrigado pela visita! O código dessa SP fica no post https://www.dirceuresende.com/blog/operacoes-com-arquivos-utilizando-ole-automation-no-sql-server/, conforme expliquei ali na parte de “Pré-Requisitos”, bem no começo do post 🙂
  
  Qualquer dúvida, é só falar!
  Abraço!
  
  Responder
Queiroz Thiago disse:

August 30, 2016 às 10:34

Dirceu, bom dia. Vem acompanhando o seu blog, parabéns excelentes dicas.

Me tira uma dúvida, eu estou configurando uma query para ser enviado via email, já tenho tudo configurado, eu consigo ter mais de uma tabela no envio do email?

Após o N” eu adicionei um + para adicionar mais uma tabela:
N” +

N’Faturamento Detalhado: DUTRA’ +
N” +

Estou te perguntando isso, pois o email está sendo recebido em branco.

Obrigado.

Responder
- Queiroz Thiago disse:
  
  August 30, 2016 às 11:34
  
  Consegui resolver rs.
  Adicionei várias tabelas, e na hora do print coloquei como isnull também.
  
  Responder
  - Dirceu Resende disse:
    
    August 31, 2016 às 08:15
    
    Isso aí Thiago! Você também pode fazer isso criando 2 variáveis: Uma vai receber o resultado do EXEC para cada tabela e somar o resultado na outra variável ao final, utilizando o ISNULL().
    
    Responder

Subscribe to blog by email

Blog Views

Microsoft MVP

Post Archive

Categories

Recent posts

Como exportar dados de uma tabela do SQL Server para HTML

Pré-Requisitos

Criando uma massa de dados para os testes

Retornando o HTML como variável OUTPUT

Exportando o HTML para Arquivo

You may also like...

7 Responses

Deixe uma respostaCancelar resposta

Pré-Requisitos

Criando uma massa de dados para os testes

Retornando o HTML como variável OUTPUT

Exportando o HTML para Arquivo

You may also like...

Gerando relatórios AWR via script no Oracle Database 11g

How to Create an Audit to Monitor Job Creation, Modification, and Deletion in SQL Server

Removendo tags HTML de uma string no SQL Server

7 Responses

Deixe uma respostaCancelar resposta