+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم (/showthread.php?tid=44393)
الصفحات:
1
2
المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - anes - 28-11-22
السلام عليكم
احتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسس
اتمنى من الاخوة عمل مثال ولكم جزيل الشكر
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - anes - 29-11-22
يااخواني هل من حل
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - معاند الحظ - 04-12-22
ضع لكل سجل في قاعدة البيانات حقل تاريخ يحتوي تاريخ ادخال السجل الى قاعدة البيانات او وضع قيمة له او تعديل عليه
ثم يمكنك بعد ذلك ان تعمل استعلام عن السجلات التي حقل التاريخ فيها له قيمة معينة هي اكبر من تاريخ كذا او اصغر وهكذا
ثم تقوم بحذفها او مهما اردت ان تفعل بها
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - anes - 11-12-22
(04-12-22, 12:19 AM)معاند الحظ كتب : ضع لكل سجل في قاعدة البيانات حقل تاريخ يحتوي تاريخ ادخال السجل الى قاعدة البيانات او وضع قيمة له او تعديل عليه
ثم يمكنك بعد ذلك ان تعمل استعلام عن السجلات التي حقل التاريخ فيها له قيمة معينة هي اكبر من تاريخ كذا او اصغر وهكذا
ثم تقوم بحذفها او مهما اردت ان تفعل بها
ممكن اخي كود الطريقة التي ذكرتها
الله يرضى عليك
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - gho - 11-12-22
(28-11-22, 07:15 PM)anes كتب :السلام عليكماحتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسساتمنى من الاخوة عمل مثال ولكم جزيل الشكر
ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
وهو هذا الجزء الذي يخص قاعدة البيانات اكسس حسب طلبك
إقتباس :Accessفقط قم بتغيير [table] الى اسم الجدول لديك
كود :
DELETE FROM [table] WHERE DATEDIFF('d', [column3], NOW()) > 30
وتغيير [column3] الى اسم العمود لديك
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - أبو خالد الشكري - 11-12-22
(11-12-22, 06:35 PM)gho كتب :(28-11-22, 07:15 PM)anes كتب :السلام عليكماحتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسساتمنى من الاخوة عمل مثال ولكم جزيل الشكر
ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
وهو هذا الجزء الذي يخص قاعدة البيانات اكسس حسب طلبك
إقتباس :Accessفقط قم بتغيير [table] الى اسم الجدول لديك
كود :
DELETE FROM [table] WHERE DATEDIFF('d', [column3], NOW()) > 30
وتغيير [column3] الى اسم العمود لديك
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
مرحبا بكم يا جماعة ...
عندي سؤالين بسيطين :
* هل ينبغي أن يكون column3 عبارة عن تواريخ ؟
* هل يرمز حرف d في الاستعلام إلى تاريخ اليوم ؟ وإذا كان الجواب نعم فهل صياغته الصحيحة d أم dd ؟
أرجو الجواب ، وشكرا .
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - anes - 11-12-22
(11-12-22, 06:35 PM)gho كتب :انا جربته قبل ان اطرح هذا السؤال اخي الكود يحذف كل شيء(28-11-22, 07:15 PM)anes كتب :السلام عليكماحتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسساتمنى من الاخوة عمل مثال ولكم جزيل الشكر
ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
وهو هذا الجزء الذي يخص قاعدة البيانات اكسس حسب طلبك
إقتباس :Accessفقط قم بتغيير [table] الى اسم الجدول لديك
كود :
DELETE FROM [table] WHERE DATEDIFF('d', [column3], NOW()) > 30
وتغيير [column3] الى اسم العمود لديك
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
يعني يحصد كل شي موجود في قاعدة البيانات
لو تكرمت اخي ضع المثال الذي نجح معك الله يحفظك
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - gho - 11-12-22
(11-12-22, 08:13 PM)أبو خالد الشكري كتب :(11-12-22, 06:35 PM)gho كتب :(28-11-22, 07:15 PM)anes كتب :السلام عليكماحتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسساتمنى من الاخوة عمل مثال ولكم جزيل الشكر
ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
وهو هذا الجزء الذي يخص قاعدة البيانات اكسس حسب طلبك
إقتباس :Accessفقط قم بتغيير [table] الى اسم الجدول لديك
كود :
DELETE FROM [table] WHERE DATEDIFF('d', [column3], NOW()) > 30
وتغيير [column3] الى اسم العمود لديك
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
مرحبا بكم يا جماعة ...
عندي سؤالين بسيطين :
* هل ينبغي أن يكون column3 عبارة عن تواريخ ؟
* هل يرمز حرف d في الاستعلام إلى تاريخ اليوم ؟ وإذا كان الجواب نعم فهل صياغته الصحيحة d أم dd ؟
أرجو الجواب ، وشكرا .
* هل ينبغي أن يكون column3 عبارة عن تواريخ ؟
نعم
* هل يرمز حرف d في الاستعلام إلى تاريخ اليوم ؟ وإذا كان الجواب نعم فهل صياغته الصحيحة d أم dd ؟
لا، فهو يرمز للفرق بالأيام وهو اختصار لكلمة day وفي الأكسس يوضع بين علامات تنصيص مفردة 'd'
(11-12-22, 08:37 PM)anes كتب :(11-12-22, 06:35 PM)gho كتب :انا جربته قبل ان اطرح هذا السؤال اخي الكود يحذف كل شيء(28-11-22, 07:15 PM)anes كتب :السلام عليكماحتاج تطبيق الكود هذا لحذف السجلات القديمة من قاعدة البيانات اكسساتمنى من الاخوة عمل مثال ولكم جزيل الشكر
ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
وهو هذا الجزء الذي يخص قاعدة البيانات اكسس حسب طلبك
إقتباس :Accessفقط قم بتغيير [table] الى اسم الجدول لديك
كود :
DELETE FROM [table] WHERE DATEDIFF('d', [column3], NOW()) > 30
وتغيير [column3] الى اسم العمود لديك
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
يعني يحصد كل شي موجود في قاعدة البيانات
لو تكرمت اخي ضع المثال الذي نجح معك الله يحفظك
أولا: قد تكوك البيانات لديك كلها انتهى تاريخها.
ثانيا: ألم تقرأ كلمة خاص!!!
(11-12-22, 06:35 PM)gho كتب : ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
قلت لك "فقم (المخاطب أنت) بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك"
إذا كنت فعلا تريد المساعدةـ فضع (أنت) ما لديك ليساعدك الاعضاء.
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - anes - 11-12-22
(11-12-22, 08:40 PM)أولا: قد تكوك البيانات لديك كلها انتهى تاريخها. كتب : ثانيا: ألم تقرأ كلمة خاص!!!
(11-12-22, 06:35 PM)gho كتب : ما المشكلة لديك
فالكود المذكور في الرابط يعمل جيدا
لقد طبقته في مشروعي الخاص وحذف السجلات القديمة التي مضى عليها اكثر من 30يوم
الامر بسيط جدا حتى على المبتدئ جدا ولكن اذا حاولت ولم تعرف تطبيقه فقم بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك
قلت لك "فقم (المخاطب أنت) بعمل مشروع بسيط فيه قاعدة بيانات اكسس تحتوي بيانات بتاريخ قديم وارفقه هنا ليستطيع الاعضاء التعديل عليه وارساله لك"
إذا كنت فعلا تريد المساعدةـ فضع (أنت) ما لديك ليساعدك الاعضاء.
الله يحفظك اخي على مجهودك ومرورك الجميل على الموضوع
نعم كان الخلل عندي بحيث كان حقل التاريخ txt ولم انتبه له
الله يحفظك
RE: المساعدة في كود حذف سجلات تاريخها تجاوز 30 يوم - أبو خالد الشكري - 11-12-22
* هل ينبغي أن يكون column3 عبارة عن تواريخ ؟
نعم
* هل يرمز حرف d في الاستعلام إلى تاريخ اليوم ؟ وإذا كان الجواب نعم فهل صياغته الصحيحة d أم dd ؟
لا، فهو يرمز للفرق بالأيام وهو اختصار لكلمة day وفي الأكسس يوضع بين علامات تنصيص مفردة 'd'
----------------------------------------------------------------------------------------------------------------------------------------------------
مرحبا بكم جميعا
تمت تجربة الكود الذي أشار إليه الأخ العزيز anes ، والأخ العزيز gho
وهو يعمل بكل كفاءة ما شاء الله
عملت تطبيق بسيط (مرفق) يقوم بحذف السجلات التي تعدت شهر من تاريخ تشغيل البرنامج
وهو فعلا (حسب تاريخ اليوم) يقوم بحذف 3 سجلات قديمة ، ويبقي على سجلين اثنين لم يتجاوزا شهرًا !
لك خالص الشكر والتقدير على هذا الكود الرائع .