如何将表/查询存储为标准的XML文件
*--存为XML将表/查询存储为标准的XML文件
--*/
/*--调用示例
--用SQL用winows身份验证的情况
exec p_savexml @sql='地区资料',@fname='c:\地区资料.xml'
--用指定的用户
exec p_savexml @sql='地区资料',@fname='c:\地区资料.xml',@userid='sa'
--*/
if exists (select * from dbo.sysobjects where id = object_id(N'.') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure .
GO
create proc p_savexml
@sql varchar(8000), --要保存的表/视图/SQL查询语句
@fname varchar(1000)='c:\tmp.xml', --保存的XML文件名
@userid varchar(50)='', --用户名,如果为nt验证方式,则为''
@password varchar(50)='' --密码
as
declare @err int,@src varchar(255),@desc varchar(255)
declare @obj int,@constr varchar(1000)
if isnull(@userid,'')=''
set @constr='Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog='
db_name() ';Data Source=' @@servername
else
set @constr='Provider=SQLOLEDB.1;Persist Security Info=True;'
'User ID=' @userid ';Password=' isnull(@password,'')
';Initial Catalog=' db_name() ';Data Source=' @@servername
exec @err=sp_oacreate 'adodb.recordset',@obj out
if @err0 goto lberr
exec @err=sp_oamethod @obj,'open',null,@sql,@constr
if @err0 goto lberr
set @sql='del ' @fname
exec master..xp_cmdshell @sql,no_output
exec @err=sp_oamethod @obj,'save',null,@fname,1
if @err0 goto lberr
exec @err=sp_oadestroy @obj
return
lberr:
exec sp_oageterrorinfo 0,@src out,@desc out
select cast(@err as varbinary(4)) as 错误号
,@src as 错误源,@desc as 错误描述
go
<
页:
[1]