مشکل UPDATE در دیتابیس

[melika_ka]

با سلام
من یه برنامه کوچک نوشتم که می خوم یه سری اطلاعت ار تو دیتابس SQL تغییر بده
وقتی که برنامه رکورد رو UPDATE می کنه این ارور میده ( البته عمل UPDATE رو انجام میده)

http://barnamenevis.org/forum/attachment.php?attachmentid=27400&stc=1&d=1232001895

کدم اینه


Private Sub Command1_Click()
Adodc1.RecordSource = "select * from jst "
Adodc1.Refresh
Adodc1.RecordSource = "update jst set id=4 where name='maryam'"
Adodc1.Refresh
End Sub



دستور اول رو بدون ارور اجرا می کنه ولی بعد از آپدیت ارور می ده یعنی روی Adodc1.Refresh
لطفا راهنمایی کنید
متشکرم

[melika_ka]

فکر نمی کنم سوال سختی پرسیده باشم:ناراحت:
واقا هیچ کس اینجا دستور Update بلد نیست؟؟

[mpmsoft]

دوست عزیز ارتباط شما با پایگاه اطلاعاتی قطع می باشد

قبل از اجرای دستور به بانک متصل شوید

[melika_ka]

ممنونم از پاسختون
ولی اگه قطع بود که دستور refresh بعد از select رو هم نباید اجرا می کرد(روی refresh اول گیر نداره)
در ثانی عمل update رو هم با موفقیت انجام میده و بعد این پیغام رو میده

[mpmsoft]

دوست عزیز ظاهرا شما بعد از دستور update مجدد recordset رو بارگذاری نکردید بنابراین دستور refresh با خطا مواجه می شه

[melika_ka]

دوست عزیز ظاهرا شما بعد از دستور update مجدد recordset رو بارگذاری نکردید بنابراین دستور refresh با خطا مواجه می شه

اگه ممکنه یکم بیشتر توضیح بدید
من نمیدونم چه جوری باید recordset رو بار گذاری کنم
یعنی دقیقا کدی که باید بنویسم چیه؟
متشکرم

[rouzbeh_ziafati]

من یه برنامه نوشتم
اول با کنترل Data نوشته بودم و با اون به بانک وصل شده بودم .
اما بعدا به دلیل اینکه بانک رو پسوورد دار کردم مجبور شدم همه data هارو به Adodc تغییر بدم .
حالا یه قسمت برنامه مشکل داره .
وقتی که اطلاعات یک رکورد رو تغییر میدم و اپدیت میکنم این خطا رو بهم میده
row cannot be located for updating . some values may have been changed since it was last read .
کسی میدونه مشکل از کجاست و چرا این خطا رو میده ؟ آیا باید دستوری اضافه کنم به برنامه ؟

[karimi64bit]

سلام این مشکل در بانک اکسس هست
تو بانکهای دیگه مثل sql اینطور نیست

[rezankh]

با سلام من در اكسس از اين كد استفاده كردم در SQLServer رو نمي‌دونم جواب ميده يا نه امتحان كنيد.


Dim f As New ADODB.Command

With f
.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Information.mdb;"
.CommandText = "UPDATE Table1 SET Table1.fn = " & Form3.Combo87.Text & " WHERE ((([Table1]![MahVije])=1));"
.Execute
End With
Adodc1.Refresh

fn و MahVije نام فيلدهايي از جدول Table1 هستند.
موفق باشيد

[mormorbaba]

بانك و برنامه را بزارين .

[rouzbeh_ziafati]

من از دستورات adodc1.recordset.close و adodc1.recordset.open بلافاصله پشت سر هم و قبل از هر تغییری استفاده کردم و حالا دیگه اون خطا رو نمیده .
این دو دستور مگه چی کار میکنه >

Adodc4.Recordset.Close
Adodc4.Recordset.Open
Adodc4.Recordset.Fields(3) = q - 1
Adodc4.Recordset.Update

[xman_dj]

احتمالا شما در برنامه Adodc4.Recordset رو قبلا open کردین وبه دستور open دوباره خطا میداده شما با این کار Adodc4.Recordset رو یکبار بسته و دوباره باز کرده اید چون قبل از عمل باز کردن Adodc4.Recordset عمل بستن را انجام داده اید دیگه خطا نمیده.

[rouzbeh_ziafati]

نه اصلا از دستورات open , close استفاده نکرده بودم . و بعد از اون خطا ازاین دستورات استفاده کردم .
خودم هم نمیدونم از چیه . اما هرچیه گویا فعلا حل شده با این دستور به ظاهر الکی

[ab1234]

با سلام
من یه برنامه کوچک نوشتم که می خوم یه سری اطلاعت ار تو دیتابس SQL تغییر بده
وقتی که برنامه رکورد رو UPDATE می کنه این ارور میده ( البته عمل UPDATE رو انجام میده)

http://barnamenevis.org/forum/attachment.php?attachmentid=27400&stc=1&d=1232001895

کدم اینه


Private Sub Command1_Click()
Adodc1.RecordSource = "select * from jst "
Adodc1.Refresh
Adodc1.RecordSource = "update jst set id=4 where name='maryam'"
Adodc1.Refresh
End Sub



دستور اول رو بدون ارور اجرا می کنه ولی بعد از آپدیت ارور می ده یعنی روی Adodc1.Refresh
لطفا راهنمایی کنید
متشکرم


منم دقیقا همین مشکل رو دارم ولی مثل اینکه ایشون هم بیجواب موندن:افسرده: