vb如何获取sql server字段的描述信息和是否必填
解决方案 »
- 控件的颜色的问题
- 报表打印时,怎么样设置成横向打印?
- 高分求教:关于打印问题
- 小小问题,就是搞不定,关于状态栏中显示时间格式的问题!!!
- 如何在activereport报表中显示datagrid选中得多条纪录
- 对于OFFICE2K的那些Object Library,打包OLB文件后,如果发布到没有安装OFFICE的计算机上还是会出错,有什么解决办法吗?
- 怎样在某个vfp数据库中的记录集中删除记录,执行delete,update后,打开数据库,怎么还有记录存在啊
- 我的第一个作品,欢迎大家测试
- 菜鸟求助!!!!!!!!!!!!!!!!!!!!!!!!!!!
- ××给100分!!××请教一个基本的错误处理问题:loadpicture函数
- 请问,用open打开文本文件后,用print写文件,在每一行最后总加上回车,怎么才能不让它加回车呀??
- 关于判断用ShellExecute打开的应用程序是否关闭的问题,请帮忙啊,谢谢!!!
id:字段所在的表id
value:就是对字段的描述信息
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 ##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