假如有一个表字段ID Num
第100行是由1~99计算出来的。
那么就用:Dim c As ADODB.Connection
Dim r As ADODB.Recordset
Set c = New ADODB.Connection
c.Open "DSN=MS Access Database;DBQ=g:\a.mdb"
Set r = c.Execute("SELECT SUM([FieldB]) FROM [TableName] WHERE NOT [FieldA]='100'")
c.Execute "UPDATE [TableName] SET [FieldB]=" & r.Fields(0) & " WHERE [FieldA]='100'"
第100行是由1~99计算出来的。
那么就用:Dim c As ADODB.Connection
Dim r As ADODB.Recordset
Set c = New ADODB.Connection
c.Open "DSN=MS Access Database;DBQ=g:\a.mdb"
Set r = c.Execute("SELECT SUM([FieldB]) FROM [TableName] WHERE NOT [FieldA]='100'")
c.Execute "UPDATE [TableName] SET [FieldB]=" & r.Fields(0) & " WHERE [FieldA]='100'"
解决方案 »
- 在VB或者在.net中如何用语句获取SQL服务器名称!急用!谢谢!
- SQL数据库转换excel问题,急!!!
- 【菜鸟问题】保存PictureBox图片到数据库※按比例在PictureBox输出图片?
- RegDeleteKey ?
- 在command_click中设置datafield怎么不生效?
- 在用Sql添加记录时怎样添加NUll?
- 为什么使用SQL Sever的内部连接生成的表不能进行rst.update? 急急!!在线等!!!
- 有关类似数字地图的东西。
- 请问如何在窗体上动态建立空件
- vb中要将窗体始终放在最前方显示用的是窗体的什么属性?
- 有谁有图书馆管理的源代码!
- 请问如何在绘图是捕捉端点 就象AutoCAD
不知道你明白没有?
先计算字段的值,
在保存在字段里。