PDA

View Full Version : چطوری اگر ساعت سیستم برابر فیلد زمان شد به کاربر هشدار داده شود ؟



lllarashlll
چهارشنبه 26 آذر 1393, 13:00 عصر
چطوری اگر ساعت سیستم برابر فیلد زمان شد به کاربر هشدار داده شود ؟

gilsoft
چهارشنبه 26 آذر 1393, 21:18 عصر
چطوری اگر ساعت سیستم برابر فیلد زمان شد به کاربر هشدار داده شود ؟

سلام دوست عزیز

ببین از نمونه پروژه‌ای که ضمیمه کردم .. میتونی ایده بگیری ؟

موفق باشید .....

lllarashlll
پنج شنبه 27 آذر 1393, 19:50 عصر
سلام
ممنون
راستش مفید بود ولی دستور sql توش بکار برده نشده
من یه ستون زمان دارم تو دیتاگریدویو ک دیتاگرید هم بر اساس اون مرتبه و میخام وقتی ساعت سیستم برسه به هرکدوم از ساعتا یه هشداری به کاربر بده
هرکی بلده کمک کنه خیلی لطف کرده:لبخندساده:

erfan_urchin
پنج شنبه 27 آذر 1393, 21:53 عصر
سلام
ممنون
راستش مفید بود ولی دستور sql توش بکار برده نشده
من یه ستون زمان دارم تو دیتاگریدویو ک دیتاگرید هم بر اساس اون مرتبه و میخام وقتی ساعت سیستم برسه به هرکدوم از ساعتا یه هشداری به کاربر بده
هرکی بلده کمک کنه خیلی لطف کرده:لبخندساده:
شما اول اون ساعتی که تو سلول گریدویو نوشته رو بر اساس دو نقطه جدا کنی که ساعت و دقیقه و ثانیه جدا بشن و بعد چک کن که با ساعت سیستم برابر شده یا نه
Private Sub button1_Click(sender As Object, e As EventArgs)
timer1.Interval = 1000
timer1.Enabled = True
End Sub

Private Sub timer1_Tick(sender As Object, e As EventArgs)
Dim SplitTime As String() = New String(0) {}
Dim Time As String = dataGridView1.Rows(0).Cells(0).Value.ToString()
SplitTime = Time.Split(":"C)
If SplitTime(0) = DateTime.Now.Hour.ToString("00") And SplitTime(1) = DateTime.Now.Minute.ToString("00") And SplitTime(2) = DateTime.Now.Second.ToString("00") Then
MessageBox.Show("your text")
End If
End Sub

lllarashlll
سه شنبه 02 دی 1393, 18:28 عصر
شما اول اون ساعتی که تو سلول گریدویو نوشته رو بر اساس دو نقطه جدا کنی که ساعت و دقیقه و ثانیه جدا بشن و بعد چک کن که با ساعت سیستم برابر شده یا نه
Private Sub button1_Click(sender As Object, e As EventArgs)
timer1.Interval = 1000
timer1.Enabled = True
End Sub

Private Sub timer1_Tick(sender As Object, e As EventArgs)
Dim SplitTime As String() = New String(0) {}
Dim Time As String = dataGridView1.Rows(0).Cells(0).Value.ToString()
SplitTime = Time.Split(":"C)
If SplitTime(0) = DateTime.Now.Hour.ToString("00") And SplitTime(1) = DateTime.Now.Minute.ToString("00") And SplitTime(2) = DateTime.Now.Second.ToString("00") Then
MessageBox.Show("your text")
End If
End Sub

متاسفانه این جواب نمیدهو شایدم من اشتباه میزنم:افسرده: