vb update更新数据库,更新很多字段如何编写啊

vb update更新数据库,更新很多字段如何编写啊,第1张

可以用ADO方法

rsCnn

=

"PROVIDER=Microsoft.Jet.OLEDB.4.0Data

Source="

&

DataPath

&

"mode=Read|write"

rsTmp.Open

"Select

*

From

时刻段电量

",

rsCnn,

adOpenDynamic,

adLockBatchOptimistic

With

rsTmp

!峰数据

=

rsTmp1.Fields(strName(k)

&

"峰").Value

!平数据

=

rsTmp1.Fields(strName(k)

&

"平").Value

!谷数据

=

rsTmp1.Fields(strName(k)

&

"谷").Value

!总数据

=

!峰数据

+

!平数据

+

!谷数据

.UpdateBatch

End

With

Set

rsTmp

=

Nothing

需要声明使用CommandBuilder对象,你是 SQL 数据库还是 ACCESS 数据库,这两者的对象不一样的。

对于:SQL server

Dim Mybuilder As SqlCommandBuilder = New SqlCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

对于:ACCESS

Dim Mybuilder As OleDbCommandBuilder = New OleDbCommandBuilder(da)

da.Update(dt) '使用Update方法实现更新到数据库

你的数据库里面的ID如果是自动编号的话,那当然是无法更新的!

程序并没有问题,你的ID字段肯定是自动编号造成的!

从你的图片中可以看出,你的学号字段为文本型的,所以得用以下语句来更新!

更新学号如下:

sql = "UPDATE studinfor set xh = '" &学号文本框.Text &"'"

如果你要加上条件判断的话,得这样处理!

sql = "UPDATE studinfor set xh = '" &学号文本框.Text &"' where id="&Textid.Text


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/10006555.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-04
下一篇 2023-05-04

发表评论

登录后才能评论

评论列表(0条)

保存