غسان علي قام بنشر سبتمبر 18, 2018 مشاركة قام بنشر سبتمبر 18, 2018 السلام عليكم وتحية طيبة الى الاساتذة الافاضل عندي برنامج فاتورة يعمل على الباكورد لكن هناك مواد لا يوجد عليها باكورد ما هي الطرق التي يمكن ان تنصحوني بها لمعالجة تلك الحالة عدا طريقة عمل باكورد لتلك المواد وتكون سريعة فائق الاحترام مع التقدير رابط هذا التعليق شارك More sharing options...
غسان علي قام بنشر سبتمبر 18, 2018 الكاتب مشاركة قام بنشر سبتمبر 18, 2018 للرفع رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر سبتمبر 19, 2018 مشاركة قام بنشر سبتمبر 19, 2018 في ١٨/٩/٢٠١٨ at 07:54, غسان علي said: ما هي الطرق التي يمكن ان تنصحوني بها لمعالجة تلك الحالة عدا طريقة عمل باكورد لتلك المواد وتكون سريعة كان من الاحسن ان تعمل له باركود لكن اذا لا تريد ان تعمله اذا استخدم اسم المنتج فقط ولا تهتم بالباركود 1 رابط هذا التعليق شارك More sharing options...
غسان علي قام بنشر سبتمبر 20, 2018 الكاتب مشاركة قام بنشر سبتمبر 20, 2018 ممنون استاذ شيفان رابط هذا التعليق شارك More sharing options...
ابوآمنة قام بنشر سبتمبر 20, 2018 مشاركة قام بنشر سبتمبر 20, 2018 (معدل) في 15/2/2018 at 08:36, wael_rafat said: اتفضل اخوي جرب هذا الكود .... فى الحدث قبل التحديث Private Sub barcode_BeforeUpdate(cancel As Integer) If IsNull(DLookup("[itemcode]", "Tmenu", "[itemcode]='" & [barcode] & "'")) Then If MsgBox("هذا الكود غير موجود بالاصناف.... " & barcode & vbCrLf & vbCrLf _ & "هل تريد اضافته ؟؟؟ " & vbCrLf, _ vbCritical + vbYesNo + vbDefaultButton1, _ "صنف غير متاح") = vbNo Then DoCmd.CancelEvent barcode.Undo Else DoCmd.OpenForm "F_items", , , , , acDialog End If End If حيث itemcode هو حقل كود الصنف tmenu جدول الاصناف barcode حقل ادخال كود الصنف F_items نموذج ادخال الاصناف هذا الكود عندما لا يكون الكود غير موجود بالأصناف تظهر رسالة هل تريد إضافة الكود أم لا تم تعديل سبتمبر 20, 2018 بواسطه saleh204 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.