SQL SERVER 2000
sql_pub = "select id, [name], crdate from sysobjects d where d.xtype = 'U' and d.name <> 'dtproperties' order by a.[name] asc"
sql_pub = " SELECT " & _
" a.[name] as '字段名称'" & _
" , (case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) as 标识" & _
" , b.name 类型" & _
" , a.length 占用字节数" & _
" , (case when a.isnullable = 1 then '√'else '' end) 允许空" & _
" , isnull(e.text,'') 默认值" & _
" , cast(isnull(g.[value],'') as varchar(100)) AS 字段说明" & _
" FROM syscolumns a" & _
" left join systypes b" & _
" on a.xtype = b.xusertype" & _
" left join syscomments e" & _
" on a.cdefault=e.id" & _
" left join sysproperties g" & _
" on a.id = g.id AND a.colid = g.smallid" & _
" where a.id = " & table_id & _
" order by a.colorder"