why dont this work?


Public Sub SaveRecords(ByVal Values As DataSet)
Const conSQLConnectionString As String = "Trusted_Connection=False;Server=LUSQL01;uid=dfg;pwd=dsfgdf;database=vcxx"
Dim con As New System.Data.SqlClient.SqlConnection(conSQLConnectionString)
con.Open()

'create dataadapter
Dim da = New System.Data.SqlClient.SqlDataAdapter("select * from bok where isbnnr = 'isbn'", con)

ds = Values
'Fill the Dataset
da.Update(ds)
con.Close()

End Sub



gets this error:

An unhandled exception of type 'System.InvalidOperationException' occurred in microsoft.visualbasic.dll

Additional information: Update requires a valid UpdateCommand when passed DataRow collection with modified rows.