菜鸟问题!如何用SQL语句删除记录呢?能不能给点例子,谢谢
解决方案 »
- 突然发现Delphi的for循环最后会把i还计算一遍!
- 如果在网页上判断电脑上是否安装了我的软件
- Borland 的中文网站都没有了?
- 将 String 类型存到 TStings.Objects[0] 怎么存与取???
- 有一段VC++代码,想转化为Delphi下使用,对这两种语法都熟悉的北京地区高手给我联系吧!
- 关于TheDay.Assign(NewDay)与TheDay := NewDay的区别
- 帮忙了,给分了!!
- 怎样得到EDIT组件中的字串长度?
- 如何把读取的数据写到缓冲区。
- 页面刷新指教
- 在access数据库下如何将日期字段值为‘’的数据取出,sql语句怎么写
- 我编写的程序,大家看看对吗?
begin
Active := False;
SQL.Clear;
SQL.Add('delete from T_User where UserID="' +Edit1.text +'"');
ExecSQL;
end;
begin
close;
sql.text:='delete from table where name='''+Edit1.Text+'''';
execsql;
end;
QUERY1.SQL.CLEAR;
QUERY1.SQL.ADD('DELETE FROM TABLE1 WHERE NAME="123"');
QUERY1.ExecSQL;
begin
close;
sql.clear;
sqt.text:='delete from table where bh='+''''+edit1.text+'''';
execsql;end;
begin
Active := False;
SQL.Clear;
SQL.Add('delete from T_User where bhID="' +Edit1.text +'"');
ExecSQL;
end;
begin
Active := False;
SQL.Clear;
SQL.Add(delete from T_BookInfo where BookID="' +Edit1.text +'"');
ExecSQL;
end;
不知你想要的是不是这个答案,希望可以对你有帮助:)
begin
if Active then
Close;
Sql.Clear;
Sql.Add('Delete From TabUser Where ...'); //过滤条件自己写
ExecSql;
end;
QUERY1.CLOSE;
QUERY1.SQL.CLEAR;
QUERY1.SQL.ADD('DELETE FROM TABLE1 WHERE NAME="123"');
QUERY1.ExecSQL;
begin
Sql.clear;
Sql.text:='delete from tablename where key=''''+edit1.text+'''';
ExecSql;
end; 这有一个要说明的是如果你用的是ORACLE 的话那一定不要用不用在 "= ''它们是不同的
在SQLSERVER 中是相同的。
thanks
begin
Active := False;
SQL.Clear;
SQL.Add('delete from T_User where UserID="' +Edit1.text +'"');
ExecSQL;
end;
begin
Active := False;
SQL.Clear;
SQL.Add('delete from T_User where UserID="' +Edit1.text +'"');
ExecSQL;
end;