单表导入/导出文本文件

/*--实现数据导入/导出的存储过程

 可以实现导入/导出 指定表 到文本文件
 支持自定义行/列分隔符

--邹建 2003.07--*/

/*--调用示例
导出调用示例
--导出指定表,这里指定导出表:地区资料
exec file2table @#zj@#,@#@#,@#@#,@#c:\zj.txt@#,@#xzkh_new..地区资料@#,@rowsplit=@#,@#

导入调用示例
--导入指定表,这里指定导入表:地区资料
exec file2table @#zj@#,@#@#,@#@#,@#c:\zj.txt@#,@#xzkh_sa..地区资料@#,0
--*/

if exists(select 1 from sysobjects where name=@#File2Table@# and objectproperty(id,@#IsProcedure@#)=1)
 drop procedure File2Table
go

create procedure File2Table
@servername varchar(200) --服务器名
,@username varchar(200)  --用户名,如果用NT验证方式,则为空@#@#
,@password varchar(200)  --密码
,@filename varchar(1000) --目录名+文件名
,@tbname varchar(500)=@#@# --数据库..表名
,@isout bit=1    --1为导出(默认),0为导入
,@fdsplit varchar(10)=@#\t@# --字段分隔符,默认为制表符
,@rowsplit varchar(10)=@#\n@# --记录分隔符,默认为回车符
as
declare @sql varchar(8000)

set @sql=@#bcp "@#+@tbname
 +case when @isout=1 then @#" out@# else @#" in@# end
 +@# "@#+@filename+@#" /c@# +@# /S"@#+@servername
 +case when isnull(@username,@#@#)=@#@# then @#@#
  else @#" /U"@#+@username end
 +@#" /P"@#+isnull(@password,@#@#)+@#"@#
 +@# /t"@#+@fdsplit+@#"@#
 +@# /r"@#+@rowsplit+@#"@#

exec master..xp_cmdshell @sql
go

原文转自：http://www.ltesting.net