مساعدة في تغير كود فتح نمودج بشرط من رقمي الى نصي

[ازهر عبد العزيز]

السلام عليكم 

لو كان الحقلان X,Y  حقل نص كيف يكون كتابة الكود 

DoCmd.OpenForm "FreaderL", , , "[x]=" & y

 

[ازهر عبد العزيز]

تم الحل شكرا 

 

[jjafferr]

يا سلام عليّ ، جاوبت في الماضي على سؤال المستقبل 😁

يالله بسرعة اعمل بخور وابخّر عمري قبل ما تجيني عين 🙂

 

جعفر

[kha9009lid]

2 ساعات مضت, ازهر عبد العزيز said:

م الحل شكرا 

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

على كل حال للحقل النصي فيكون على النحو التالي

DoCmd.OpenForm "FreaderL", , , "[x]='" & [y] & "'"

او ان نقفز البارمترات ونصرح بالشرط

DoCmd.OpenForm "FreaderL", WhereCondition:="[x]='" & [y] & "'"

 

15 دقائق مضت, jjafferr said:

يا سلام عليّ ، جاوبت في الماضي على سؤال المستقبل 😁

يالله بسرعة اعمل بخور وابخّر عمري قبل ما تجيني عين 🙂

ماشاء الله عليك يا ابا عبدالله

السر في البخور 👻

وكل عام وانت بخير بمناسبة عيدك 🌹

[jjafferr]

20 دقائق مضت, kha9009lid said:

او ان نقفز البارمترات ونصرح بالشرط

هذه السالفة ولا حتى تيجي على بالي 😁

 

22 دقائق مضت, kha9009lid said:

السر في البخور

الى هنا والكل كان يعرف ، بس انت افشيت السر واشرت بالـ emoji على اصحابنا 😁

 

جعفر

[kha9009lid]

21 دقائق مضت, jjafferr said:

هذه السالفة ولا حتى تيجي على بالي 😁

لا يا ابا عبد الله سبق اتناقشنا انت وانا في قفز البارمترات في هذا الموضوع 👇 شكلك نسيت 😀

اقتباس

 

 

21 دقائق مضت, jjafferr said:

واشرت بالـ emoji على اصحابنا

كلها كم يوم ويتربطوا 👀 الله يكفينا شرهم

أتوا ناري فقلت منون أنتم … فقالوا الجنّ قلت: عموا ظلاما
 

[jjafferr]

53 دقائق مضت, kha9009lid said:

شكلك نسيت

لا ما نسيت ، ولكني صرت متعود على ان IntelliSense يدلعني وامشي على خطواته 🙂

 

 

[ازهر عبد العزيز]

10 ساعات مضت, kha9009lid said:

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

على كل حال للحقل النصي فيكون على النحو التالي

DoCmd.OpenForm "FreaderL", , , "[x]='" & [y] & "'"

او ان نقفز البارمترات ونصرح بالشرط

DoCmd.OpenForm "FreaderL", WhereCondition:="[x]='" & [y] & "'"

 

ماشاء الله عليك يا ابا عبدالله

السر في البخور 👻

وكل عام وانت بخير بمناسبة عيدك 🌹

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

[kha9009lid]

2 ساعات مضت, ازهر عبد العزيز said:

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

بنفس الطريقة ياازهر

الحقل الرقمي كما اشرت انت اليه في مشاركتك الاولى ثم نضع الشرط النصي بعلامات التنصيص الخاصة بالحقول النصية

DoCmd.OpenForm "FreaderL", WhereCondition:="[m]=" & [d] & "and [x]='" & [y] & "'"

m & d حقول رقمية

x & y حقول نصية

[kha9009lid]

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

ا ما نسيت ، ولكني صرت متعود على ان IntelliSense يدلعني وامشي على خطواته

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

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

مع ذلك كل شيخ وله طريقته والمهم الوصول للنتيجة بدون اخطاء

[jjafferr]

5 ساعات مضت, ازهر عبد العزيز said:

مادا لو كان احد الحقلين نصي والاخر رقمي كيف يتم كتابة الكود

 

ما ادري اذا كان هذا سؤالك :

نص x 
رقم y

DoCmd.OpenForm "FreaderL", , , "[x]='" & Cstr([y]) & "'"


x
رقم
y
رقم ولكن في حقل نص

DoCmd.OpenForm "FreaderL", , , "[x]=" & Val([y])


x
رقم طويل
y
رقم ولكن في حقل نص

DoCmd.OpenForm "FreaderL", , , "[x]=" & Clng([y])

.

 

 

15 ساعات مضت, kha9009lid said:

لا يا ابا عبد الله سبق اتناقشنا انت وانا

اسألك على سالفة الرجوع الى مواضيع سابقة ، كيف توصل لها ؟

 

جعفر

[kha9009lid]

2 ساعات مضت, jjafferr said:

اسألك على سالفة الرجوع الى مواضيع سابقة ، كيف توصل لها ؟

لاني مشارك في النقاش ثم استخدم خاصية البحث

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

اقتباس

 

 

[jjafferr]

2 ساعات مضت, kha9009lid said:

انا افضل البحث في الموقع عن طريق محرك البحث جوجل مباشر

ما رحنا بعيد ، انا كذلك 🙂

شكرا لك 🙂

مع اني كنت افكر اعمل لي قاعدة بيانات ، ومنها ابحث 😁

 

جعفر

[kha9009lid]

10 دقائق مضت, jjafferr said:

ع اني كنت افكر اعمل لي قاعدة بيانات ، ومنها ابحث

يا هلا بمعلمنا ابو عبد الله

فكرة جميلة واذكر كان فيه مشاركة سابقة يمكن تكييفها لذلك 👇

اقتباس

 

 

[jjafferr]

27 دقائق مضت, kha9009lid said:

كان فيه مشاركة سابقة يمكن تكييفها لذلك

لا يا رجال ، هاي الاكسس يكون وسيط فقط ، وش لي بدوخة البال !!

وانما كنت افكر في حفظ عنوان الموضوع url في قاعدة البيانات ، ثم اخذ كلمات الموضوع (وبدون تكرار) وكذلك حفظها في حقل آخر ، طبعا هذا كله برمجيا 🙂

وبعدين ابحث في قاعدة البيانات ، واروح للموضوع مباشرة 😁

 

جعفر

[kha9009lid]

27 دقائق مضت, jjafferr said:

وانما كنت افكر في حفظ عنوان الموضوع url في قاعدة البيانات ، ثم اخذ كلمات الموضوع (وبدون تكرار) وكذلك حفظها في حقل آخر ، طبعا هذا كله برمجيا 🙂

وبعدين ابحث في قاعدة البيانات ، واروح للموضوع مباشرة

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

بالتوفيق يا ابا عبد الله

 

[أبوبسمله]

1 ساعه مضت, jjafferr said:

مع اني كنت افكر اعمل لي قاعدة بيانات ، ومنها ابحث 😁

 

12 دقائق مضت, kha9009lid said:

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

بالتوفيق يا ابا عبد الله

مرحبا اساتذتى الاعزاء جزاكم الله خيرا

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

وسوف انتظر تطبيق فكرته 🙂 ومشاركته اياها لنا

تمنياتى لكم بالتوفيق

[jjafferr]

هنا يأتي قول الولد الصغير:

انا لو قدرت اخلص دفع قرض سيكلي (يعني دراجتي الهوائية) ، بقدر اسوي واجد اشياء 😁

 

وترجمتها بلغة الكبار:

بخليه على قائمة الاشياء اللي اريد اعملها يوم من الايام ، ان شاء الله 🙂

 

جعفر