TClientDataSet的CommandText只能执行有返回数据集的语句.所在Update语句不能执行, 你只能用Select 取回数据集后进行修改再更新
解决方案 »
- 寻人合作开发建筑类相关软件
- 多层开发如何从服务端断开某个用户的连接?
- 请各位大虾告诉我这个功能如何实现,分酬
- 可在运行期拖动,拉伸,可改变形状(如TShap一样,可有椭圆,方形,圆等),可外加边线色的Panel控件!
- 如何实现程序自动更新
- 能否具体解释一下adoquery1.Parameters[n]等!
- 关于处理Win+D(显示桌面)的问题
- 请问把表的UpdataRecordTypes属性设为rtInserted,我怎么找不到啊请问,怎么设请详细说明我在线等待多谢
- 局域网上拷贝文件的问题, 请高手帮助!
- 今天我用了delphi6企業版
- Database控件里,怎样用DriverName 而不用 Alias 连接数据库?
- 怎样保持主线程与分线程同步
Close();
CommandText := 'SELECT userid, password FROM user12 WHERE userid=''' + usernameok + '''';
Open();
if not IsEmpty() then begin
Edit();
Filtered := false;
Filter := 'userid=''' + usernameok + '''';
Filtered := true;
FieldByName('password').AsString := edit1.text;
Post();
if ChangeCount > 0 then ApplyUpdates(-1);
Filtered := false;
end;
end;
况且问题也不是在这里
Datamodule1.Clientcompanyuser.commandtype:=cmdText;
Datamodule1.Clientcompanyuser.commandtext:=ab;
Datamodule1.Clientcompanyuser.active:=True;
Datamodule1.Clientcompanyuser.Execute;