مشکل با DataAdapter ها

[Behnama]

با سلام
اگر یک Datagrid رو به دیتاست وصل کنم و تغییری در اون بدم ، با فراخوندن متد Update شی DataAdapter می تونم منبع داده ها رو به روز کنم . اما وقتی می خوام این کار رو با یک مثلاً textbox انجام بدم ، انجام نمی شه . مثلا :

Dim Command As New OleDbCommand()
With Command
.CommandText = "Update Tariff SET " & _
"Base='" & TextBox2.Text & "' " & _
"Story='" & TextBox1.Text & "' " & _
"Kind='" & ComboBox1.Text & "' " & _
"WHERE Story='" & TextBox1.Text & "' AND " & _
"Kind='" & ComboBox1.Text & "'"
.CommandType = CommandType.Text
.Connection = Connection1
End With
Connection1.Open()
Adapter1.UpdateCommand = Command
Adapter1.UpdateCommand.ExecuteNonQuery()
Connection1.Close()

این کد کار نمی کنه . توی این کد ، دیتاست هم به دیتاگرید وصله و هم به textbox ها . وقتی update می کنم ، دیتاگرید به روز میشه اما منبع داده هام به روز نمی شه . خیلی وقتها هم مجبورم که از DataCommand استفاه کنم که کار رو خیلی سختتر می کنه .
در کل خوشحال می شم اگر کسی چند source در رابطه با کار با دیتابیس اکسس و به روز درآوردن اون به من بده .
با تشکر

[choobin84]

با سلام
اگر یک Datagrid رو به دیتاست وصل کنم و تغییری در اون بدم ، با فراخوندن متد Update شی DataAdapter می تونم منبع داده ها رو به روز کنم . اما وقتی می خوام این کار رو با یک مثلاً textbox انجام بدم ، انجام نمی شه . مثلا :

Dim Command As New OleDbCommand()
With Command
.CommandText = "Update Tariff SET " & _
"Base='" & TextBox2.Text & "' " & _
"Story='" & TextBox1.Text & "' " & _
"Kind='" & ComboBox1.Text & "' " & _
"WHERE Story='" & TextBox1.Text & "' AND " & _
"Kind='" & ComboBox1.Text & "'"
.CommandType = CommandType.Text
.Connection = Connection1
End With
Connection1.Open()
Adapter1.UpdateCommand = Command
Adapter1.UpdateCommand.ExecuteNonQuery()
Connection1.Close()

این کد کار نمی کنه . توی این کد ، دیتاست هم به دیتاگرید وصله و هم به textbox ها . وقتی update می کنم ، دیتاگرید به روز میشه اما منبع داده هام به روز نمی شه . خیلی وقتها هم مجبورم که از DataCommand استفاه کنم که کار رو خیلی سختتر می کنه .
در کل خوشحال می شم اگر کسی چند source در رابطه با کار با دیتابیس اکسس و به روز درآوردن اون به من بده .
با تشکر

کد جواب نمی ده چون ، فیلد ها رو از هم با استفاده از , جدا نکرده اید

"Base='" & TextBox2.Text & "' " & _
باید اینطوری باشه
CODE] "Base='" & TextBox2.Text & "', " & _[/CODE

کوچک و بزرگ بودن نام بانک تان را هم چک کنید : Tariff

در همین سایت اگر بگردید سورس های زیادی پیدا می کنید.
این تایپیک رو یه جای دیگه هم مطرح کرده اید.