vb6.0,win98se,下面是语句:
我要做的就是把入库临时表的数量加到现在库存表的数量上去,从而实现入库。
----->>
public cn1 as new ado.connection
private sub command1_click()
if cn1.state=1 then cn1.close
cn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\fuao2\fuao2.mdb;Persist Security Info=False" //初始化cn1 cn1.Execute "update (select * from 库存表 inner join 入库临时表 on 库存表.代码=入库临时表.代码) set 库存表.库存量=trim(str(val(库存表.库存量)+val(入库临时表.数量)))"end sub
执行上面的语句,有时候能够成功,有时候就出错,提示“该集合中找不到该项目”,在很多情况下,都是成功的,操作方法一样,就是偶尔出错,不知道为什么。
还有就是:这个程序是从别的电脑上调过来,不知道是否有影响,两台电脑联网,
主机这个程序建立快捷方式,然后客户端掉用这个快捷方式,也就是入库利用另一台电脑管理。
=========================================================================
清高手指点。
我要做的就是把入库临时表的数量加到现在库存表的数量上去,从而实现入库。
----->>
public cn1 as new ado.connection
private sub command1_click()
if cn1.state=1 then cn1.close
cn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\fuao2\fuao2.mdb;Persist Security Info=False" //初始化cn1 cn1.Execute "update (select * from 库存表 inner join 入库临时表 on 库存表.代码=入库临时表.代码) set 库存表.库存量=trim(str(val(库存表.库存量)+val(入库临时表.数量)))"end sub
执行上面的语句,有时候能够成功,有时候就出错,提示“该集合中找不到该项目”,在很多情况下,都是成功的,操作方法一样,就是偶尔出错,不知道为什么。
还有就是:这个程序是从别的电脑上调过来,不知道是否有影响,两台电脑联网,
主机这个程序建立快捷方式,然后客户端掉用这个快捷方式,也就是入库利用另一台电脑管理。
=========================================================================
清高手指点。
1、没有安装sp5,所以直接使用microsoft jet oledb4.0引擎不行呢?
2、这个程序适应的时候并不是本机的,而是利用双机联网从另一台电脑上调用的;这会不会有影响呢?还就是出错提示“项目找不到”,实际上肯定是存在的,否则不可能说大多数时候正确。
清高手指点
accsess,出错“在集合中找不到该项目”
还有那位高手知道上面的错误地errnumber是多少?我做一个on error出来。
谢谢关注。
检查一下是不是以上要求记录为空的时候出现的
如是如此,则可能是同时使用时共享冲突!
该问题应该与装SP5无关!
还有就是转换数据时是否存在NULL,请注意一下!
怎么出现,都不出错,因为
cn.execud...语句
回自己处理的。
看来不是那里的问题。
应该是这个问题
原因是,在对表中字段进行新增,更新时,若无对应的字段,则会出现此错误
我觉得你说的有道理,我试一试〉。
感谢高手们的指点,,