如何判断数据库表的某列是否存在？

Question

如题，Delphi7+Sqlserver2000,怎样判断某表是否存在某列（字段）？
如判断表demo是否存在字段name,该怎样实现？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
 var
   StringList: TStringList;
begin
   ADOConnection1.GetFieldNames('数据表名', StringList);
   if StringList.IndexOf('字段名')>0 then
      Showmessage('存在!')
    else
      Showmessage('不存在!')
end;
mssql:
if Exists(select A.* from syscolumns A inner join sysobjects B on A.id=B.id  where B.type = 'U' and
                    B.name='TableName' and A.name='FieldName')

Answer 2

SQL语句:if not exists (select name from syscolumns where id=object_id('demo') and name='name') 

Answer 3

你用sqlserver的导出脚本功能，看看它的sql是怎么写的就知道了，很多你这类的问题都可以这样解决