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

كود يقوم بالبحث بدون استعمال المعالج


زوهير

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

47 دقائق مضت, زوهير said:

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

ممكن كود يقوم بالبحث والتعديل  بدون استعمال المعالج

والمرفق يوضح الطلب وجزاكم الله كل خير مسبقا

 

جرب ووافينى بالنتيجة

بحث واضافة-update.rar

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

جزاك الله خيرا على  ردك   اخي الكريم وسامحني على الاطالة في الرد لظروف عملي

وعند التجربة الكود لا يقوم بالاضافة وانما يقوم بالتعديل  -  والحذف لا يعمل

وان كان بستطاعتك اخي الكريم عند الاضافة والتعديل يقوم بمسح الفورم

اما البحث  يعمل بشكل جيد

 

 

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

34 دقائق مضت, زوهير said:

جزاك الله خيرا على  ردك   اخي الكريم وسامحني على الاطالة في الرد لظروف عملي

وعند التجربة الكود لا يقوم بالاضافة وانما يقوم بالتعديل  -  والحذف لا يعمل

وان كان بستطاعتك اخي الكريم عند الاضافة والتعديل يقوم بمسح الفورم

اما البحث  يعمل بشكل جيد

 

 

حضرتك انا جاوبت على البحث والتعديل لان هذا هو ما كان مطلوب كما فى هذه المشاركة جارى التعديل ابشر بالخير ☺

22 ساعات مضت, زوهير said:

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

ممكن كود يقوم بالبحث والتعديل  بدون استعمال المعالج

والمرفق يوضح الطلب وجزاكم الله كل خير مسبقا

بحث واضافة.rar

 

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

اتفضل 
انا غيرت شوية حجات 
البحث عملته بطريقه جديده علشان يكون عندك اكثر من طريقة

اكواد الاضافة والتعديل والحذف تم اضافتها

 

بحث واضافة-update2.rar

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

11 ساعات مضت, husseinarby said:

طريقه ممتاز اخي اباجودي

شكرا اخى الحبيب husseinarby :fff:
يرجع الفضل الى الله سبحانه وتعالى ثم لاساتذتنا فى هذا الصرح الشامخ بارك الله لنا فيهم وغفر لوالديهم ولنا وكل المسامين
فما أنا الا طالب علم انهل من بحور علمهم
نسأل الله تعالى لهم البركة فى العمر والعلم والعمل 

تم تعديل بواسطه ابا جودى
  • Like 1
رابط هذا التعليق
شارك

اخذت هذه من الكود ابا جودي

Private Sub Search_AfterUpdate()
Requery
End Sub

ووجود requery لوحدها هي معلومه جديده لي !  ويبقى السؤال : ياترى هي اختصار لايه : 

1. docmd.requery

2. me.requery

مشكور

 

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

الان, رمهان said:

اخذت هذه من الكود ابا جودي


Private Sub Search_AfterUpdate()
Requery
End Sub

ووجود requery لوحدها هي معلومه جديده لي !  ويبقى السؤال : ياترى هي اختصار لايه : 

1. docmd.requery

2. me.requery

مشكور

 

اولا السلام عليكم ورحمة الله تعالى وبركاته استاذى الحبيب  رمهان  :fff::fff::fff:
ثانيا انا لى عظيم الشرف ان حضرتك تتابع اقل طالب علم فى هذا الصرح الشامخ
ثالثا
بصراحة انا مش عارف الفرق بين 
1. docmd.requery
2. me.requery

وللعلم انا جربت الطرق الثلاثه
1. docmd.requery
2. me.requery
3-requery
والنتيجة واحدة :smile:

 

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

18 دقائق مضت, ابا جودى said:

اولا السلام عليكم ورحمة الله تعالى وبركاته استاذى الحبيب  رمهان  :fff::fff::fff:
ثانيا انا لى عظيم الشرف ان حضرتك تتابع اقل طالب علم فى هذا الصرح الشامخ
ثالثا
بصراحة انا مش عارف الفرق بين 
1. docmd.requery
2. me.requery

وللعلم انا جربت الطرق الثلاثه
1. docmd.requery
2. me.requery
3-requery
والنتيجة واحدة :smile:

 

بارك الله فيك اخي محمد

الفرق معروف وهو
docmd.requery   عمل requery لكل العناصر بمافيها النموذج

me.requery  عمل ريكويري فقط للنموذج

وبقي requery فقط هي اختصار لايش ؟ جاري التجربة والاستكشاف .... !

تحياتي

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

الان, رمهان said:

بارك الله فيك اخي محمد

الفرق معروف وهو
docmd.requery   عمل requery لكل العناصر بمافيها النموذج

me.requery  عمل ريكويري فقط للنموذج

وبقي requery فقط هي اختصار لايش ؟ جاري التجربة والاستكشاف .... !

تحياتي

