اذهب الي المحتوي
أوفيسنا

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


JAMAL SINANI

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

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

مرحبا استاذتي الكرام

لدي برنامج من خلاله يقرأ الباركود وذلك حسب الارقام المدخلة سابقا لكل الاصناف

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

مع شكري وتقديري لهذا الصرح المميز

الصورة  تشرح الامر

واحاول ان شاء ان ارفع برنامج مبسط لهذا الموضوع

مشكلة.jpg

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

تفضل اخي الفاضل 

On Error Resume Next
'''''''''''''''''''''''
Me.txt1 = DLookup("[BARCODEحقل]", "TABOL1 جدول", "[BARCODEحقل]='" & Me.SERH حقل البحث & "'")
''''''''''''''''''
If Len(Me.TXT1 & "") = 0 Then
MsgBox "هذا الباركود غير مسجل"
Undo
Exit Sub
End If

انشأ مربع نص  غير منضم وسميه TXT1

ضع هذا الكود حذث بعد التحديث في مربع النص الذي تسميه الصندوك الذي تبحث فيه وهتسميه  SERH

  • 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