一些 T-SQL 技巧

一些 T-SQL 技巧 一、 只复制一个表结构，不复制数据

    select top 0 * into [t1] from [t2]

    二、 获取数据库中某个对象的创建脚本

    1、 先用下面的脚本创建一个函数

    if exists(select 1 from sysobjects where id=object_id('fgetscript') and objectproperty(id,'IsInlineFunction')=0)
     drop function fgetscript
    go

    create function fgetscript(
     @servername varchar(50)     --服务器名
     ,@userid varchar(50)='sa'    --用户名,如果为nt验证方式,则为空
     ,@password varchar(50)=''    --密码
     ,@databasename varchar(50)    --数据库名称
     ,@objectname varchar(250)    --对象名

    ) returns varchar(8000)
    as
    begin
     declare @re varchar(8000)        --返回脚本
     declare @srvid int,@dbsid int       --定义服务器、数据库集id
     declare @dbid int,@tbid int        --数据库、表id
     declare @err int,@src varchar(255), @desc varchar(255) --错误处理变量

    --创建sqldmo对象
     exec @err=sp_oacreate 'sqldmo.sqlserver',@srvid output
     if @err〈〉0 goto lberr

    --连接服务器
     if isnull(@userid,'')='' --如果是 Nt验证方式
     begin
      exec @err=sp_oasetproperty @srvid,'loginsecure',1
      if @err〈〉0 goto lberr

      exec @err=sp_oamethod @srvid,'connect',null,@servername
     end
     else
      exec @err=sp_oamethod @srvid,'connect',null,@servername,@userid,@password

     if @err〈〉0 goto lberr

    --获取数据库集
     exec @err=sp_oagetproperty @srvid,'databases',@dbsid output
     if @err〈〉0 goto lberr

    --获取要取得脚本的数据库id
     exec @err=sp_oamethod @dbsid,'item',@dbid output,@databasename
     if @err〈〉0 goto lberr

    --获取要取得脚本的对象id
     exec @err=sp_oamethod @dbid,'getobjectbyname',@tbid output,@objectname
     if @err〈〉0 goto lberr

    --取得脚本
     exec @err=sp_oamethod @tbid,'script',@re output
     if @err〈〉0 goto lberr

     --print @re
     return(@re)

    lberr:
     exec sp_oageterrorinfo NULL, @src out, @desc out
     declare @errb varbinary(4)
     set @errb=cast(@err as varbinary(4))
     exec master..xp_varbintohexstr @errb,@re out
     set @re='错误号: '+@re
       +char(13)+'错误源: '+@src
       +char(13)+'错误描述: '+@desc
     return(@re)
    end
    go


    2、 用法如下
    用法如下,

    print dbo.fgetscript('服务器名','用户名','密码','数据库名','表名或其它对象名')

    3、 如果要获取库里所有对象的脚本，如如下方式

    declare @name varchar(250)
    declare #aa cursor for
     select name from sysobjects where xtype not in('S','PK','D','X','L')
    open #aa
    fetch next from #aa into @name
    while @@fetch_status=0
    begin
     print dbo.fgetscript('onlytiancai','sa','sa','database',@name)
     fetch next from #aa into @name
    end
    close #aa
    deallocate #aa

    4、 声明，此函数是csdn邹建邹老大提供的
    三、 分隔字符串
    如果有一个用逗号分割开的字符串，比如说“a,b,c,d,1,2,3,4“，如何用t-sql获取这个字符串有几个元素，获取第几个元素的值是多少呢？因为t-sql里没有split函数，也没有数组的概念，所以只能自己写几个函数了。
    1、 获取元素个数的函数

    create function getstrarrlength (@str varchar(8000))
    returns int
    as
    begin
      declare @int_return int
      declare @start int
      declare @next int
      declare @location int
      select @str =','+ @str +','
      select @str=replace(@str,',,',',')
      select @start =1
      select @next =1
      select @location = charindex(',',@str,@start)
      while (@location 〈〉0)
      begin
        select @start = @location +1
        select @location = charindex(',',@str,@start)
        select @next =@next +1
      end
     select @int_return = @next-2
     return @int_return
    end

    2、 获取指定索引的值的函数

    create function getstrofindex (@str varchar(8000),@index int =0)
    returns varchar(8000)
    as
    begin
      declare @str_return varchar(8000)
      declare @start int
      declare @next int
      declare @location int
      select @start =1
      select @next =1 --如果习惯从0开始则select @next =0
      select @location = charindex(',',@str,@start)
      while (@location 〈〉0 and @index 〉 @next )
      begin
        select @start = @location +1
        select @location = charindex(',',@str,@start)
        select @next =@next +1
      end
      if @location =0 select @location =len(@str)+1 --如果是因为没有逗号退出，则认为逗号在字符串后
      select @str_return = substring(@str,@start,@location -@start) --@start肯定是逗号之后的位置或者就是初始值1
      if (@index 〈〉 @next ) select @str_return = '' --如果二者不相等，则是因为逗号太少，或者@index小于@next的初始值1。
      return @str_return
    end

    3、 测试

    SELECT [dbo].[getstrarrlength]('1,2,3,4,a,b,c,d')
    SELECT [dbo].[getstrofindex]('1,2,3,4,a,b,c,d',5)

    四、 一条语句执行跨越若干个数据库
    我要在一条语句里 *** 作不同的服务器上的不同的数据库里的不同的表,怎么办呢?
    第一种方法:


    select * from OPENDATASOURCE('SQLOLEDB','Data Source=远程ip;User ID=sa;Password=密码').库名.dbo.表名

    第二种方法:
    先使用联结服务器:


    EXEC sp_addlinkedserver '别名','','MSDASQL',NULL,NULL,'DRIVER={SQL Server};SERVER=远程名;UID=用户;PWD=密码;'
    exec sp_addlinkedsrvlogin  @rmtsrvname='别名',@useself='false',@locallogin='sa',@rmtuser='sa',@rmtpassword='密码'
    GO

    然后你就可以如下：

    select * from 别名.库名.dbo.表名
    insert 库名.dbo.表名 select * from 别名.库名.dbo.表名
    select * into 库名.dbo.新表名 from 别名.库名.dbo.表名
    go

    五、 怎样获取一个表中所有的字段信息
    蛙蛙推荐：怎样获取一个表中所有字段的信息
    先创建一个视图

    Create view fielddesc
    as
    select o.name as table_name,c.name as field_name,t.name as type,c.length as

    length,c.isnullable as isnullable,convert(varchar(30),p.value) as desp
    from syscolumns c
    join systypes t on c.xtype = t.xusertype
    join sysobjects o on o.id=c.id
    left join    sysproperties p on p.smallid=c.colid and p.id=o.id
    where o.xtype='U'


    查询时:

    Select * from fielddesc where table_name = '你的表名'


    还有个更强的语句，是邹建写的，也写出来吧

    SELECT
     (case when a.colorder=1 then d.name else '' end) N'表名',
     a.colorder N'字段序号',
     a.name N'字段名',
     (case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) N'标识',
     (case when (SELECT count(*)
     FROM sysobjects
     WHERE (name in
               (SELECT name
              FROM sysindexes
              WHERE (id = a.id) AND (indid in
                        (SELECT indid
                       FROM sysindexkeys
                       WHERE (id = a.id) AND (colid in
                                 (SELECT colid
                                FROM syscolumns
                                WHERE (id = a.id) AND (name = a.name))))))) AND
            (xtype = 'PK'))〉0 then '√' else '' end) N'主键',
     b.name N'类型',
     a.length N'占用字节数',
     COLUMNPROPERTY(a.id,a.name,'PRECISION') as N'长度',
     isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0) as N'小数位数',
     (case when a.isnullable=1 then '√'else '' end) N'允许空',
     isnull(e.text,'') N'默认值',
     isnull(g.[value],'') AS N'字段说明'
    --into ##tx

    FROM  syscolumns  a left join systypes b
    on  a.xtype=b.xusertype
    inner join sysobjects d
    on a.id=d.id  and  d.xtype='U' and  d.name〈〉'dtproperties'
    left join syscomments e
    on a.cdefault=e.id
    left join sysproperties g
    on a.id=g.id AND a.colid = g.smallid
    order by object_name(a.id),a.colorder


    六、 时间格式转换问题

    因为新开发的软件需要用一些旧软件生成的一些数据，在时间格式上不统一，只能手工转换，研究了一下午写了三条语句，以前没怎么用过convert函数和case语句，还有“+“ *** 作符在不同上下文环境也会起到不同的作用，把我搞晕了要，不过现在看来是差不多弄好了。

    1、把所有“70.07.06“这样的值变成“1970-07-06“

    UPDATE lvshi
    SET shengri = '19' + REPLACE(shengri, '.', '-')
    WHERE (zhiyezheng = '139770070153')


    2、在“1970-07-06“里提取“70“,“07“,“06“

    SELECT SUBSTRING(shengri, 3, 2) AS year, SUBSTRING(shengri, 6, 2) AS month,
          SUBSTRING(shengri, 9, 2) AS day
    FROM lvshi
    WHERE (zhiyezheng = '139770070153')

    3、把一个时间类型字段转换成“1970-07-06“

    UPDATE lvshi
    SET shenling = CONVERT(varchar(4), YEAR(shenling))
          + '-' + CASE WHEN LEN(MONTH(shenling)) = 1 THEN '0' + CONVERT(varchar(2),
          month(shenling)) ELSE CONVERT(varchar(2), month(shenling))
          END + '-' + CASE WHEN LEN(day(shenling)) = 1 THEN '0' + CONVERT(char(2),
          day(shenling)) ELSE CONVERT(varchar(2), day(shenling)) END
    WHERE (zhiyezheng = '139770070153')

    七、 分区视图

    分区视图是提高查询性能的一个很好的办法

    --看下面的示例

    --示例表
    create table tempdb.dbo.t_10(
    id int primary key check(id between 1 and 10),name varchar(10))

    create table pubs.dbo.t_20(
    id int primary key check(id between 11 and 20),name varchar(10))

    create table northwind.dbo.t_30(
    id int primary key check(id between 21 and 30),name varchar(10))
    go

    --分区视图
    create view v_t
    as
    select * from tempdb.dbo.t_10
    union all
    select * from pubs.dbo.t_20
    union all
    select * from northwind.dbo.t_30
    go

    --插入数据
    insert v_t select 1 ,'aa'
    union  all select 2 ,'bb'
    union  all select 11,'cc'
    union  all select 12,'dd'
    union  all select 21,'ee'
    union  all select 22,'ff'

    --更新数据
    update v_t set name=name+'_更新' where right(id,1)=1

    --删除测试
    delete from v_t where right(id,1)=2

    --显示结果
    select * from v_t
    go

    --删除测试
    drop table northwind.dbo.t_30,pubs.dbo.t_20,tempdb.dbo.t_10
    drop view v_t

    /**//*--测试结果

    id          name
    ----------- ----------
    1           aa_更新
    11          cc_更新
    21          ee_更新

    （所影响的行数为 3 行）
    ==*/


    八、 树型的实现

    --参考

    --树形数据查询示例
    --作者: 邹建

    --示例数据
    create table [tb]([id] int identity(1,1),[pid] int,name varchar(20))
    insert [tb] select 0,'中国'
    union  all  select 0,'美国'
    union  all  select 0,'加拿大'
    union  all  select 1,'北京'
    union  all  select 1,'上海'
    union  all  select 1,'江苏'
    union  all  select 6,'苏州'
    union  all  select 7,'常熟'
    union  all  select 6,'南京'
    union  all  select 6,'无锡'
    union  all  select 2,'纽约'
    union  all  select 2,'旧金山'
    go

    --查询指定id的所有子
    create function f_cid(
    @id int
    )returns @re table([id] int,[level] int)
    as
    begin
     declare @l int
     set @l=0
     insert @re select @id,@l
     while @@rowcount〉0
     begin
      set @l=@l+1
      insert @re select a.[id],@l
      from [tb] a,@re b
      where a.[pid]=b.[id] and b.[level]=@l-1
     end
    /**//**//**//*--如果只显示最明细的子(下面没有子),则加上这个删除
     delete a from @re a
     where exists(
      select 1 from [tb] where [pid]=a.[id])
    --*/
     return
    end
    go

    --调用(查询所有的子)
    select a.*,层次=b.[level] from [tb] a,f_cid(2)b where a.[id]=b.[id]
    go

    --删除测试
    drop table [tb]
    drop function f_cid
    go

    九、 排序问题

    CREATE TABLE [t] (
     [id] [int] IDENTITY (1, 1) NOT NULL ,
     [GUID] [uniqueidentifier] NULL
    ) ON [PRIMARY]
    GO

    下面这句执行5次


    insert t values (newid())

    查看执行结果


    select * from t

    1、 第一种

    select * from t
     order by case id when 4 then 1
                      when 5 then 2
                      when 1 then 3
                      when 2 then 4
                      when 3 then 5 end

    2、 第二种

    select * from t order by (id+2)%6

    3、 第三种

    select * from t order by charindex(cast(id as varchar),'45123')

    4、 第四种

    select * from t
    WHERE id between 0 and 5
    order by charindex(cast(id as varchar),'45123')

    5、 第五种

    select * from t order by case when id 〉3 then id-5 else id end

    6、 第六种

    select * from t order by id / 4 desc,id asc


    十、 一条语句删除一批记录
    首先id列是int标识类类型，然后删除ID值为5,6,8,9,10,11的列，这里的cast函数不能用convert函数代替，而且转换的类型必须是varchar，而不能是char，否则就会执行出你不希望的结果，这里的“5,6,8,9,10,11“可以是你在页面上获取的一个chkboxlist构建成的值，然后用下面的一句就全部删
    除了，比循环用多条语句高效吧应该。

    delete from [fujian] where charindex(','+cast([id] as varchar)+',',','+'5,6,8,9,10,11,'+',')〉0

    还有一种就是

    delete from table1 where id in(1,2,3,4 )

    十一、获取子表内的一列数据的组合字符串
    下面这个函数获取05年已经注册了的某个所的律师，唯一一个参数就是事务所的名称，然后返回zhuce字段里包含05字样的所有律师。


    CREATE   FUNCTION fn_Get05LvshiNameBySuo  (@p_suo Nvarchar(50))
    RETURNS Nvarchar(2000)
    AS
    BEGIN
     DECLARE @LvshiNames varchar(2000), @name varchar(50)
     select @LvshiNames=''
     DECLARE lvshi_cursor CURSOR FOR
    数据库里有1,2,3,4,5 共5条记录,要用一条sql语句让其排序,使它排列成4,5,1,2,3,怎么写?