以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]数据后台更新的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47917)
--  作者：zcw2764
--  发布时间：2014/3/19 15:29:00
--  [求助]数据后台更新的问题

请教数据后台更新遇到的问题

 

Dim dr As DataRow
Dim s1,s2 As String

dim dt as datatable
cmd.ConnectionName = _DBSource1
cmd.CommandText = "Select * From {公开_用户登陆统计} Where 人员编号 = \'1000\'"
dt = cmd.Executereader(True)
dr = dt.datarows(0)

     dr("登录次数标准") = dr("登录次数标准") + 10
     dr.save()

 

在2014版中 dr.save() 不能保存更新数据，只能用dt.save() 保存更新，以前的代码都不执行了
--  作者：Bin
--  发布时间：2014/3/19 15:32:00
--  
那就先用DT.SAVE
--  作者：Bin
--  发布时间：2014/3/19 15:34:00
--  
经过测试确实无法保存,我帮你反馈这个BUG
--  作者：zcw2764
--  发布时间：2014/3/19 15:34:00
--  
以前的代码都要修改，太麻烦了
--  作者：lsy
--  发布时间：2014/3/19 15:55:00
--  

管用啊：

 

Dim cmd As New SQLCommand
cmd.CommandText = "Select * From {表C}"
Dim dt As DataTable
Dim dr As DataRow
dt = cmd.ExecuteReader(True)
dr = dt.DataRows(0)
dr("第一列") = "是不是很好啊"
dr.Save()
dt.Load()
DataTables("表C").Load()
--  作者：Bin
--  发布时间：2014/3/19 15:56:00
--  
你执行了dt.Load() 实质上就是执行了 dt.save
--  作者：lsy
--  发布时间：2014/3/19 15:59:00
--  
忽略了。