数据库中有一个表tabledm记录数据库各表的信息;表名(tablename),表说明(tablesm);通过combobox下拉菜单,选择不同的表,在dbgird中显示对应表的数据。
combobox的下拉列表是表说明;
procedure TForm1.ComboBox2Change(Sender: TObject);
begin
adotable1.close;
ADOQuery1.close;
ADOQuery1.SQL.clear;
ADOQuery1.sql.add('select tablename from tabledm where tablesm=combobox2.text');
ADOQuery1.open;
ADOTable1.TableName:=ADOQuery1.adoquery1.fieldbyname('TABLENAME').asstring;
Try
ADOTable.open;
except
showmessage('表不存在!');
end;end.
其中:adotable1.connection:=dataconnection1;
adodatasource1.connection:=dataconnection1;
adodatasource1.dataset:=adotable1;编译时,选择表的时候出现问题project1.exe raised exception class EoleException with message“ora-00904:无效列名“是怎么回事?
combobox的下拉列表是表说明;
procedure TForm1.ComboBox2Change(Sender: TObject);
begin
adotable1.close;
ADOQuery1.close;
ADOQuery1.SQL.clear;
ADOQuery1.sql.add('select tablename from tabledm where tablesm=combobox2.text');
ADOQuery1.open;
ADOTable1.TableName:=ADOQuery1.adoquery1.fieldbyname('TABLENAME').asstring;
Try
ADOTable.open;
except
showmessage('表不存在!');
end;end.
其中:adotable1.connection:=dataconnection1;
adodatasource1.connection:=dataconnection1;
adodatasource1.dataset:=adotable1;编译时,选择表的时候出现问题project1.exe raised exception class EoleException with message“ora-00904:无效列名“是怎么回事?
解决方案 »
- 如何将字符串用md5加密为32位的字符串?
- 新手提问:能设置CheckBox的Item排列的方向和字体吗?我设了8个Item,它们竖着挤在一堆,很不好看,我想重新排列一下
- 请求帮助:DBGRID中如何打开多个对话!
- 如何写这样的sql语句啊
- 在存储过程是否可以创建文件目录??
- 由swyer组织的团队开发与学习小组现找软件开发高手加盟.
- 有没有宁波的朋友? 欢迎进来聊聊。
- WinService相关技术,请指教,谢谢!
- 我现在在开发一个个人防火墙软件,问谁有这方面的资料?还有费尔个人防火墙源程序那有下的?
- 数据库备份问题!
- 自动化测试cxGrid如何定位单元格
- 超级简单的问题,可是我这个新手不会。
ADOQuery1.sql.add('select tablename from tabledm where tablesm=‘+quotedstr(combobox2.text));
ADOQuery1.sql.add('select tablename from tabledm where tablesm=‘+quotedstr(combobox2.text));