مشکل این قطعه کد چیه ؟

[ایمان اختیاری]

این قطعه کد چرا error می گیره ؟
{
string strconnection = "server=shervin;database=university;uid=sa;pwd=1234 567890";
SqlConnection conn = new SqlConnection(strconnection);
string commandstring = "select * from account ";

SqlDataAdapter dataadapter = new SqlDataAdapter(commandstring, conn);
DataSet ds = new DataSet();
dataadapter.Fill(ds, "account");
DataTable datatable = ds.Tables["account"];

//textBox1.Text = datatable.Rows.Count.ToString();
// dataadapter.Update(ds, "account");
textBox2.Text = datatable.Rows[12]["id"].ToString();
textBox3.Text = datatable.Rows[12]["password"].ToString();
if (textBox1.Text =="1")
{
MessageBox.Show("hello");
DataRow row = datatable.Rows[12];
row.BeginEdit();
row["id"] = "reza";
row.EndEdit();

dataadapter.Update(ds, "account");
ds.AcceptChanges();

}


به ds.AcceptChanges(); گیر می ده

[saadi2]

Imports System.Data.OleDb
Public Class Form1
Const Str As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = Users.mdb"
Dim DS As New DataSet
Dim DT As New DataTable
Dim DA As New OleDbDataAdapter
Dim CB1 As New OleDbCommandBuilder
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DA = New OleDbDataAdapter("SELECT * FROM Users", Str)
DS = New DataSet
DA.Fill(DS, "Users")
CB1 = New OleDbCommandBuilder(DA)
TextBox1.Text = DS.Tables("Users").Rows(0)("Username").ToString()
Dim row As DataRow = DS.Tables("Users").Rows(0)
row.BeginEdit()
row("Username") = "reza"
row.EndEdit()
DA.Update(DS, "Users")
DS.AcceptChanges()
End Sub
End Class

[saadi2]

دوست عزیز کدی که من قرار دادم کاملا سالمه و کار میکنه.
فقط به زبان vb هستش ببینید شما با قرار دادن command builder مشکلتون حل نمیشه عزیز؟

[daramew]

با سلام
دوست عزیز منم خیلی از این مشکلات داشتم و بیشترشون هم بخاطر آدرس نادرست پایگاه داده بود که نادرست می دادم. آدرسو درست کن فکر کنم حل بشه.