在delphi远程数据库的客户端中, 编写带有参数的查询知道可以这样写:
如
ClientDataset1.close;
ClientDataset1.CommandText:= 'select * from ks where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.open;而编写带有参数的增加、删除、修改该怎样写呢?请教各位。请给个具体例子。
如
ClientDataset1.close;
ClientDataset1.CommandText:= 'select * from ks where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.open;而编写带有参数的增加、删除、修改该怎样写呢?请教各位。请给个具体例子。
解决方案 »
- popupmenu 怎样在固定位置弹出。
- DBGrid怎么支持鼠标中键上下移动记录?
- 急急急!!!再线等待!!!请大家帮助!!80分相谢!
- 一个复杂的网络问题,请正真的高手现身。
- 求一SQL语句。
- 有一TDBEdit控件关联一DateTime字段,如果在该控件里输入非法日期,如1999-1-32,那么当点击其它控件时,会报错:‘1999-1-32’ is not a
- WinExec如何傳遞有空格的參數-----A程序調用B程序,B程序要兩個參數;WinExec(PCHAR("B spara1 spara2"),...)
- delphi的ado组件支持分页吗?
- 为什么我的分总是0,不加了????? 斑蛛在哪?!
- :关于Delphi打印的问题
- VB中有无TApplication对应类型
- RMReport打印统计问题
'insert into t(c1,c2) values(''1'',''2'')'
删除:
'delete from ks where 准考证号 =:zkzh'
修改:
'update ks set 准考证号=''1'' where 准考证号 =:zkzh'______
问题如果解决请及时结帖
'insert into t(c1) values('+ quotestr(变量) +')'
也可以
有问题可以参加QQ高级群:9642802;
ClientDataset1.close;
ClientDataset1.CommandText:= 'Insert InTo ks Values(:zkzh,'...') where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.ExecSQl;
ClientDataset1.close;
ClientDataset1.CommandText:= 'Insert InTo ks Values(准考证号) where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.ExecSQl; 为何会报错:
[Error] kh.pas(69): Undeclared identifier: 'ExecSQl'
[Fatal Error] keProject2.dpr(5): Could not compile used unit 'kh.pas'
---------------------------
这句是错误的,ClientDataset不会有这样的方法。
ClientDataset1.close;
ClientDataset1.CommandText:='delete from ksf where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.open;
ClientDataset1.close;
ClientDataset1.CommandText:='delete from ksf where 准考证号 =:zkzh';
ClientDataset1.Params.ParamByName('zkzh').Value:=edit1.text;
ClientDataset1.open;但出现了错误:Project keProject2.exe raised exception class EOleException with message 'ADOQuery1: CommandText does not return a result set'. Process stopped. Use Step or Run to continue.在query组件中,要执行delete、insert、update 必须调用execsql,不能用open,这里用了ClientDataset1.open;是不是出现错误的原因,但你又说了,ClientDataset.ExecSQl;不会有这样的方法。怪怎办?请给个具体例子好吗?谢谢
insert时为什么加where条件,语句是错误的。
增加:
'insert into t(c1,c2) values(:c1,:c2)'
删除:
'delete from ks where 准考证号 =:zkzh'
修改:
'update ks set 准考证号=:z where 准考证号 =:zkzh'全部用Execute