我在三层中做了一个数据删除，数据能删除，但每次都会跳出一个提示，然后程序中止。 ( 积分: 50 )

边城过客 · 2007-11-05

DELPHI7.0+SQL2000+三层：     做了一个数据删除，数据能删除，但每次都会跳出一个错误提示，然后程序中止，错误提示如下：     Project RenShi.exe raised exception class EOLeExecption with message  'ADOfrmjgglTCDjggl:CommandText does not return a result set'.Process Stopped. Use Step or Run to continue.   我的源码如下：   TCDjggl.Close;         TCDjggl.CommandText:='delete from rsjggl where dm='+edit1.Text;         TCDjggl.Execute;         TCDjggl.Open;         TCDjggl.ApplyUpdates(-1);   不知道问题出在哪，请高手们指点。

kaida · 2007-11-05

TCDjggl.Close;         TCDjggl.CommandText:='delete from rsjggl where dm='+edit1.Text;         TCDjggl.Execute;         //TCDjggl.Open;--->此行删掉         TCDjggl.ApplyUpdates(-1);

边城过客 · 2007-11-06

//TCDjggl.Open;--->此行删掉 也一样报这个错误。

easykoala · 2007-11-06

TCDjggl.ApplyUpdates(-1);也去掉

边城过客 · 2007-11-06

//TCDjggl.Open;--->此行删掉 TCDjggl.ApplyUpdates(-1);也去掉后，数据能删除，但每次也都会跳出一个错误提示，然后程序中止，错误提示如下：   Project RenShi.exe raised exception class EAcessViolation with message ' Acessriolation at address 004FFAA9 in module ' RenShi.exe .Read of address 00000000',Process stopped,Use Step or Run to continue.

easykoala · 2007-11-06

这跟这几行代码没有关系，访问空地址引起的

边城过客 · 2007-11-06

为什么会出现这种情况，怎么会有空地址，我又要如何解决？

ycluo · 2007-11-06

是不是你的ADOCommand里的commandtype不是设置成cmdtext

wyb_506 · 2007-11-07

我晕，怎么这样的问题也没人答对？ 所有的QUERY及其子类打开的方式有两种 一种是Query.execSQL; 另一种是Query.Open; 区别在于 如果你的query是类似select 语句，或者是能返回游标或者是能返回数据集的存储过程（只适用于SQL SERVER ，ORACLE 不适用），就使用open方法 如果你想实现一个insert delete update 或者其他修改数据的语句，也就是没有返回数据集，则使用execSQL方法 你的错误提示信息已经很清楚了，你是一个无返回值的语句 应该使用ExecSql方法而不是Open； 后面的错误是 你没有打开数据集 使用数据那肯定出错阿

songrun · 2007-11-07

先其他的地方找找原因，再看這個地方

xingkong97 · 2007-11-07

to wyb_506: 按你说的改，如果是数据库的错误，是不会给出那样的错误信息的。

边城过客 · 2007-11-07

我现在改成了如下代码：       ClientDataSet1.Close;       ClientDataSet1.CommandText:='delete from rsygmx where xm='+''''+edit2.Text+'''';       ShowMessage(ClientDataSet1.CommandText);       ClientDataSet1.Execute;       ClientDataSet1.ApplyUpdates(-1); 错误提示：     Project RenShi.exe raised exception class EDatabaseError with message ' ClientDataSet1:cannot perform this operation on a closed dataset'.Process stopped,Use Step or Run to continue.    我都不知道该怎么办了？     大家帮帮我！

cjsam · 2007-11-07

//ClientDataSet1.Close;//====>  ClientDataSet1.active:=false;  ClientDataSet1.active:=true;       ClientDataSet1.CommandText:='delete from rsygmx where xm='+''''+edit2.Text+'''';       ShowMessage(ClientDataSet1.CommandText);       ClientDataSet1.Execute;       ClientDataSet1.ApplyUpdates(-1); 不知道这样行不行？我觉得应该这样做，你开始都把close了，所以提示是关闭的，不能操作。

边城过客 · 2007-11-08

cjsam,按你说的改了，还是那错误提示： Project RenShi.exe raised exception class EDatabaseError with message ' ClientDataSet1:cannot perform this operation on a closed dataset'.Process stopped,Use Step or Run to continue. 谁能上QQ帮我看一下，万分感谢！ 我的QQ号码是：55887606

seusoftware · 2007-11-08

没见过这样写三层的 我一般用 adoquery.close; adoquery.sql.text=''; adoquery.Execsql/Open（如上面所讲你这里是delete，应该用ExecSQL） 而且在三层里，你用SQL语句操作了数据之后，不需要像两层那样apply或者refesh 我的习惯一般是adoquery进行(insert， del，update)操作，adodataset返回数据集 一开始也出现过你这样的问题

seusoftware · 2007-11-08

从DELPHI的帮助中找了这么一段： TADOCommand is most often used for executing data definition language (DDL) SQL commands or to execute a stored procedure that does not return a result set. For SQL statements that return a result set, TADODataSet, TADOQuery, or TADOStoredProc is better suited. The Execute method of TADOCommand is, however, capable of returning a recordset. To use that recordset, however, you will need a separate ADO dataset component. adocommand最好用于DDL （比如create table）SQL语句或者去执行一个没有返回集的存储过程。 如果需要返回数据集，最好用adodataset,adoquery或adostoredproc。 然而，adocommand的execute也可以返回一个数据集。 不过，想要使用那个数据集你还需要一个单独的ado dataset组件（这里也许就是你出错的地方）

边城过客 · 2007-11-08

到现在问题都还没解决，谁能上QQ帮我看一下，万分感谢！ 我的QQ号码是：55887606

lifangchao2008 · 2007-11-08

ClientDataSet1.active:=false;       ClientDataSet1.active:=true;       ClientDataSet1.CommandText:='delete from rsygmx where xm='+''''+edit2.Text+'''';       ClientDataSet1.Execute;       ClientDataSet1.CommandText:='Select *  from rsygmx';       ClientDataSet1.Open;       ClientDataSet1.ApplyUpdates(-1);

lifangchao2008 · 2007-11-08

我估计是你的CommandTest中没重新添加SQL语句引起的。

边城过客 · 2007-11-08

还是不行，谁有兴趣加我QQ（55887606），我把源码给他，帮我看看问题出在哪？

我在三层中做了一个数据删除，数据能删除，但每次都会跳出一个提示，然后程序中止。 ( 积分: 50 )

边城过客

Unregistered / Unconfirmed

kaida

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

easykoala

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

easykoala

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

ycluo

Unregistered / Unconfirmed

wyb_506

Unregistered / Unconfirmed

songrun

Unregistered / Unconfirmed

xingkong97

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

cjsam

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

seusoftware

Unregistered / Unconfirmed

seusoftware

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

lifangchao2008

Unregistered / Unconfirmed

lifangchao2008

Unregistered / Unconfirmed

边城过客

Unregistered / Unconfirmed

Similar threads