كل الشكـــــــــر والتقديـــــــــــــــــــــر استاذ رمهان :fff:
شكر الله لك واجزلك وفير العطاء وجزاك عنى وعن كل اخوانى كل الخير ان شاء الله

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

مجهود رائع جزاك الله كل خير وجعله في ميزان حسانتك

وزادك علما ووقاك من كل فتنة ورزقك من كل خير

اعذرني على الاطالة في الرد فكما قلت لك سبب في ظروف عملي

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

بعد التجارب

الامر requery  فقط هو اختصار ل me.requery

وللتجربة وضعت مربع قائمة فعند البحث لا تظهر النتائج بها لانها تحتاج ريكويري فاما تعمل ريكويري خاص بها او docmd.requery  سيعمل للجميع

فعند استخدام requery فقط لم تتحدث القائمة مما يظهر لنا انه نفس me.requery على غرار docmd.requery والذي قام بعمل ريكويري للكل

 

تحياتي 

بحث واضافة-update.rar

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

الان, زوهير said:

مجهود رائع جزاك الله كل خير وجعله في ميزان حسانتك

وزادك علما ووقاك من كل فتنة ورزقك من كل خير

اعذرني على الاطالة في الرد فكما قلت لك سبب في ظروف عملي

استاذ زوهير :wub:
سبحانك لا علم لنا الا ما علمتنا انك انت العليم الحكيم
الفضل لله سبحانه وتعالى اولا ثم لاساتذتنا الكرام فليس لى فضل فى اى شئ انا مجرد طالب علم واطبق ما اتعلمه من اساتذتنا الكرام جزاهم الله عنا كل الخير ان شاء الله
فقط اتمنى ان تكون وجدت ضالتك المنشوده ان شاء الله
اجمل التحيا :fff:

الان, رمهان said:

بعد التجارب

الامر requery  فقط هو اختصار ل me.requery

وللتجربة وضعت مربع قائمة فعند البحث لا تظهر النتائج بها لانها تحتاج ريكويري فاما تعمل ريكويري خاص بها او docmd.requery  سيعمل للجميع

فعند استخدام requery فقط لم تتحدث القائمة مما يظهر لنا انه نفس me.requery على غرار docmd.requery والذي قام بعمل ريكويري للكل

 

تحياتي 

بحث واضافة-update.rar

استاذ رمهان انا انهرده استفدت معلومه جديده من حضرتك بفضل الله تعالى 
جعل الله تعالى كل اعمالك خالصة لوجهه الكريم ورزقكم لذة النظر الى وجهه الكريم ان شاء الله
احبكم فى الله:wub::fff:

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

اخي الكريم مجرد انك نقلت المعلومة بأمانة فهذا مجهود وجب الشكر عليه

شكر ا  مرة اخرى وجزاك الله كل خير

نعم هو المطلوب

بقي هناك  مشكلة في الحذف

في السطر الثاني يعطيني رسالة خطأ

    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord

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

الان, زوهير said:

اخي الكريم مجرد انك نقلت المعلومة بأمانة فهذا مجهود وجب الشكر عليه

شكر ا  مرة اخرى وجزاك الله كل خير

نعم هو المطلوب

بقي هناك  مشكلة في الحذف

في السطر الثاني يعطيني رسالة خطأ

    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord

اعتذر جدا جدا جدا فى تأخرى فى الرد على حضرتك لم انتبه الا الان 
واعتذر ايضا نسيت وضع هذا السطر اولا 
AllowDeletions = True

اجعل الكود على هذا الشكل وسيعمل على اكمل وجه ان شاء الله
 


AllowDeletions = True
    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord

 

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

اخي الكريم السلام عليكم 

جربت الاكواد في ملف اخر مع تغيير المطلوب ولكن لم تفلح معايا

مع العلم النسخة التي اعمل عليها اكسس 2007 فرنسية 

هل ممكن ان يكون للنسخة دور في هذا الامر وجزاك الله كل خير 

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

6 ساعات مضت, زوهير said:

اخي الكريم السلام عليكم 

جربت الاكواد في ملف اخر مع تغيير المطلوب ولكن لم تفلح معايا

مع العلم النسخة التي اعمل عليها اكسس 2007 فرنسية 

هل ممكن ان يكون للنسخة دور في هذا الامر وجزاك الله كل خير 

استاذى الحبيب 
انا قمت بتجربة الاكواد وتعمل جيدا عندى انا عندى الاوفيس لغته الانجليزية ولا اعلم هل هناك فرق بين الانجليزية والفرنسية ام لا
لكن على كل حال انظر الى هذه الصورة لو الاوامر تظهر بنفس الطريقه عندك فى وضع التصميم على خصائص الفورم
ولو هناك اختلاف اجعل الاكواد تماثل هذا الاختلاف :wink2:
0000000000000000000.jpg.d4b699c721857aaa

  • Like 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