使用连接到数据库的visual basic更新dataservice中的更改

Question

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

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

提前感谢您的帮助。