打不死的心态活到老。
在sqlserver2000中将数据导出成Insert脚本
上一篇 /
下一篇 2007-08-01 00:23:27
/ 个人分类:数据库
+v2|1H,Z!qrB0if exists (select * from sysobjects where type='p' and name='UspOutputData')
/}I7`!R RYW:g0 drop proc UspOutputData
0mW
k#L} e5K0GO51Testing软件测试网+|'\Asreb%M
X8qMM'fk~O0CREATE PROCEDURE dbo.UspOutputData
T r(axAH9X4o0@tablename sysname 51Testing软件测试网&~
j _+^6v$Ni.Sm!k
AS
XX2u|,S'\(M,Qe7j0declare @column varchar(2000)
z"z5t)c.\T _"x.Q0declare @columndata varchar(2000) 51Testing软件测试网
jiL Tq
declare @sql varchar(8000)
YI:o?-g1x0declare @xtype tinyint 51Testing软件测试网
~}+pN rV
declare @name sysname 51Testing软件测试网-L`T
[
U E5Z n(\
declare @objectId int 51Testing软件测试网aXPp%d
declare @objectname sysname 51Testing软件测试网.d+S%C3u"j
declare @ident int
\ mt8},eu2CY0
I7t(L-YA`^0set nocount on
Z,]x8fS0
51Testing软件测试网+u4\6Imj-u*Oc"?-- 判斷對象是否存在
/jl7@6q|%C{(Nu0set @objectId=object_id(@tablename)
;F)dKLT#TvQ0if @objectId is null 51Testing软件测试网%] H
rX&p5Qx(X
begin 51Testing软件测试网BJ-Erlx!u7ZG5f}
print 'The object not exists' 51Testing软件测试网Z{lC:X4c
return 51Testing软件测试网7dp:p'i,E
end 51Testing软件测试网
OTyyK|4F.zk
51Testing软件测试网\0s1cEY3^\--此判断不严密 51Testing软件测试网5UMh^.H!Z~*UYG
set @objectname=rtrim(object_name(@objectId)) 51Testing软件测试网1lr3l(m%C)UP
if @objectname is null or charindex(@objectname,@tablename)=0
zw c2M}+ff.W.h0begin
a5_)a;]V0print 'object not in current database' 51Testing软件测试网] smU0B$`3N
X
return
2U
e,]._DL1S+mq0end