تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مثال] تحويل التاريخ الميلادي الى هجري داخل الداتا جريد من قاعدة بيانات اكسس
#1
Lightbulb 
Wink 

السلام عليكم ورحمة الله وبركاته

كل عام وانتم بخير

بالمرفق مثال  تحويل التاريخ الميلادي الى هجري داخل الداتا جريد من قاعدة بيانات اكسس 

حيث ان قواعد بيانات اكسس لا تتعامل مع التاريخ الهجري فمن الافضل ان يخزن بالميلادي وتتم عليه جميع العمليات 

بالميلادي 

ولاكن اذا اردنا عرضها بالهجري نحتاج الى دالة للتحويل يمكن استخدامها باكثر من صورة

وهنا اخترت ان استخدمها مع الداتا جريد وهو مثال بسيط بالمرفق 

وكل عام وانتم بخير


.rar   convert to hjri.rar (الحجم : 84.67 ك ب / التحميلات : 144)
الرد }}}
تم الشكر بواسطة: سعود الشامان , أبو نوره , أبو نوره
#2
وعليكم السلام ورحمة الله وبركاته

كل عام وانت بصحة وسلامة , جزاء الله خير الجزاء

لدي معركة مع التاريخ , حيث أن تعاملنا ف السعودية مع التاريخ بالهجري

وصيغة التاريخ في جهازي هجري وفي قاعدة البيانات الصيغة هجري
لكن عند إضافة البيانات تحفظ بصيغة وقيمة خاطئة

صورة للتوضيح



وهذا الكود المستخدم

كود :
Dim cmd As New OleDbCommand(String.Format("insert into Patient_data (Pa_Name, Pa_Age, Pa_Phone, number_file, Data_mo3d) values ('{0}','{1}','{2}','{3}',#{4}# )", TextBox2.Text, TextBox6.Text, TextBox5.Text, TextBox3.Text, DateTimePicker1.Value.ToString("yyyy/MM/dd")))
الرد }}}
تم الشكر بواسطة: أبو نوره
#3
يا هلا بالاشقاء الاخ سعود جرب المرفق لمثالى بعد التعديل والمفترض انه يعمل لديك بصورة سليمة حيث النسخة لدي en فلم اجربها عندي وان شاء الله تفيدك وتكون حل لمشكلتك
رجاء لاحظ الفروق بين المرفق والسابق

.rar   convert to hjri2.rar (الحجم : 87.45 ك ب / التحميلات : 150)
الرد }}}
تم الشكر بواسطة: أبو نوره
#4
وأنتم أشقائنا وأستاذتنا أدام الله الموده والمحبيه بيننا

أستاذ محمود للأسف لم تفتح معي الأمثله








هل هو بسبب إصدار NET Framework ؟




الرد }}}
تم الشكر بواسطة: أبو نوره
#5
أدام الله المحبة اخي مسعود بين جميع الاشقاء العرب ووحد كلمتنا
نعم اخي مسعود واضح ان المشكلة فى اصدار الفريم ورك لديك
ان لم يعمل يمكنك فتح مشروع جديد ثم اضافة فورم من ملف موجود ثم اضافة الفورم من الامثلة او يمكنك فتح ملف الكود من خلال notpad++
بالتوفيق
الرد }}}
تم الشكر بواسطة: سعود الشامان , أبو نوره
#6
للمعلومية اخي نزلت المثال وجربته يعطي التاريخ الهجري في الحالتين .
الرد }}}
تم الشكر بواسطة: أبو نوره
#7
مرحبا اخى سعود

