邹建的代码sql2000可运行sql2005运行失败

解决方案 »

  1.   

    SQL2005中應該用:sys.extended_properties
    如:
    SELECT 
    表名       = CASE WHEN A.COLORDER=1 THEN D.NAME ELSE '' END,
    表說明     = CASE WHEN A.COLORDER=1 THEN ISNULL(F.VALUE,'') ELSE '' END,
    欄位序號   = A.COLORDER,
    欄位名     = A.NAME,
    標識       = CASE WHEN COLUMNPROPERTY( A.ID,A.NAME,'ISIDENTITY')=1 THEN '√'ELSE '' END,
    主鍵       = CASE WHEN EXISTS(SELECT 1 FROM SYSOBJECTS WHERE XTYPE='PK' AND PARENT_OBJ=A.ID AND NAME IN (
    SELECT NAME FROM SYSINDEXES WHERE INDID IN(
    SELECT INDID FROM SYSINDEXKEYS WHERE ID = A.ID AND COLID=A.COLID))) THEN '√' ELSE '' END,
    類型       = B.NAME,
    佔用位元組數 = A.LENGTH,
    長度       = COLUMNPROPERTY(A.ID,A.NAME,'PRECISION'),
    小數位數   = ISNULL(COLUMNPROPERTY(A.ID,A.NAME,'SCALE'),0),
    允許空     = CASE WHEN A.ISNULLABLE=1 THEN '√'ELSE '' END,
    預設值     = ISNULL(E.TEXT,''),
    欄位說明   = ISNULL(G.[VALUE],'')
    FROM 
    SYSCOLUMNS A
    LEFT JOIN 
    SYSTYPES B 
    ON 
    A.XUSERTYPE=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 
    sys.extended_properties G 
    ON 
    A.ID=G.major_id AND A.COLID=G.minor_id  
    LEFT JOIN 
    sys.extended_properties F 
    ON 
    D.ID=F.major_id AND F.minor_id=0
    ORDER BY 
    A.ID,A.COLORDER
      

  2.   

    这个貌似见过
    顶 rockyljt(江濤) ( ) 信誉:100  2007-08-31 16:48:48  得分: 0
      

  3.   

    SELECT 
        表名       = case when a.colorder=1 then d.name else '' end,
        表说明     = case when a.colorder=1 then isnull(f.value,'') else '' end,
        字段序号   = a.colorder,
        字段名     = a.name,
        标识       = case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end,
        主键       = case when exists(SELECT 1 FROM sysobjects where xtype='PK' and parent_obj=a.id and name in (
                         SELECT name FROM sysindexes WHERE indid in( SELECT indid FROM sysindexkeys WHERE id = a.id AND colid=a.colid))) then '√' else '' end,
        类型       = b.name,
        占用字节数 = a.length,
        长度       = COLUMNPROPERTY(a.id,a.name,'PRECISION'),
        小数位数   = isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0),
        允许空     = case when a.isnullable=1 then '√'else '' end,
        默认值     = isnull(e.text,''),
        字段说明   = isnull(g.[value],'')
    FROM 
        syscolumns a
    left join 
        systypes b 
    on 
        a.xusertype=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 
    sys.extended_properties   g 
    on 
        a.id=G.major_id and a.colid=g.minor_id  
    left join sys.extended_properties f
    on 
        d.id=f.major_id and f.minor_id=0
    where 
        d.name='C_PARTY_SPREADER'    --如果只查询指定表,加上此条件
    order by 
        a.id,a.colorder
      

  4.   

    对象名 'sys.extended_columns' 无效。