/*
‘bcp‘ 不是內(nèi)部或外部命令，也不是可運行的程序？
看看在C:\Program Files\Microsoft SQL Server\80\Tools\Binn里面有沒有bcp.exe這個文件
然后看看path里面加C:\Program Files\Microsoft SQL Server\80\Tools\Binn這個目錄沒有.
右鍵我的電腦--屬性--高級--環(huán)境變量--在系統(tǒng)變量中找到path--編輯
在變量值的最后加上:
C:\Program Files\Microsoft SQL Server\80\Tools\BINN
*/
/**********************************************************************
存儲過程: P_SaveXML
功能: 生成XML文件
參數(shù): 表名
返回: 指定目錄的XML文件
調(diào)用方法: 傳遞中間表TB_TABLECOLUMN_T存在的表名
exec P_ZehuaSavexml ‘WQ_STINFO_B,WQ_PHY_D‘,‘D:\xx.xml‘
最后更改日期: 2005-8-17
聯(lián)系方式: zlp@zehua.com.cn
備注: 根據(jù)中間表生成符合標準格式的XML文件
www.knowsky.com
**********************************************************************/
/*
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=‘<?xml version="1.0" encoding="gb2312"?>‘
union all select ‘<ZehuaTableInfoXml>‘
set @i=charindex(‘,‘,@TableCodeS)
while @i>0
begin
set @TableCode=left(@TableCodeS,@i-1)
set @sql=‘‘
set @sql=N‘select @cnt=count(*),@Table_Name=max(Table_Name) from ‘
set @sql=@sql+N‘(‘
set @sql=@sql+N‘select top 100 percent * from TB_TABLECOLUMN_T where ‘
set @sql=@sql+N‘TABLE_CODE=‘‘‘+@TableCode+‘‘‘ and COLUMNS_ISKEY=‘‘√‘‘ ‘
set @sql=@sql+N‘order by COLUMNS_SORT ‘
set @sql=@sql+N‘)‘
set @sql=@sql+N‘A‘
exec sp_executesql @sql,N‘@cnt int output,@Table_Name varchar(20) output‘,@cnt output,@Table_Name output --計算主鍵的個數(shù),表名
insert ##t
select ‘<‘+@TableCode+‘ TABLE_NAME="‘+@Table_Name+‘" PK="‘+cast(@cnt as varchar)+‘">‘
union all
select space(4)+‘<COLUMNS COLUMNS_NAME="‘+cast(COLUMNS_NAME as varchar)+‘"
‘+space(8)+‘TABLE_CODE="‘+isnull(@TableCode,‘‘)+‘"
‘+space(8)+‘COLUMNS_VISIBLE="‘+isnull(COLUMNS_VISIBLE,‘‘)+‘"/>‘
from TB_TABLECOLUMN_T where TABLE_CODE=‘‘+@TableCode+‘‘
union all select ‘</‘+@TableCode+‘>‘
set @TableCodeS=right(@TableCodeS,len(@TableCodeS)-@i)
set @i=CHARINDEX(‘,‘,@TableCodeS)
end
if len(@TableCodeS)>0
begin
set @sql=‘‘
set @sql=N‘select @cnt=count(*),@Table_Name=max(Table_Name) from ‘
set @sql=@sql+N‘(‘
set @sql=@sql+N‘select top 100 percent * from TB_TABLECOLUMN_T where ‘
set @sql=@sql+N‘TABLE_CODE=‘‘‘+@TableCodeS+‘‘‘ and COLUMNS_ISKEY=‘‘√‘‘ ‘
set @sql=@sql+N‘order by COLUMNS_SORT ‘
set @sql=@sql+N‘)‘
set @sql=@sql+N‘A‘
exec sp_executesql @sql,N‘@cnt int output,@Table_Name varchar(20) output‘,@cnt output,@Table_Name output --計算主鍵的個數(shù),表名
insert ##t
select ‘<‘+@TableCodeS+‘ TABLE_NAME="‘+@Table_Name+‘" PK="‘+cast(@cnt as varchar)+‘">‘
union all
select space(4)+‘<COLUMNS COLUMNS_NAME="‘+cast(COLUMNS_NAME as varchar)+‘"
‘+space(8)+‘TABLE_CODE="‘+isnull(@TableCodeS,‘‘)+‘"
‘+space(8)+‘COLUMNS_VISIBLE="‘+isnull(COLUMNS_VISIBLE,‘‘)+‘"/>‘
from TB_TABLECOLUMN_T where TABLE_CODE=‘‘+@TableCodeS+‘‘
union all select ‘</‘+@TableCodeS+‘>‘
union all select ‘</ZehuaTableInfoXml>‘
end
exec(‘master..xp_cmdshell ‘‘bcp ##t out "‘+@fname+‘" /P"" /c‘‘‘)
drop table ##T
go
/*
測試環(huán)境:
Windows 2000 Server + SQL 2000測試通過
*/
