[altoki939]

يوجد لدي ملف txt  وهوة عبار عن كل الاشهر من شهر 1 الى شهر 12 

01   01   05:28   06:49   12:15   03:16   05:36   06:52   


فمثلا 01 شهر واحد  - الايام 1 - 31  اما باقي تواقيت كتالي
05:28  صلاة الفجر
  06:49  صلاة ضحي
 12:15   صلاة ظهر
03:16  صلاة العصر 
 05:36 صلاة مغرب
  06:52   صلاة المغرب


فسوال كيف اعمل برنامج يقراء من المذكرة بصيغة txt  لجميع السنة بحسب اليوم 
بحيث يسحب بيانات ويعطيك العد التنازلي بين الاقامة قبل 10 دقايق ارجاء الافادة من اصحاب الخبرة 
وجزاكم الله خيرا

[mrfenix93]

مرفق مشروع لتنفيذ ذلك 

ولاكن استبدل ال مسافات بين ال تاريخ و مواعيد الصلاه ب  - 


انشاء DataTable 

كود :

       Dim thedatatable As New DataTable
       thedatatable.Columns.Add("Date")
       thedatatable.Columns.Add("s1")
       thedatatable.Columns.Add("s2")
       thedatatable.Columns.Add("s3")
       thedatatable.Columns.Add("s4")
       thedatatable.Columns.Add("s5")
       thedatatable.Columns.Add("s6")

قرائة الملف تحزين كل بيان في مكان منفصل

كود :

 Dim FileName As String = System.IO.Path.Combine(Application.StartupPath, "altoki939.txt")
 For Each line As String In System.IO.File.ReadLines(FileName)
     Dim values() As String = line.Split("-".ToCharArray)

ملئ ال جدول من ملف ال تكست

كود :

   Dim newrow As DataRow = thedatatable.NewRow
       newrow("Date") = values(0) + "/" + values(1) + "/" + Now().ToString("yyyy")
       newrow("s1") = values(2)
       newrow("s2") = values(3)
       newrow("s3") = values(4)
       newrow("s4") = values(5)
       newrow("s5") = values(6)
       newrow("s6") = values(7)
       thedatatable.Rows.Add(newrow)
Next
DataGridView1.DataSource = thedatatable

[altoki939]

شكراً جزيلا لك اخي العزيز ولك الاجر من الله ....

اذا اريد اسحب كل يوم وقت من txt مثلا صلاة ظهر يظهر تلقائي الوقت للاذان بحيث كل يوم يتحدث في label وايضاً يعطيك العد تنازلي في اخر 10 دقايق في وقت الاًذان وايضاُ الاقامة فممكن تعطيني حل لهذا

[mrfenix93]

مرفق في المشروع

جلب مواقيت الصلاة ليوم معين

ومكن الممكن عمل timer لفعل ذلك لكل ميعاد صلاه

[altoki939]

ممكن تسويلي مثلا عن

اسحب كل يوم وقت من txt مثلا صلاة ظهر يظهر تلقائي الوقت للاذان بحيث كل يوم يتحدث في label وايضاً يعطيك العد تنازلي في اخر 10 دقايق في وقت الاًذان وايضاُ الاقامة فممكن تعطيني حل لهذا

[mrfenix93]

كود :

Dim x As Date = Now.ToString("dd-MM-yyyy")

For Each row In DataGridView1.Rows
    If x = row.Cells(0).Value Then
        label1.text = row.Cells(1).Value
        label2.text = row.Cells(2).Value
        label3.text = row.Cells(3).Value
        label4.text = row.Cells(4).Value
        label5.text = row.Cells(5).Value
        label6.text = row.Cells(6).Value
    End If
Next

[altoki939]

ماشاءلله عليك كفو باقي تنبية يعني قبل دقيقة يعطيك منبة بالعد تنازلي من ٦٠ إلى ٠ بحسب توقيت ساعة - توقيت الأذن فكيف احط لجميع التوقيت مع حسب باقي لتوقيت الصلاة

[altoki939]

Dim x As Date = Now.ToString("dd-MM-yyyy")

For Each row In DataGridView1.Rows
If x = row.Cells(0).Value Then
label1.text = row.Cells(1).Value
label2.text = row.Cells(2).Value
label3.text = row.Cells(3).Value
label4.text = row.Cells(4).Value
label5.text = row.Cells(5).Value
label6.text = row.Cells(6).Value
End If
Next


جربت هذا كود ماشغال للاسف في error

[altoki939]

لايوجد رد أو حل مثالي ؟

[altoki939]

السلام عليكم شباب ارجوا منكم معاينة الموضوع لوجود حال معكم لانة جربتة الكود وللاسف ما اشتغل