update

[solmaz_zm]

یه قطعه کد به زبان vb.net نوشتم برای به روز رسانی ،اما اجرا نمیشه...هیچ پیغام خطایی نمیده...trace هم کردم هیچ مشکلی نشان نمیده ....حالا چیکارش کنم...

[Amir Taghavi]

ما که علم غیب نداریم!!!
لا اقل کدی، چیزی بذار تا شاید بتونیم کمکت کنیم!!!

[Behrouz_Rad]

مطمئنا اگر خودتون رو جای کسی که این تاپیک رو میخونه قرار بدید، یقین پیدا می کنید که با داشتن چنین اطلاعات ناقصی، امکان پاسخگویی و راهنمایی شما وجود نخواهد داشت.

کد خودتون رو لطف بفرمایید.

متشکرم.

[solmaz_zm]

PrivateSub save_changes()
Dim Cm2 AsNew OleDbCommand
Dim da AsNew OleDbDataAdapter
Dim cn AsNew OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb;Persist Security Info=False")
cn.Open()
Cm2.Connection = cn
da.SelectCommand = Cm2

Dim w AsString
w = hard_code.SelectedItem.Text
Cm2.Parameters.Add("@FORM_CODE", OleDbType.VarChar, 100).Value = w
Cm2.Parameters.Add("@edit_case_model", OleDbType.VarChar, 100).Value = case_model.Text
Cm2.Parameters.Add("@edit_monitor_model", OleDbType.VarChar, 100).Value = monitor_model.Text
Cm2.Parameters.Add("@edit_keyboard_model", OleDbType.VarChar, 100).Value = keyboard_model.Text
Cm2.Parameters.Add("@edit_mouse_model", OleDbType.VarChar, 100).Value = mouse_model.Text
Cm2.Parameters.Add("@edit_printer_model", OleDbType.VarChar, 100).Value = printer_model.Text
Cm2.Parameters.Add("@edit_speaker_model", OleDbType.VarChar, 100).Value = speaker_model.Text

Cm2.CommandText = "Update hardware set [case_model]=@edit_case_model, [monitor_model]=@edit_monitor_model ,[keyboard_model] =@edit_keyboard_model,[mouse_model] =@edit_mouse_model,[printer_model] =edit_printer_model,[speaker_model]=@edit_speaker_model (=@edit_speaker_model) WHERE [form_code]=@FORM_CODE"
Cm2.ExecuteNonQuery()
cn.Close()
EndSub



این کد قبلا (برنامه های قبلی)کار می کرده..اما حالا اصلا نمیدونم چی شده..اجرا نمیشه هیچ پیغامی هم نمیده...

[solmaz_zm]

ببخشید بهتر از این نمی تونم سوالمو بپرسم

[ealireza]

شاید از


WHERE [form_code]=@FORM_CODE

بوده
در هر صورت سعی کنید کوئری رو مورد بررسی قرار دهید

موفق باشید

[solmaz_zm]

کوئری در محیط access کاملا اجرا میشه و هیچ پیغام خطایی نمیده....