PDA

View Full Version : این کد را نگاه کنید!مشکلش چیه؟؟



RamezanBeik
جمعه 18 آبان 1386, 17:09 عصر
سلا م
من از این کد برای حذف کردن استفاده می کنم.
که در Accss کار میکنه ولی در SQL هیچ عکس العمل نشون نمیده؟
لطف کنید بگید مشکلش چی می تونه با شه.


Do While Rs.EOF = False
If Rs.Fields!Id = Number Then
If MsgBox("DO You Want To Delet?" & " " & Rs.Fields!Name & " " & Rs.Fields!Family & " " & "Delet", vbQuestion + vbYesNo + vbMsgBoxRight, "Delet") = vbYes Then
Rs.Delete adAffectCurrent
Set Grid.DataSource = Rs
End If
Unload Me
Me.Show
Call changecaption
Exit Sub
Else
Rs.MoveNext
End If
Loop



با تشکر رمضا ن بیک

lahiji
شنبه 19 آبان 1386, 07:39 صبح
سلام

در SQL بعد از حذف باید یک بار TABLE رو UPDATE کنی

البته این به تنظیماتی که انجام دادی بستگی داره الزاما این طور نیست ولی فکر می کنم
شما از این روش استفاده کرده باشی

RamezanBeik
یک شنبه 20 آبان 1386, 16:51 عصر
سلام .
من این کاری که این دوست عزیز کفته بود انجام دادم ولی اثری نداشت .
من فکر می کنم اصلا حلقه do While رو چک نمکنه ؟چرا ؟
نکنه کدی که من نوشتم اشتباست؟!

حامد مصافی
یک شنبه 20 آبان 1386, 17:57 عصر
این موضوع به نوع اشارگر مربوط میشه. محل اعلان رکوردست و کانکشن رو لطف کنید بذارید اینجا.

RamezanBeik
دوشنبه 21 آبان 1386, 10:05 صبح
سلام من سورس کامل رو می زارم 1 نگاه به اون بنداز.
البته من این بر نامه رو همین جوری و برای رفع مشکلات خودم دارم می نویسم و چیز خاصی نیست:چشمک:
با تشکر رمضان بیک