باسلام و عرض خسته نباشید خدمت همه دوستان
من در برنامه ام یه مشکل عجیب دارم
به دستورات زیر توجه بفرمائید
PrivateSub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim con As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=bank.mdb;")
Dim command As OleDbCommand = New OleDbCommand
command.Connection = con
command.CommandText = "update table1 set nam=@nam, famil=@famil, tahsilat=@tahsilat, sokoonat=@sokoonat, ghad=@ghad,pedar=@pedar,nomre=@nomre where id = '" & TextBox7.Text & "'"
command.Parameters.AddWithValue("@nam", Trim(TextBox1.Text))
command.Parameters.AddWithValue("@famil", Trim(TextBox2.Text))
command.Parameters.AddWithValue("@tahsilat", Trim(ComboBox1.Text))
command.Parameters.AddWithValue("@sokoonat", Trim(TextBox4.Text))
command.Parameters.AddWithValue("@ghad", Trim(TextBox3.Text))
command.Parameters.AddWithValue("@pedar", Trim(TextBox3.Text))
command.Parameters.AddWithValue("@nomre", Trim(TextBox6.Text))
con.Open()
command.ExecuteNonQuery()
con.Close()
EndSub
textbox7 شماره id رکوردیست که کاربر در دیتاگرید اون رو انتخاب میکنه
من یه فیلد Id در جدولم دارم که از نوع autonumber هست
متاسفانه دستور update ام با وجود این فیلد کار نمیکنه
اما زمانیکه این فیلد رو از autonumber به text تبدیل میکنم مشکلم حل میشه
آیا امکانش هست دستور update با نوع فیلد autonumber مشکل داشته باشه؟
ممنون میشم کمکم کنید
یاعلی
پاسخ با نقل قول