/*
来源找不到了.拿来后修改了ntext和text存放html中有'会出现错误的情况.
*/
CREATE PROCEDURE sp_findinsertinto
@tablename sysname
AS
declare @column varchar(1000)
declare @columndata varchar(1000)
declare @sql varchar(4000)
declare @xtype tinyint
declare @name sysname
declare @objectId int
declare @objectname sysname
declare @ident int
set nocount on
set @objectId=object_id(@tablename)
if @objectId is null -- 判斷對象是否存 在
begin
print 'The object not exists'
return
end
set @objectname=object_name(@objectId)
if @objectname is null or charindex (@objectname,@tablename)=0 --此判断不严密
begin
print 'object not in current database'
return
end
if OBJECTPROPERTY(@objectId,'IsTable') <> 1 -- 判斷對象是否是table
begin
print 'The object is not table'
return
end
select @ident=status&0x80 from syscolumns where
id=@objectid and status&0x80=0x80
if @ident is not null
print 'SET IDENTITY_INSERT '+@TableName+' ON'
declare syscolumns_cursor cursor
for select c.name,c.xtype from syscolumns c
where c.id=@objectid
order by c.colid
open syscolumns_cursor
set @column=''
set @columndata=''
fetch next from syscolumns_cursor into @name,@xtype
while @@fetch_status <>-1
begin
if @@fetch_status<>-2
begin
if @xtype not in(189,34,98) -- timestamp不需处理，image,text,ntext,sql_variant 暂时不处理
begin
set @column=@column+case when len (@column)=0 then'' else ','end+@name
set @columndata=@columndata+case when len (@columndata)=0 then '' else ','','','end
+case when @xtype in(167,175) then
'''''''''+'+@name+'+''''''''' --varchar,char
when @xtype in(231,239) then
'''N''''''+'+@name+'+''''''''' --nvarchar,nchar
when @xtype=61 then '''''''''+convert (char(23),'+@name+',121)+''''''''' --datetime
when @xtype=58 then '''''''''+convert (char(16),'+@name+',120)+''''''''' -- smalldatetime
when @xtype=36 then '''''''''+convert (char(36),'+@name+')+''''''''' -- uniqueidentifier
when @xtype IN(35,99) then '''N''''''+'+'cast(replace(+CAST('+@name+' AS VARCHAR(MAX)),'''''''','''''''''''') as varchar(max))'+'+''''''''' --nvarchar,nchar
else @name end
end
end
fetch next from syscolumns_cursor into @name,@xtype
end
--select *from syscolumns where id=object_id('','')
close syscolumns_cursor
deallocate syscolumns_cursor
set @sql='set nocount on select ''insert
'+@tablename+'('+@column+') values (''as ''--'','+ @columndata+','')'' from
'+@tablename
print '--'+cast(@sql as varchar(max))
exec(@sql)
if @ident is not null
print 'SET IDENTITY_INSERT '+@TableName+' OFF'