النجاشي قام بنشر يوليو 9, 2018 قام بنشر يوليو 9, 2018 السلام عليكم ورحمه الله وبركاته احبتي هذا الكود شغال معي تمام فغيرت حقلID_Sanf من رقم الي نص بعدها لم يشتغل معي التنبيه المطلوب تعديل الكود Dim Rs As DAO.Recordset Set Rs = Forms!frmSales!SubSales.Form.RecordsetClone Rs.FindFirst "[Rjmfatwra] = '" & Me.Rjmfatwra & "' And ID_Sanf =" & Me.ID_Sanf If Rs.NoMatch = False Then MsgBox " الرقم مكرر" & " ", , "تـنـبـيـه" GoTo No_Records Else
عبد الله قدور قام بنشر يوليو 9, 2018 قام بنشر يوليو 9, 2018 5 ساعات مضت, ابو زاهر said: Dim Rs As DAO.Recordset Set Rs = Forms!frmSales!SubSales.Form.RecordsetClone Rs.FindFirst "[Rjmfatwra] = '" & Me.Rjmfatwra & "' And ID_Sanf =" & Me.ID_Sanf If Rs.NoMatch = False Then MsgBox " الرقم مكرر" & " ", , "تـنـبـيـه" GoTo No_Records Else السلام عليكم اخي الكريم من خلال نظرة سريعة للكود هناك خطأ بسيط وهو ان الامر if يحتاج الى انهاء هذا الامر ب end if 1
النجاشي قام بنشر يوليو 9, 2018 الكاتب قام بنشر يوليو 9, 2018 7 دقائق مضت, عبد الله قدور said: السلام عليكم اخي الكريم من خلال نظرة سريعة للكود هناك خطأ بسيط وهو ان الامر if يحتاج الى انهاء هذا الامر ب end if اليك القاعده استاذي الفاضل القي اليها نظره المعذدره لم اكمل الكود بالفاتوره اضغط كم مره انتر حتا يفتح النموذج الصغير الذي اضيف منه الاصناف وادرج الصنف ستلاحظ المشكله تحياتي اليك يالغالي 55.rar
عبد الله قدور قام بنشر يوليو 9, 2018 قام بنشر يوليو 9, 2018 بعد فتح النموذج الصغير ظهرت هذه الرسالة هناك نموذج ناقص 1
النجاشي قام بنشر يوليو 9, 2018 الكاتب قام بنشر يوليو 9, 2018 (معدل) صحيح استاذي@عبد الله قدور ارفقت القاعده على عجل بس مش مهم النموذج ممكن تدخل رقم الصنف مباشره وليكن 11111-11111او22222-22222 الشرطه بين الارقام لاتكتبها هذه القاعده بها النموذج المفقود لكي يسهل الادخال 66.rar تم تعديل يوليو 9, 2018 بواسطه ابو زاهر
النجاشي قام بنشر يوليو 9, 2018 الكاتب قام بنشر يوليو 9, 2018 (معدل) استاذي@عبد الله قدور رساله عدم تكرار الصنف هي الذي فيها المشكله لا اريد يتكرر السجل بالفرعي انا بدي اعرف شو الخطاء بالكود لانه سابقا كان رقم الصنف رقم ورقم الفاتوره نص وشغال الكود ولكن عندما تفير رقم الصنف الي نص لم يعمل معي الكود هذا هو مشكلتي تم تعديل يوليو 9, 2018 بواسطه ابو زاهر
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.