update данные в БД

[Tof]

не могу обновить данные в бд, при изменении строки DataTable
Dim olecon As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=".. ")
olecon.Open()
dA = New OleDb.OleDbDataAdapter("select * from Таблица1 order by id ", olecon)
dA.Fill(dS, "Таблица1")
Dim com1 As New OleDb.OleDbCommand("select * from Таблица1 order by id", olecon)
dA.SelectCommand = com1
Dim cd2 As New OleDb.OleDbCommandBuilder(dA)

.. затем вот как, при изменении ячейки в гриде
dR = dS.Tables("Таблица1").Rows.Find(Список.Cells(e.RowIndex, 0).Value)
dS.Tables("Таблица1").Rows(e.RowIndex).Item(e.ColIndex) = Список.Cells(e.RowIndex, e.ColIndex).Value
dt = dS.Tables("Таблица1")
Try
dA.Update(dt)
Catch
MsgBox("Ошибочка вышла: " & Err.Description)
End Try
.. и тут она выдает ошибку
Динамическое создание SQL для UpdateCommand не поддерживается для SelectCommand, не возвращающего никакой информации о столбце ключей.

[Tof]

еееее.. все получилось.. толкьо вот :-/ .. удалить теперь не могу данные из БД...

[GrandMax]

Та же проблема, но понять что не так никак не могу
если не сложно кинь сюда или на мыло код который у тебя полуичлся
или расскажи в чём была проблема

[Sebas]

Catch
MsgBox("Ошибочка вышла: " & Err.Description)
End Try


Catch e as exception
MsgBox("Ошибочка вышла: " & e.message)
End Try

Забыть шестёрку не можешь?

можешь словить чужую ошибку))))

[GrandMax]

обработчки ошибок и так стоит, но самой ошибки нету, просто пусто )