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

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

قام بنشر (معدل)

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

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

تم تعديل بواسطه Foksh
قام بنشر (معدل)
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