一条Delete语句,在Oracle里很快就运行完了,在程序里为什么ExecSQL半天也没响应?
可能是什么原因?SmartQuery1.Session := OraSession1;
with SmartQuery1 do
begin
SQL.Clear;
SQL.Add('delete from table where name='''+ DBLookupListBox1.KeyValue +''' and ID= '''+ Trim(ID.Text)+'''');
SQL.Text;
ExecSQL;
end;
可能是什么原因?SmartQuery1.Session := OraSession1;
with SmartQuery1 do
begin
SQL.Clear;
SQL.Add('delete from table where name='''+ DBLookupListBox1.KeyValue +''' and ID= '''+ Trim(ID.Text)+'''');
SQL.Text;
ExecSQL;
end;
解决方案 »
- 为什么我的FastReport在预览时速度非常慢!FastReport2和FastReport3都试过了!
- 有没有3DES-ECB的加密解密算法源代码?
- 如何让按钮上的字,竖起来 50分像这样
- TXMLDocument的问题!来者有分!
- 请问大家,在一个应用服务器中如何解决二个以上的数据模块窗体问题???
- 如何做一个窗口永远在其它窗口之顶(y轴方向的而不是z方向的),连桌面图标都自动下移
- 高分(100分)求助一个DELPHI程序
- dbComboBox问题!!!!!
- 套接字是什么啊?帮帮忙啊。。大哥大姐们。。
- Delphi中如何删除ListView1中选中的一行
- 使用ODAC组件用TABLE和SQL,插入和更新数据之后,数据库无法实时更新?如何解决呀?~!
- TdxSideBar控件问题
如果用SQL.Text就不用Add,SQL.Clear也可以省略了
不习惯用ADD,麻烦
with SmartQuery1 do
begin
Close;
SQL.text := 'delete from table where name='''+ DBLookupListBox1.KeyValue +''' and ID= '''+ Trim(ID.Text)+'''';
ExecSQL;
end;这样执行试试
或
SmartQuery1.Session := OraSession1;
with SmartQuery1 do
begin
Close;
SQL.text := 'delete from table where name=:name and id=:ID';
ParamByName('name').value := DBLookupListBox1.KeyValue;
ParamByName('ID').value := Trim(ID.Text);
ExecSQL;
end;