بما ان الامر بهذا الشكل
فقد يكون المشكلة فى صيغة التاريخ بالجهاز أو كما اشرت انت اليه بسبب الاكواد
فبدلاً من المسح والاختبار بسبب مشكلة الكود
فيكفي ان تستخدم الكود فى Timer بهذا الشكل
كود :
'Gregorian Date
Dim enSU As System.Globalization.CultureInfo = New System.Globalization.CultureInfo("en-SU")
enSU.DateTimeFormat.Calendar = New System.Globalization.GregorianCalendar
Dim DateEn = Date.ParseExact(CDate(TextBox2.Text), "dd/MM/yyyy", enSU)
Dim GetCountDown As String() = CountDown(Date.Now, DateEn)
With TextBox1
.Text = "متبقى "
.Text += GetCountDown(0) & " عام و "
.Text += GetCountDown(1) & " شهر و "
.Text += GetCountDown(2) & " يوم و "
.Text += GetCountDown(3) & " ساعة و "
.Text += GetCountDown(4) & " دقيقة و "
.Text += GetCountDown(5) & " ثانية"
End With
فبهاذا الكود سيتم معالجت كل ما تحدث انت عليه
حيث اى كان التاريخ المدخل فى TextBox2 غير Gregorian
سيتم تحويله بانه تاريخ اجنبي ليكون Gregorian
ولتختبر نقطة مهمة
تعال عند Function الخاص بـ Get_Value_Date_From_My_Table
واضف التالى وليكن قبل الـ Return Myreturnvalue
كود :
MsgBox(TextBox2.Text)
نقطة اخيرة ومهمة جداً
انت هنا تقوم بعمل التالىPHP كود :
SELECT * FROM TBL_GENERALE
وكذلك
كود :
Using Dreader = Comme.ExecuteReader()
If Dreader.HasRows Then
Do While Dreader.Read
TextBox2.Text = Dreader.Item("GENERALE_Date").ToString()
Loop
End If
End Using
انت متخيل ماذا يحدث هنا بهذا الكود
انت بتقوم بجلب كل ما فى الجدول
ثم تقوم بتمرير سطر سطر الى TextBox2
ليعتمد بالنهاية ان TextBox2 يحصل على قيمة السطر الاخير
خلال تلك العملية لو استغرق اكثر من ثانية
بطبيعة الحال سيحدث مشكلة فى Timer
كونه غير قادر على فهم او حصوله على قيمة من TextBox2
ليتم اخذها كونها التاريخ ولهذا تحدث معك مشكلة الرسالة
من الصح ان يتم جلب قيمة واحدة فقط
او انك ترحل كل القيم التى تحتوى على تواريخ اكبر من الحالى
ثم تمرير الاستعلام الى ListBox
ومن خلال ListBox تقوم بجلب اقرب تاريخ للتاريخ الحالى
ويتم استخدامه كا قيمة TextBox2
بكده الـ Timer سيعمل على التنبيه للموعد الاقرب
وبعد الانتهاء او تجاوز التاريخ الحالى لهذا التاريخ
يتم حذف هذا التاريخ من ListBox أو يتم عمل استعلام من جديد
ويتم عمل ما سبق حتى ياتى باقرب تاريخ مع التاريخ الحالى
بكده انت بتقوم بترتيب المواعيد كما لو انه منبه
اتمنى ما اقصده وصل لك
وتكون عرفت المشكلة الحقيقية التى تسبب تلك المشكلة
وكيفية معالجتها بعد شرحى هذا
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية