数据表内容如下:数据类型:字段1,varchar 字段2和3为 money
更新前:
字段1 字段2 字段3
1 0 0
2 0 0
3 60 -60
4 50 -50设:变量1
变量2
变量3
变量3= -10
select 字段2,字段3 from 表 where 字段1=3
变量1=rst.fields(0)
变量2=rst.fields(1)
update 表1 set 字段2=变量1+变量3,字段2=变量2-变量3 where 字段1=3
更新后为:
字段1 字段2 字段3
1 50 -60
2 50 -60
3 50 -60
4 50 -60
当然这是错误的,我想问一下出现这种错误的原因。若执行下在的代码则正确:
设:变量1
变量2
变量3
变量3= -10
select 字段2,字段3 from 表 where 字段1=3
变量1=rst.fields(0)+变量3
变量2=rst.fields(1)-变量3
update 表1 set 字段2=变量1,字段2=变量2 where 字段1=3
更新后为:
字段1 字段2 字段3
1 0 0
2 0 0
3 50 -50
4 50 -50
更新前:
字段1 字段2 字段3
1 0 0
2 0 0
3 60 -60
4 50 -50设:变量1
变量2
变量3
变量3= -10
select 字段2,字段3 from 表 where 字段1=3
变量1=rst.fields(0)
变量2=rst.fields(1)
update 表1 set 字段2=变量1+变量3,字段2=变量2-变量3 where 字段1=3
更新后为:
字段1 字段2 字段3
1 50 -60
2 50 -60
3 50 -60
4 50 -60
当然这是错误的,我想问一下出现这种错误的原因。若执行下在的代码则正确:
设:变量1
变量2
变量3
变量3= -10
select 字段2,字段3 from 表 where 字段1=3
变量1=rst.fields(0)+变量3
变量2=rst.fields(1)-变量3
update 表1 set 字段2=变量1,字段2=变量2 where 字段1=3
更新后为:
字段1 字段2 字段3
1 0 0
2 0 0
3 50 -50
4 50 -50
解决方案 »
- 编译成dll-自欺欺人的防护措施?
- jion 操作语法错误
- 请教:VB中,实例化一个myForm as userform,然后再把这个myForm.Show,和不实例话直接 userform.show有什么区别吗?
- 怎样在VB中将图片上传到网络服务器?
- 如何在程序运行中拖动MSHFlexGrid控件中(列)行中的数据??
- 请高手指路:我的程序作完后在没有生成EXE文件时执行没有错误,可是在生成EXE文件后出现“运行时错误---加载DLL错误”,我该怎么办啊各位
- 关于socks5编程问题!!!
- 请问怎么把dataport设为横向的?
- 请问 ASP 如何把视频自动转换为 flv呢
- 一个关于日期转换的问题,请帮忙解决!!!
- 如何提交保存多条记录
- 怎样让附属程序只能让主程序调用而不被独立打开(急用,在线等,解决后马上给分)
dim b as double
dim c as double
a=-10
strsql="select fieldname2,fieldname3 from tablename where fieldname1 ='3'"
b=rst(0)
c=rst(1)
strsql="update tablename set fieldname2=" & b+a & ",fieldname3=" & c-a & " where fieldname1='3'"