حذف ركورد از جدول بوسيله كد

[Younestalebi]

سلام دوستان من با اين كد جدول رو آپديت مي كنم

Set db = CurrentDb
Set rst = db.OpenRecordset(" select * from TBL_Course where(ID=" & ID & ")")
rst.Edit
rst.Fields("Course").Value = Me.Course
rst.Update

rst.Close
db.Close

Set rst = Nothing
Set db = Nothing
لطفاً دوستان كمك كنند تا با تغيير همين كد بتوانم از همين جدول با همين مشخصات يه ركورد رو حذف كنم

[ARData]

Private Sub Command1_Click()
Set db = CurrentDb
Set rst = db.OpenRecordset("جدول مورد نظر")
rst.Move (شماره رکورد مورد نظر براي حذف)
rst.Delete

End Sub

[Younestalebi]

دوست عزیز چرا شماره رکورد؟
آیا باید شماره رکورد مورد نظر رو داشته باشیم یا می شه براساس فیلتر یکی از فیلدهای رکورد اون رکورد رو حذف کرد

[dadsara]

سلام
بله می شود در همان خط رکوردست با استفاده از عبارت Where (شرط ) مورد نظر خود را اعمال کرد و دیگر از Move استفاده نکنید و باقی راه مثل نمونه می باشد
از دستور Delete که به همراه عبارت Docmd.Run SQL قرار می گیرد نیز می توانید برای حذف استفاده کنید

[Rasool-GH]

از دستور Delete که به همراه عبارت Docmd.Run SQL قرار می گیرد نیز می توانید برای حذف استفاده کنید
این کد خوبه ولی من نیاز به چیز بهتری دارم . اگه ممکنه دوستان راهنمایی کنن Where (شرط ) چطور باید نوشته بشه ؟

[Abbas Amiri]

در شرط WHERE در تمامی دستورات ( DML (Data Manipulation Language دستکاری داده ها مانند SELECT ,INSERT , UPDATE , DELETE به رکوردهایی اشاره خواهد کرد که عبارت پس از WHERE در آنها صادق باشد . مانند ....

DELETE * FROM MyTable WHERE
ID=10 ویا
sDate<13900510 ویا
'*FName LIKE 'f
ویا با عملگرهای And و OR با ترکیبی از اینها

[Rasool-GH]

بسیار ممنون خیلی لطف کردی اقای امیری