اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اضافة تنسيق التاريخ فى استعلام تكوين


إذهب إلى أفضل إجابة Solved by Foksh,

الردود الموصى بها

فى هذا المثال أعمل استعلام تكوين اخر تاريخ و النتيجة فى جدول جديد أريد اضافة التنسيق فى حقل التاريخ فى الجدول الجديد  yyyy/mm/dd



وجزاكم الله كل خير

last datex.mdb

رابط هذا التعليق
شارك

بعد تجربة المرفق فإنه يقوم بانشاء جدول جديد وجلب أحدث تاريخ ووضعه في الجدول الجديد main1116 وبصيغة تاريخ ، ونوع الحقل datex هو تاريخ ووقت وبالتنسيق  yyyy/mm/dd

أم انا الذي لم أستوعب الفكرة !!! 🤔

تم تعديل بواسطه Foksh
رابط هذا التعليق
شارك

تمام عاوزين جدول main1116  حقل datex  يبقى تنسيق yyyy/mm/dd برمجيا لتلافى الاخطاء

او ابقاء حقل 
main1116 موجود دائما وعمل استعلام تحديث لاضافة اخر تاريخ من main1115 

رابط هذا التعليق
شارك

1 ساعه مضت, محمد احمد لطفى said:

تمام عاوزين جدول main1116  حقل datex  يبقى تنسيق yyyy/mm/dd برمجيا لتلافى الاخطاء

او ابقاء حقل 
main1116 موجود دائما وعمل استعلام تحديث لاضافة اخر تاريخ من main1115 

لم ألحظ خطأ في الكود الخاص بك ، ولكن جرب هذا التعديل إن أحببت

بعد التجربة ، لا أعتقد أنه يمكن تعديل الخصائص ( التنسيق ) لحقل في الجدول ، ويمكن استخدام جدول منشأ مسبقاً ( أفضل طريق )

والمرفق بعد تحربته بشكل أوسع لن يحقق طلبك ، وأعتذر :frown3:

last datex.mdb

ولكن تابع هذا الموضوع

 

تم تعديل بواسطه Foksh
اضافة رابط خارجي
رابط هذا التعليق
شارك

لم يضف تنسيق للتاريخ

لقد وجدت حل 

 

    DoCmd.RunSQL "SELECT Max(main1115.[datex]) AS [datex] INTO main1116 FROM main1115;"
    ' إضافة تنسيق لحقل التاريخ في الجدول الجديد
    Dim db As DAO.Database
    Dim prop As DAO.Property
    Set db = CurrentDb
    Set prop = db.TableDefs("main1116").Fields("[datex]").CreateProperty("Format", dbText, "yyyy/mm/dd")
    db.TableDefs("main1116").Fields("[datex]").Properties.Append prop


مع انى قد شاهدت الامر فى سطر واحد فى احد مشاركات أستاذ AbuuAhmed

تحديث 

 

DoCmd.RunSQL "SELECT Max(main1115.[datex]) AS [datex] INTO main1116 FROM main1115;"
    
CurrentDb.TableDefs("main1116").Fields("datex").Properties.Append CurrentDb.TableDefs("main1116").CreateProperty("Format", dbText, "yyyy/mm/dd")


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




 

تم تعديل بواسطه محمد احمد لطفى
رابط هذا التعليق
شارك

  • أفضل إجابة
4 ساعات مضت, محمد احمد لطفى said:

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

بعد تجارب كثيرة ، خرجت بهذه النتيجة ؛ ولكن يبدو أنك سبقتني بفكرة

وهذه فكرتي :biggrin:

last datex.accdb

  • Thanks 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information