آلارم(مسیج) هنگام اضافه شدن دیتا

[farbod61]

سلام دوستان گلم
یک سوال
من میخواستم ببینم چه جوری میتونم به برنامه بگم از مثلا هر 5 دقیقه یک دیتا گرید رو چک کن و اگه ردیفی بهش اضافه شده بود نسبت به 5 دقیقه قبلش که چک کرده یه الارم نوشتاری ( مسیج) بده؟
در ضمن توی متن مسیج باکس تعداد رکورد های اضافه شده رو هم بنویسه
ممنون میشم فکر کنید برای یک مبتدی دارید توضیح میدید و یکم ساده و در صورت ممکن با کد و بهتر از اون با نمونه برنامه بهم یاد بدید این مورد رو
تشکر پیشاپیش

[rahim_ttl]

دوست عزیز باید از sql dependency استفاده کنی حالا خودم دنبالشم ببینم چه طوری باید پیاده بشه

[shahryari]

سلام
اگه میخوای تعداد رکوردهای دیتا گرید رو چک کنی هر 5 دقیقه یکبار به شرح زیر عمل کن
یک تایمر با اینتروال 300000
یک متغر عمومی از نوع اینتجر تعریف کن
تعداد رکوردهای اولیه دیتا گرید را در رویداد فرم لود به متغیر نسبت بده
در رویداد تیک تایمر (که هر 5 دقیقه اتفاق میوفته) تعداد رکوردها را چک کن اگر بیشتر از مقدار متغیرت بود ، از مقدار متغیرت کم کن و نتیجه را به عنوان رکوردهای اضافه شده نمایش بده
و درنهایت مقدار متغیرت را برابر تعداد رکوردها قرار بده (برای کنترل های بعدی)

همه مطالب فوق به روایت کد:
Public Class Form2
Public R_Count As Integer
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'کدهای پر کردن دیتا گرید
'بعد از آن هم به شرح زیر
R_Count = DataGridView1.RowCount
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If DataGridView1.RowCount > R_Count Then
Dim i As Integer = DataGridView1.RowCount - R_Count
MsgBox("تعداد رکوردهای اضافه شده" & i.ToString)
R_Count = DataGridView1.RowCount
End If
End Sub
End Class