5,939
社区成员
发帖
与我相关
我的任务
分享★★★请问怎样判断表内的一个字段是否存在？★★★ 用Delphi判断！ADO连接！
请问怎样判断表内的一个字段是否存在？ 用Delphi判断！ADO连接！
SQL里怎么判断？Delphi里怎么判断？
急，在线等！
SQL里怎么判断？Delphi里怎么判断？
急，在线等！
...全文
请发表友善的回复…
发表回复
踢踏 2003-12-03
- 打赏
- 举报
也可以这样判断
if AdoQueryTemp.FieldDefs.IndexOf(myDataSet.Fields[i].FieldName)>=0 then
if AdoQueryTemp.FieldDefs.IndexOf(myDataSet.Fields[i].FieldName)>=0 then
Miracle 2003-12-03
- 打赏
- 举报
user TDataset.FindField method
rongchao22 2003-12-03
- 打赏
- 举报
呵呵。不错的方法
frogshero 2003-12-03
- 打赏
- 举报
delphi :
if table1.fiels.findfield('asdfas')=nil then showMessage('not exists!')
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')
存在
if table1.fiels.findfield('asdfas')=nil then showMessage('not exists!')
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')
存在
xiaoqiang123 2003-12-03
- 打赏
- 举报
楼上的方法好！！
俺今天来学习的：）
俺今天来学习的：）
yzykjh 2003-12-03
- 打赏
- 举报
procedure TForm1.Button1Click(Sender: TObject);
var
StringList: TStringList;
begin
ADOConnection1.GetFieldNames('数据表名', StringList);
if StringList.IndexOf('字段名')>0 then
Showmessage('存在!')
else
Showmessage('不存在!')
end;
var
StringList: TStringList;
begin
ADOConnection1.GetFieldNames('数据表名', StringList);
if StringList.IndexOf('字段名')>0 then
Showmessage('存在!')
else
Showmessage('不存在!')
end;
zsjzwj 2003-12-03
- 打赏
- 举报
呵呵,这是一个不得已的方法;
zsjzwj 2003-12-03
- 打赏
- 举报
try
query1.fieldbyname('字段名').values;
有这个字段;
except
无这个字段;
end;
query1.fieldbyname('字段名').values;
有这个字段;
except
无这个字段;
end;
arraiy 2003-12-03
- 打赏
- 举报
谢谢各位
