(07-09-17, 08:13 AM)رد الأخ ola منذ أربع أشهر , مدعم الصور , مع الكود , الغريب أنك بعد أربع أشهر مصر على حل , والحل أمامك منذ أربع أشهر , لا تستغرب لأنني مستغرب!! كتب : انشئ مفتاح وسمه lastrun من نوع Date في قسم Sittings


وضع هذا الكود في بداية التشغيل

كود :

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

   'قراءة وقت التشغيل السابق
   If DateDiff(DateInterval.Hour, My.Settings.lastrun, Now) > 10 Then '10 ساعات
       Form2.ShowDialog() 'قتح فورم المدونة
   End If
   My.Settings.lastrun = Now 'احتفظ بوقت التشغيل الحالي

End Sub

---

طلب
هل يمكن أن أحصل هلى نسخة مجانية من كتاب كن إيجابياً تأليف سامي أبو سريع

(15-01-18, 01:24 AM)طالب برمجة كتب : هل وصلت للمطلوب وتم الحل؟

(15-01-18, 01:33 AM)طالب برمجة كتب : هذا الكود تم استخدام فارق الساعات DateInterval.Hour بين وقتين باستخدام الدالة DateDiff
ولكن أنت تريد فتح المدونة مرة واحدة خلال اليوم وليس كل 10 ساعات كما يبدو في هذا الكود.

فهل تم الحل؟

(15-01-18, 02:10 AM)طالب برمجة كتب : هل المسألة 24 ساعة أم تاريخ اليوم
يعني هل المهم أنه في تاريخ 15-1-2018 يعمل مرة واحدة ثم إذا تغير التاريخ الى 15-1-2018 يعمل مرة واحدة وهكذا

إذا كنت تريد مسألة 24 ساعة غير 10 ب 24 في الكود الذي تقصده، فهو يفي بالغرض
ولكن أعتقد أنه ينقصه سطر أخير وهو My.Settings.Save ليتم الحفظ