/*

'bcp' 不是內部或外部命令，也不是可執行的程式？

看看在C:/Program Files/Microsoft SQL Server/80/Tools/Binn裡面有沒有bcp.exe這個檔案
然後看看path裡面加C:/Program Files/Microsoft SQL Server/80/Tools/Binn這個目錄沒有.

右鍵我的電腦--屬性--高階--環境變數--在系統變數中找到path--編輯

在變數值的最後加上:

C:/Program Files/Microsoft SQL Server/80/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檔案
www.389hack.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 @

[email protected]+N'('
 set @[email protected]+N'select top 100 percent * from TB_TABLECOLUMN_T where '
 set @[email protected]+N'TABLE_CODE='''[email protected]+''' and COLUMNS_ISKEY=''√'' '
 set @[email protected]+N'order by COLUMNS_SORT '
 set @[email protected]+N')'
 set @[email protected]+N'A'
 exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --計算主鍵的個數,表名

 insert ##t
 select '<'[email protected]+' TABLE_NAME="'[email protected]_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=''[email protected]+''
 union all select '</'[email protected]+'>'
 set  @TableCodeS=right(@TableCodeS,len(@TableCodeS)[email protected]) 
    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 @[email protected]+N'('
 set @[email protected]+N'select top 100 percent * from TB_TABLECOLUMN_T where '
 set @[email protected]+N'TABLE_CODE='''[email protected]+''' and COLUMNS_ISKEY=''√'' '
 set @[email protected]+N'order by COLUMNS_SORT '
 set @[email protected]+N')'
 set @[email protected]+N'A'
 exec sp_executesql @sql,N'@cnt int output,@Table_Name varchar(20) output',@cnt output,@Table_Name output --計算主鍵的個數,表名
 insert ##t
 select '<'[email protected]+' TABLE_NAME="'[email protected]_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=''[email protected]+''
 union all select '</'[email protected]+'>'
 union all select '</ZehuaTableInfoXml>'
end

exec('master..xp_cmdshell ''bcp ##t out "'[email protected]+'" /P"" /c''')
drop table ##T

go

/*

測試環境:

Windows 2000 Server + SQL 2000測試通過

*/