*大家帮我看看这个CancelBatch(arAll)的问题**

Snakeguo 2001-12-01 04:14:07

对一ADO的主从表中的任一表执行InsertRecord后
再执行CancelBatch(arAll)操作,报出如下错误信息:
'行句柄引用了一个已被删除的行或被标识未删除的行。'
单独运行程序则不会报错,但CancelBatch(arAll)并没有成功执行!
谁可以帮我解释一下这到底是怎么回事?

...全文

174 12 打赏收藏转发到动态举报

写回复

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

Snakeguo 2001-12-08

打赏
举报

回复

总是始终得不到解决

rainbow_57 2001-12-03

打赏
举报

回复

Cancel Batch 好像有点问题的。
把记录移到没有变更过的数据上去就不会报错了

Snakeguo 2001-12-03

打赏
举报

回复

大家快帮帮我吧，我现在被卡住了。
而且现在又有一个问题，执行ADOTABLE.DELETERECORDS(arAll),报错:操作在该内容中不被允许.执行ADOTABLE.DELETERECORDS(arCurrent)却正常。
Help me！！！

Snakeguo 2001-12-03

打赏
举报

回复

没人会答吗？

cczdp 2001-12-03

打赏
举报

回复

用insert recorder 后再close,open,这样试试

Snakeguo 2001-12-01

打赏
举报

回复

to tikkypeng(一两狂死郎之天衣有缝):
我用的是ADOTABLE,LockType是ltBatchOptimistic的.

to fireworld(火世界):
我的ADO是2.6CN的,如果数据没有记录,执行CancelBatch(arAll),不会报错.

现在我新建了一个简单的程序来测试,在DBGRID中操作(按方向键下新增),发现如果只有一条记录的话CancelBatch(arAll)成功,而多条则报同样的错.
UpdateBatch则没有这个问题.

???????????????????????????????????????????????????

fireworld 2001-12-01

打赏
举报

回复

你的ADO升级了吗？如果当前的数据库没有记录，抱错吗？

fireworld 2001-12-01

打赏
举报

回复

我用APPEND（），没有问题，你要插入记录用这个可以的，但一定要注意LockType的设置，
ltBatchOptimistic是批量的提交，没有UPDATEBATCH前，它只对内存的数据集操作

tikkypeng 2001-12-01

打赏
举报

回复

你的ADOQuery.LockType是不是为ltBatchOptimistic？？？

王集鹄 2001-12-01

打赏
举报

回复

有些情况我也搞不清楚
用变态的方法搞定再说
之后再加慢慢理解思考

Snakeguo 2001-12-01

打赏
举报

回复

to zswang(伴水)(伤心中):
先谢谢你
我试过了，依然报同样的错误信息。
我用UpdateBatch(arAll)就没问题，为什么会这样的呢？

王集鹄 2001-12-01

打赏
举报

回复

//不要问我为什么
//试试先
InsertRecord之前
Close;
Open;

SQL语法大全 SQL语法大全 1. ASP与Access数据库连接： 2. ASP与SQL数据库连接：建立记录集对象： set rs=server.createobject("adodb.recordset") rs.open SQL语句,conn,3,2 3. SQL常用命令使用方法： (1) 数据记录筛选： sql="select * from 数据表 where 字段名=字段值 order by 字段名 [desc]" sql="select * from 数据表 where 字段名 like \'%字段值%\' order by 字段名 [desc]" sql="select top 10 * from 数据表 where 字段名 order by 字段名 [desc]" sql="select * from 数据表 where 字段名 in (\'值1\',\'值2\',\'值3\')" sql="select * from 数据表 where 字段名 between 值1 and 值2" (2) 更新数据记录： sql="update 数据表 set 字段名=字段值 where 条件表达式" sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式" (3) 删除数据记录： sql="delete from 数据表 where 条件表达式" sql="delete from 数据表" (将数据表所有记录删除) (4) 添加数据记录： sql="insert into 数据表 (字段1,字段2,字段3 …) values (值1,值2,值3 …)" sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表) (5) 数据记录统计函数： AVG(字段名) 得出一个表格栏平均值 COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计 MAX(字段名) 取得一个表格栏最大的值 MIN(字段名) 取得一个表格栏最小的值 SUM(字段名) 把数据栏的值相加引用以上函数的方法： sql="select sum(字段名) as 别名 from 数据表 where 条件表达式" set rs=conn.excute(sql) 用 rs("别名") 获取统的计值，其它函数运用同上。 (5) 数据表的建立和删除： CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… ) 例：CREATE TABLE tab01(name varchar(50),datetime default now()) DROP TABLE 数据表名称 (永久性删除一个数据表) 4. 记录集对象的方法： rs.movenext 将记录指针从当前的位置向下移一行 rs.moveprevious 将记录指针从当前的位置向上移一行 rs.movefirst 将记录指针移到数据表第一行 rs.movelast 将记录指针移到数据表最后一行 rs.absoluteposition=N 将记录指针移到数据表第N行 rs.absolutepage=N 将记录指针移到第N页的第一行 rs.pagesize=N 设置每页为N条记录 rs.pagecount 根据 pagesize 的设置返回总页数 rs.recordcount 返回记录总数 rs.bof

Delphi 用TDBNavigator组件删除数据显示自定义信息，实现这一功能的关键代码，参考如下：　　procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn); 　　begin 　　 if button = nbdelete then 　　 if Application.MessageBox('确定要删除此行数据吗？','提示',MB_YESNO) = ID_NO then 　　 begin 　　 ADOQuery1.CancelBatch(); 　　 end 　　 else 　　 ADOQuery1.UpdateBatch(); 　　end; 　　　　procedure TForm1.FormCreate(Sender: TObject); 　　var 　　 Str : String; 　　begin 　　 Str := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' ExtractFilePath(Application.ExeName) 'database\db1.mdb' ';Persist Security Info=False'; 　　 ADOConnection1.ConnectionString := Str; 　　 ADOConnection1.Connected := True; 　　 ADOQuery1.Active := True; 　　end;

***********************************************************************************************************rs.open语句详细说明rs.Open [第一个参数], [第二个参数], [第三个参数], [第四个参数], (第五个参数)rs.O

***********************************************************************************************************rs.open语句详细说明rs.Open [第一个参数], [第二个参数], [第三个参数], [第四个参数], (第五个参数)

*********************************************************************rs.open语句详细说明rs.Open [第一个参数], [第二个参数], [第三个参数], [第四个参数], (第五个参数)rs.Open [数据表名或SQL指令], [指定当前的连接], [指示

5,388

社区成员

262,730

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章