同一表格间的联动,我用了代码:
if rs("Deal")="订单撤销" or rs("Deal")="已退货" then
set rs("Trew") = "已撤单"
end if
但输出结果为:
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: '[string: "已撤单"]'
搞不明白哪儿错了。
另外,还有跨表格间的联动,比如,订单表里提交的数量,如何与产品表单的库存数联动,就是说有销售时,产品表里的库存字段相应冲减
rs("Trew")这个没有吧
你是说字段?
有的
完整一点的代码有没有?
和这个联动有关的代码就这几句,别的太长也无关
if V.isValid then
call V.WriteTo(rs)
rs.Update()
sh=rs("sh")
if rs("Dealstatus")="订单撤销" or rs("Dealstatus")="已退货" then
set rs("Trewardstatus") = "已撤单"
end if
rs.Close()
set rs = Nothing
End if
set rs("Trew") = "已撤单" 去掉前面的set
'增加一行记录并对新记录的内容进行修改并保存可以如下写法
rs.AddNew '增加一行记录
rs("...")="..." '数据读写操作
...
rs.UpDate '保存写入资料,如果使用只读权限,则不能使用这个方法
rs.Close '这个方法用来关闭你所代开的表,如果不使用这个方法也可以,但是数据库仍然认为你在对标进行锁定,可造成数据库负担过重
应该是不需要set,而且还要update
都试过了不行
close去掉呢
https://blog.csdn.net/weixin_39449178/article/details/86510059
使用监听器,监听该字段,然后判断值是否发生变化
继续在等答案
各位,同表内的数据联动问题已自行解决,谢谢你们的热心支持。不同表单的数据联动仍需大咖指导,如果有靠谱的或接近的答案,我会追加打赏。
就是在订单表里提交的数量,如何与产品表单的库存数联动,也即是说有销售时,产品表里的库存字段相应冲减。
订单表里数量加个change方法,在方法里实现数据变化时,重新给产品表的库存从新计算赋值
你把我想要的效果又再描述了一遍,这是提出的问题本身,不是答案