1

我可以访问数据库中的数据,但是我无法更新我希望从客户端进行的任何更改。

这就是我认为问题所在。(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

提前感谢您的帮助。

4

0 回答 0