• 0
coca cola7

كود منع تكرار قيمة معينة في نموذج

سؤال

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

تحياتي لكم جميعا

 

sales.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

10 إجابة على هذا السؤال .

  • 0

تفضل :)

 

استخدم السطر الثاني ، بدل سطرك الاول :

a = DLookup("[iNVOICENO]", "INVOICE", "[iNVOICENO]='" & Me.INVOICENO & "'")
a = DLookup("[iNVOICENO]", "INVOICE", "[iNVOICENO]=" & Me.INVOICENO)

 

انت كنت تعامل INVOICENO انه نص ، بينما هو رقم :)

 

جعفر

تم تعديل بواسطه jjafferr
1

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك اخي جعفر

سوف اجرب الكود الجديد وسوف اخبرك بما حصل معي ؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك اخي جعفر بارك الله فيك واحسن اليك لو تعلم كم انا ممتن لك لانني كنت عاجز جدا عن حل هذه المشكلة والسبب لانني مبتدى في تعلم الاكسيس , بس لي طلب اخر لو تكرمت :

عندما ادخل فاتورة نقدية مثلا رقمها نفس رقم الفاتورة الاجلة لايسمح النموذج بذلك , فهل من الممكن ان تجعل الكود يبحث عن الرقم والنوع في الحقلين مثلا : INVOICENO  و KINDINVOICE  , ثم يسمح لك بتدوين الرقم اذا كان غير متكرر في نفس النموذج لان لي نموذجين هم  INVOICECASH و INVOICECREDIT

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي جعفر يمكنك التاكد من وجود المشكلة من الملف المرفق في مشاركتي الاولى 

تم تعديل بواسطه coca cola7
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي جعفر 

 

ارفق لك  الملف بعد التعديل والتاكد من وجود مشلكة تكرار رقم الفاتورة النقدية والاجلة .

ولكي اوضح لك اكثر 

لدي عدد 2 نموذج واحد للفواتير النقدية واخر للفواتير الاجلة اريد من ذلك الكود ان يسمح بتكرار رقم الفاتورة ونوعها وليس برقم الفاتورة فقط حيث انه عند ادخال فاتورة اجلة رقمها 2000 يسمح  بادخال فاتورة نقدية رقمها 2000 وهذا ما لايسمح به الكود , فارجو تعديل الكود لكي يسمح لي بذلك.

تم تعديل بواسطه coca cola7
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ان شاء الله هذا اللي تريده :)

 

غير السطر اعلاه الى هذا السطر:

a = DLookup("[iNVOICENO]", "INVOICE", "[iNVOICENO]=" & Me.INVOICENO & " AND [KindInvoice]= '" & Me.KINDINVOICE & "'")

 

 

جعفر

1

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك استاذ جعفر كثيرا كثيرا كثيرا فقد تم حل المشكلة , ولكن ممكن تعلمني مما تعلمت  "فقد قيل علم شخص حرفة خير من ان تعطيه خبز كل يوم" , ممكن تشرح لي الكود وكيف يعمل وما الفرق بين الكود الاصلي الذي ارفقته انا في الملف وبين الكودين الذان اعطيتهم لي فيما بعد .

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

تم تعديل بواسطه coca cola7
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

استاذ جعفر

سامحني  اتعبتك كثير ولكن اتمنا من الله ان يرزقك العلم النافع مقابل ما تعلمنا ومقابل ما تنفعنا به

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

AR.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك استاذ جعفر كثيرا كثيرا كثيرا فقد تم حل المشكلة , ولكن ممكن تعلمني مما تعلمت  "فقد قيل علم شخص حرفة خير من ان تعطيه خبز كل يوم" , ممكن تشرح لي الكود وكيف يعمل وما الفرق بين الكود الاصلي الذي ارفقته انا في الملف وبين الكودين الذان اعطيتهم لي فيما بعد .

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

حياك الله :)

 

وان شاء الله لما يخف عني الشغل شوي ، اشرح لك شوي :)

 

والسبب انك ما تقدر تدخل في البرنامج الثاني ، هو ان صاحبه حاط له حمايه ، فرجاء مراجعة المبرمج :)

 

واما طرق الحماية ، فاليك الرابط:

http://arabteam2000-forum.com/index.php/topic/279879-مساعدة-ازالة-ازرار-التحرير-من-العمل-النهائي/?p=1349175

 

 

 

جعفر

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك , وربنا يوفقنا ويفوفقك في عملك 

تحياتي  :)  ;)  ;)  ;)  ;)  ;)

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .