使用adLockBatchOptimistic锁修改access记录的问题

lwdlcb 2007-10-08 04:16:19
#include "stdafx.h"
#include "Locale.h"
#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")


int _tmain(int argc, _TCHAR* argv[])
{
setlocale(LC_ALL,"");

CoInitialize(0);


_RecordsetPtr rs;
rs.CreateInstance(L"adodb.Recordset");
rs- >Open(L"select * from lwd","provider=microsoft.jet.oledb.4.0;data source=lwd.mdb;",adOpenStatic,adLockBatchOptimistic,adCmdText);

while (!(rs- >adoEOF)){
try{
rs- >PutCollect(L"name",L"kk"); //错误IDispatch error #3156, 如果加上rs->UpdateBatch(adAffectAll)就不会有错,为何 ?????}
catch(_com_error &e){
wprintf(L"%s\n",e.ErrorMessage());
}
rs- >MoveNext();
}

try{
//rs- >CancelBatch(adAffectAll);
rs- >UpdateBatch(adAffectAll);
}
catch(_com_error &e){
wprintf(L"%s\n",e.ErrorMessage());
}

rs- >Close();
rs=NULL;
CoUninitialize();
return 0;
}
...全文
290 26 打赏 收藏 转发到动态 举报
写回复
用AI写文章
26 条回复
切换为时间正序
请发表友善的回复…
发表回复
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复

不客气
^^
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
帮了我大忙了,散分
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
恩,因为程序的关系
我设置异步打开为了速度,因为其间还要处理一些代码,
如果立刻进行操作的话,不应该加adAsyncExecute吧
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
对,要放到open之前,而且不能要adAsyncExecute,谢谢
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
593518614
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
你qq号是多少,咱交个朋友
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
我上不了qq
不知道为什么
在别处都可以,就是再现处不行
为啥不能改呢
印象中如果是server,open就报错,client没问题
设置CursorLocation是在open之前
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
rs->CursorLocation=adUseClient;
似乎不能这样改

要不,我们qq上聊,这太慢
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
我怎么觉得server不能和adLockBatchOptimistic一起用啊
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
改成client
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
adUseServer
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
汗,现在我都已经改掉了
因为批量更新我还是嫌慢

我现在用的是写入文本,最后一次性导入
以前写的
打开:
m_pt6Recordset->Open((_variant_t)str,_variant_t(m_pConn,true),adOpenKeyset,adLockBatchOptimistic,adCmdText+adAsyncExecute);
插入
m_pt6Recordset->AddNew();
m_pt6Recordset->PutCollect("MANUFACTUR",(_variant_t)tmanufactur);
...
这是while大循环
循环结束之后
批量更新

你的CursorLocation是?
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
不是呀,我的表里是满满的,要不,将你的发个我参考参考,我的qq是504207301
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
我用的也是ACCESS,没出问题
该不会是
我增加所有的项
你只增加个别项吧
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
是unicode
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
L是union字符串标识

数据库是mdb的

你们可以把我的程序拷下来运行一下 就知道了(要建union的工程才行)
吴双1983 2007-10-09
  • 打赏
  • 举报
回复
每次更改都要update.模式好象也不起什么作用。什么数据库
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
字符串前加“L"为什么?
shakaqrj 2007-10-09
  • 打赏
  • 举报
回复
不会阿
我以前也用过批量更新
没有出错的
后来嫌他慢,换其他的了
和你不一样的就是
Open((_variant_t)str,_variant_t(m_pConn,true),adOpenKeyset,adLockBatchOptimistic,adCmdText+adAsyncExecute);
第二个参数
adAsyncExecute影响不大
lwdlcb 2007-10-09
  • 打赏
  • 举报
回复
他似乎是立即更新模式,否则为何每次更改都要update呢
加载更多回复(6)
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

4,011

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC 数据库
社区管理员
  • 数据库
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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