SQL SerVer2000数据库每个表的结构信息保存在哪里?
解决方案 »
- 求一个庞大工程的简单解决之道!
- 用Delphi做管理系统时的用户权限设置问题
- 高分请教一个比较复杂的问题,在线等
- Apache怎样和Delphi生成的webservice整合
- 多文档程序中,如何设置子窗体显示时的大小?
- 如何用delphi的ado连接远程sql server数据库?初学delphi,请大家多帮忙!!
- 请问,向listview中添加5000条以上的记录时,非常慢,用了一分半钟,如何加快listview的添加速度???????
- 请问, dataset 属性里的 lookup 怎么用?
- Fast Report 2.47 拆行问题,请高手指教
- 各位大神。请问这段C++代码翻译成Delphi 是什么?
- delphi里有没有全局变量?变量的作用域如何理解?
- delphi 7 菜鸟:为什么我的delphi7没有dbExpress工具栏?
(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 ##txFROM 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
另外用SP_HELPDB等系统存储过程!