جرب هذا التعديل
ممكن تلاقي التاريخ في الاكسس بالميلادي فهذا طبيعي هو حيتحول لوحده في الفورم
PHP كود :
Dim cmd As New OleDbCommand("insert into Patient_data (Pa_Name, Pa_Age, Pa_Phone, number_file, Data_mo3d) values (@name, @age, @phone, @nfile, @dt)"con)
cmd.Parameters.AddWithValue("@name"TextBox2.Text)
cmd.Parameters.AddWithValue("@age"TextBox6.Text)
cmd.Parameters.AddWithValue("@phone"TextBox5.Text)
cmd.Parameters.AddWithValue("@nfile"TextBox3.Text)
cmd.Parameters.AddWithValue("@dt"DateTimePicker1.Value.Date

ملاحظه

الهجري اللي في الاكسس خاص باللي يبرمجو داخل الاكسس بدون فجوال ومالوش علاقه بالهجري اللي الفجوال
يعني ممكن تلاقي اختلاف يوم او يومين
تجاهل الهجري اللي الاكس لانه ما يعتمد على تقويم ام القرى يللي في السعوديه
ولو تتركه بالميلادي مثل ما كان يكون افضل

والفجوال بياخذ التاريخ من الويندوز حسب ما هو محدد
الرد }}}
تم الشكر بواسطة: محمود بكرى
#8
(26-08-17, 06:01 PM)حريف برمجة كتب : للمعلومية اخي نزلت المثال وجربته يعطي التاريخ الهجري في الحالتين .

لان تنسيق الويندوز لديك بالعربي فى الاصل ولاكن هل التاريخين معا فى زر الهجري بالهجري ام واحد هجري والاخر ميلادي فى المثال الثاني التعديل 
جرب واخبرني اخي حريف
ولاكن للمعلومة ايضا التاريخ مسجل فى القاعدة الميلادي فان ظهر معاك هجري فهذا هو الغرض من المثال ولاكن تعامل انت مع التعديل فى المثال الثاني فهو للنسخ العربية
الرد }}}
تم الشكر بواسطة: أبو نوره
#9
هلا وغلا ابو نوره للأسف ما اشتغل معي الكود ( لم تضاف البيانات )

انا مطلوب مني برنامج عياده
إرسال رسائل نصيه للمراجعين , وتذكيره بقرب الموعد
بالنسبة عند إختلاف التاريخ يمشي المراجع على اليوم ( الأحد أو الاثنين ...)

لكن تبقى الإشكالية عند التذكير بالموعد ( يجب أن تصل المراجع رسالة ) محتواها ( لديك موعد بعد يومين ,, يوم كذا , تاريخ كذا , الساعه كذا ) هل سيتم احتساب التاريخ الهجري بشكل صحيح ؟!

متحير في الموضوع لي اسبوع

بالنسبة لمثال الغالي محمود بكرى استطعت الحصول على الاكواد وقمت بعمل مشروع جيد وتمت الإضافة بالتاريخ الهجري والوضع ok
لكن لم أستطع تطبيق الكود في مشروعي

ممكن  توضح لي استاذ محمود جملة الانسيرت هنا
 Huh > صابني تشنج بالمخ Undecided



فهمت جملة الإنسيرت

لانه لا يوجد لدينا إلا عمود واحد لم تضع إسم العمود

جربت اسوي عمود ثاني واسميه saud

واجعل جملة الإنسيرت بهذا الشكل

كود :
.CommandText = "insert into tb1 (saud) values('" & DateTimePicker1.Value.ToShortDateString & "')"

وتمت الكتابة في عمود saud

كل الشكر لكل من شارك في الموضوع أستفدت من الكثير
 Shy
الرد }}}
تم الشكر بواسطة: أبو نوره
#10
(26-08-17, 08:51 PM)سعود الشامان كتب : هلا وغلا ابو نوره للأسف ما اشتغل معي الكود ( لم تضاف البيانات )

انا مطلوب مني برنامج عياده
إرسال رسائل نصيه للمراجعين , وتذكيره بقرب الموعد
بالنسبة عند إختلاف التاريخ يمشي المراجع على اليوم ( الأحد أو الاثنين ...)

