Code
USE AdventureWorks ;GO-- =============================================-- Author: <qiangguo>-- Create date: <2009-01-08>-- Description: <把表中的内容导出为HTML>-- =============================================DECLARE @body VARCHAR(MAX)SET @body = CAST(( SELECT td = CAST(ContactID AS VARCHAR(30)) + '</td><td>' + LastName + '</td><td>' + EmailAddress FROM ( SELECT TOP 10 ContactID, LastName, EmailAddress FROM Person.Contact ) AS d FOR XML PATH('tr'), TYPE ) AS VARCHAR(MAX))SET @body = '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head><title>把表中的内容导出为HTML</title></head> <body>' + '<table cellpadding="2" cellspacing="2" border="1">' + '<tr><th>ContactID</th><th>LastName</th><th>EmailAddress</th></tr>' + REPLACE(REPLACE(@body, '<', '<'), '>', '>') + '<table>' + '</body></html>'PRINT @body