dataset.table更新数据库问题

dlwhl 2010-01-30 06:00:39

For i = 0 To ds.Tables("CSV").Rows.Count - 1
ds.Tables("tmpData").ImportRow(ds.Tables("CSV").Rows(i))
'Dim iRow As DataRow = ds.Tables("tmpData").NewRow
myAdpt.Update(ds, "tmpData")
Next
...全文
108 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
JiaoPengJay 2010-02-04
  • 打赏
  • 举报
回复
http://blog.csdn.net/JiaoPengJay/archive/2010/02/03/5285252.aspx
这有DataGirdView中增删改查的原代码
cobra009 2010-02-02
  • 打赏
  • 举报
回复
发错,重发
Try
Dim SBC As New SqlCommandBuilder(myAdpt)
myAdpt.Update(ds, "tmpData")
Catch ex As Exception
MsgBox(ex.Message)
Return
End Try
注意myAdpt至少要给他一个查询的command
cobra009 2010-02-02
  • 打赏
  • 举报
回复
Try
Dim SBC As New SqlCommandBuilder(sda)
myAdpt.Update(ds, "tmpData")
Catch ex As Exception
MsgBox(ex.Message)
Return
End Try
注意myAdpt至少要给他一个查询的command
ExcelWord 2010-02-01
  • 打赏
  • 举报
回复
首先将数据表 tempdb 设置主键
myAdpt = New SqlClient.SqlDataAdapter(iStr, myCon)
Dim Bui As New SqlCommandBuilder(myAdpt)
再进行
If ds.Tables.Contains("tmpData") Then
ds.Tables.Remove("tmpData")
End If
myAdpt.Fill(ds, "tmpData")

For i = 0 To ds.Tables("CSV").Rows.Count - 1
ds.Tables("tmpData").ImportRow(ds.Tables("CSV").Rows(i))
'Dim iRow As DataRow = ds.Tables("tmpData").NewRow
myAdpt.Update(ds, "tmpData")
Next
appleller 2010-01-31
  • 打赏
  • 举报
回复
是不是要把列名写清楚啊?
appleller 2010-01-31
  • 打赏
  • 举报
回复
跟我一样忘记设置主键了吧?
dlwhl 2010-01-30
  • 打赏
  • 举报
回复
你给的那个不行啊,能给个完整的代码吗??谢谢!
dlwhl 2010-01-30
  • 打赏
  • 举报
回复
iStr = "select * from tempdb..gl_aaaa"
myAdpt = New SqlClient.SqlDataAdapter(iStr, myCon)
If ds.Tables.Contains("tmpData") Then
ds.Tables.Remove("tmpData")
End If
myAdpt.Fill(ds, "tmpData")

For i = 0 To ds.Tables("CSV").Rows.Count - 1
ds.Tables("tmpData").ImportRow(ds.Tables("CSV").Rows(i))
'Dim iRow As DataRow = ds.Tables("tmpData").NewRow
myAdpt.Update(ds, "tmpData")
Next


为何表tempdb..aaaa中数据并没有更改!

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