我可以访问数据库中的数据,但是我无法更新我希望从客户端进行的任何更改。
这就是我认为问题所在。(VB2010)
服务器端 -
Public Function UpdateData(ByVal ds As RecipesTitleDataset) As Integer
Try
Dim da As New RecipesTitleDatasetTableAdapters.RecipeTitlesTableAdapter()
Dim nRows As Integer = da.Update(ds)
Return nRows
Catch ex As Exception
Return 1
End Try
End Function
客户端 -
Private Sub btnUpdateRecord_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) 处理 btnUpdateData.Click
Dim dsUpdates As DataSet = ds.GetChanges()
If dsUpdates.HasChanges Then
ds.Merge(ds, True)
MessageBox.Show(Service.UpdateData(dsUpdates) & " CELLS CHANGED")
End If
End Sub
提前感谢您的帮助。