لكن تبقى الإشكالية عند التذكير بالموعد ( يجب أن تصل المراجع رسالة ) محتواها ( لديك موعد بعد يومين ,, يوم كذا , تاريخ كذا , الساعه كذا ) هل سيتم احتساب التاريخ الهجري بشكل صحيح ؟!

متحير في الموضوع لي اسبوع

بالنسبة لمثال الغالي محمود بكرى استطعت الحصول على الاكواد وقمت بعمل مشروع جيد وتمت الإضافة بالتاريخ الهجري والوضع ok
لكن لم أستطع تطبيق الكود في مشروعي

ممكن  توضح لي استاذ محمود جملة الانسيرت هنا
 Huh > صابني تشنج بالمخ Undecided  

اخي سعود حياك الله
الموضوع ان كلمة القيم (values)هى معيارية ان تضع فى كامل الاعمدة حسب ترتيب القيم بين الاقواس والتى هنا لدي عمود واحد و قيمة مدخلة واحدة بين الاقواس وهي قيمة الديت تيم بيكر (date time picker1) 
ولاكن لكي تضيف فى قاعدة البيانات بشكل صحيح وتقبله القاعدة اكسس على انه تاريخ صحيح يجب ان يكون التاريخ بالميلادي حتى وان ظهر لك بالهجري تبعا للويندوز
وهنا ياتي دور تثبيت الثقافة (en-us) فى حدث اللود للفورم الرئيسي حتي يتم التعامل بالتاريخ الميلادي الموافق للتاريخ الهجري داخل قاعدة البيانات وعندما يعرض لك التاريخ يقوم الفيجول باحضاره من القاعدة على انه ميلادي ومفهوم لديه انه تاريخ صحيح ويعرضه فى اداة التيم بيكر طبقا لثقافة الويندوز بالتاريخ الموافق له
يعني السر ان يسجل التاريخ بالميلادي داخل القاعدة ويتم ذلك من استدعء الثقافة (en-us) فى بداية التحميل للفورم
وكود ذلك كالاتيى
اولا استداء المكتبة

PHP كود :
Imports System.Threading 
ثانيا الكود فى حدث التحميل

PHP كود :
Thread.CurrentThread.CurrentCulture = New CultureInfo("en-US"
ولك خالص الشكر
الرد }}}
تم الشكر بواسطة: أبو نوره


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] طريقة توسيط النص داخل اداة comboBox سمير1404 7 3,858 24-08-25, 01:01 PM
آخر رد: أبو خالد الشكري
  [Acces2007] مشكلة ملف قاعدة بيانات access للقراءة فقط mmaalmesry 11 1,452 29-04-25, 08:55 PM
آخر رد: mmaalmesry
Photo لايمكن تعرف على تنسيق قاعدة البيانات الدريساوي 2 697 26-04-25, 12:24 AM
آخر رد: الدريساوي
  مساعدة في طريقة تحميل الفيديوهات المخزنة في قاعدة البيانات foad8920 0 660 24-04-25, 12:58 PM
آخر رد: foad8920
  مشكلة عدم قراءة قاعدة بيانات MS access 0 423 29-03-25, 01:58 PM
آخر رد: ibraa939
  مشكلة عدم قراءة قاعدة بيانات MS access 0 353 29-03-25, 01:57 PM
آخر رد: ibraa939
  مشكلة عدم قراءة قاعدة بيانات MS access 0 288 29-03-25, 01:57 PM
آخر رد: ibraa939
  مساعدة في تحويل الكود من فيجوال بسيك 6 الى فيجوال دوت نت سيد أحمد 5 820 23-03-25, 10:54 PM
آخر رد: سيد أحمد
  طريقة طباعة ملف pdf بقاعدة بيانات sql heem1986 0 519 25-02-25, 09:31 AM
آخر رد: heem1986
  ادخال درجات الطلاب لقاعدة بيانات اكسس .. مساعدة Tajaldeen 9 2,750 07-02-25, 07:59 PM
آخر رد: الورد2

التنقل السريع :


يقوم بقرائة الموضوع: