根据查询结果,生成XML文件


/*

'bcp' 不是内部或外部命令,也不是可运行的程序?

看看在C:\Program Files\Microsoft SQL Server\Tools\Binn里面有没有bcp.exe这个文件
然后看看path里面加C:\Program Files\Microsoft SQL Server\Tools\Binn这个目录没有.

右键我的电脑--属性--高级--环境变量--在系统变量中找到path--编辑

在变量值的最后加上:

C:\Program Files\Microsoft SQL Server\Tools\BINN

*/

/**********************************************************************
存储过程: P_SaveXML
功能: 生成XML文件
参数: 表名
返回: 指定目录的XML文件
调用方法: 传递中间表TB_TABLECOLUMN_T存在的表名
exec P_ZehuaSavexml 'WQ_STINFO_B,WQ_PHY_D','D:\xx.xml'
最后更改日期: 2005-8-17
联系方式: [email protected]
备注: 根据中间表生成符合标准格式的XML文件
**********************************************************************/

/*
exec P_ZehuaSavexml 'WQ_STINFO_B,WQ_PHY_D','D:\xx.xml'
*/
go
create proc P_ZehuaSavexml
@TableCodeS varchar(8000),
@fname varchar(1000)='c:\tmp.xml' --默认保存的XML文件地址
as
declare @sql nvarchar(200),@sql1 varchar(400)
declare @cnt int,@Table_Name varchar(20)
declare @i int,@TableCode varchar(20)
declare @err int,@src varchar(255),@desc varchar(255)
create table ##t(re nvarchar(4000))
insert ##t
select Re='

'
union all select '

 1<zehuatableinfoxml>'   
 2set @i=charindex(',',@TableCodeS)   
 3while @i&gt;0   
 4begin   
 5set @TableCode=left(@TableCodeS,@i-1)   
 6set @sql=''   
 7set @sql=N'select @cnt=count(*),@Table_Name=max(Table_Name) from '   
 8set @sql=@sql+N'('   
 9set @sql=@sql+N'select top 100 percent * from TB_TABLECOLUMN_T where '   
10set @sql=@sql+N'TABLE_CODE='''+@TableCode+''' and COLUMNS_ISKEY=''√'' '   
11set @sql=@sql+N'order by COLUMNS_SORT '   
12set @sql=@sql+N')'   
13set @sql=@sql+N'A'   
14exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --计算主键的个数,表名 
15
16insert ##t   
17select '&lt;'+@TableCode+' TABLE_NAME="'+@Table_Name+'" PK="'+cast(@cnt as varchar)+'"&gt;'   
18union all   
19select space(4)+'<columns '+space(8)+'columns_visible="'+isnull(COLUMNS_VISIBLE,'')+'" '+space(8)+'table_code="'+isnull(@TableCode,'')+'" columns_name="'+cast(COLUMNS_NAME as varchar)+'"></columns>'   
20from TB_TABLECOLUMN_T where TABLE_CODE=''+@TableCode+''   
21union all select '<!--'+@TableCode+'-->'   
22set @TableCodeS=right(@TableCodeS,len(@TableCodeS)-@i)   
23set @i=CHARINDEX(',',@TableCodeS)   
24end   
25if len(@TableCodeS)&gt;0   
26begin   
27  
28set @sql=''   
29set @sql=N'select @cnt=count(*),@Table_Name=max(Table_Name) from '   
30set @sql=@sql+N'('   
31set @sql=@sql+N'select top 100 percent * from TB_TABLECOLUMN_T where '   
32set @sql=@sql+N'TABLE_CODE='''+@TableCodeS+''' and COLUMNS_ISKEY=''√'' '   
33set @sql=@sql+N'order by COLUMNS_SORT '   
34set @sql=@sql+N')'   
35set @sql=@sql+N'A'   
36exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --计算主键的个数,表名   
37insert ##t   
38select '&lt;'+@TableCodeS+' TABLE_NAME="'+@Table_Name+'" PK="'+cast(@cnt as varchar)+'"&gt;'   
39union all   
40select space(4)+'<columns '+space(8)+'columns_visible="'+isnull(COLUMNS_VISIBLE,'')+'" '+space(8)+'table_code="'+isnull(@TableCodeS,'')+'" columns_name="'+cast(COLUMNS_NAME as varchar)+'"></columns>'   
41from TB_TABLECOLUMN_T where TABLE_CODE=''+@TableCodeS+''   
42union all select '<!--'+@TableCodeS+'-->'   
43union all select '</zehuatableinfoxml>

'
end

exec('master..xp_cmdshell ''bcp ##t out "'+@fname+'" /P"" /c''')
drop table ##T

go

/*

测试环境:

Windows 2000 Server + SQL 2000测试通过

*/

Published At
Categories with 数据库类
comments powered by Disqus