ابوزيــاد قام بنشر أبريل 7, 2015 قام بنشر أبريل 7, 2015 السلام عليكم ورحمه الله انا بصدد عمل برنامج صرف للعملاء وهو كتالي: يتم تسجيل بيانات العميل في الـ Table : clintID ثم يتم ادخال طلباته من العمله في الـ Table: ClientExchange ارغب منكم مساعدتي في عمل عداد يومي (Clint Counter) بحيث: يتم ربط العدد بالتاريخ اليومي بحيث في كل يوم جديد وعند تسجيل طلبات اول عميل من العمله يتم اعطائه رقم 1 في الحقل (ٍSeqNumber) في الجدول (ClientExchange) والعميل الثاني يتم اعطائه رقم 2 وهكذا . مع خالص الشكر مرفق لكم قاعدة البيانات ExchangeDb.rar
jjafferr قام بنشر أبريل 7, 2015 قام بنشر أبريل 7, 2015 وعليكم السلام أخي سهلة SeqNumber = Nz(DMax("[SeqNumber]", "ClientExchange", "[DateExchange]=#" & Date & "#")) + 1 جعفر 1
ابوزيــاد قام بنشر أبريل 7, 2015 الكاتب قام بنشر أبريل 7, 2015 اخي الكريم اشكرك على تعاونك ماهو رايك في فكرة انشاء جدول مستقل للعد بحيث يحتوي على حقلين 1- التاريخ 2- الرقم فاعند اضافة عمليه صرف يتم : اولا فحص تاريخ اليوم اذا كان غير موجود يتم اضافته ثم يوضع في حقل الرقم 1 ويزيد الرقم في كل عمليه صرف اما اذا كان موجود التاريخ يتم اضافة الرقم الى اخر رقم موجود مثال: حقل التاريخ حقل الرقم 2015/06/18 1 يضاف رقم للمووجود في كل عملية 2015/06/19 1 يضاف رقم للمووجود في كل عملية مع خالص الشكر
jjafferr قام بنشر أبريل 7, 2015 قام بنشر أبريل 7, 2015 اعتقد الجدول بوضعه الحالي أفضل ، حيث يكلفك حقل واحد وهو SeqNumber ، بينما لو عملت جدول ثاني ، فبالاضافة الى انه يكلفك جدول آخر ، يجب ان تعمل علاقة بين الجدولين ، وفي كل عملية تريد فيها الترقيم ، تضطر الى استعلام يكون فيه الجدولين مرتبطين بعلاقة لكن ، الشخص الافضل في اختيار الطريقة الصحيحة هو انت ، وبما تعرفه عن برنامجك حاليا على ما هو عليه ، وحسب خططك المستقبليه له جعفر
ابوزيــاد قام بنشر أبريل 8, 2015 الكاتب قام بنشر أبريل 8, 2015 اخي الكريم امل الاطلاع على الملف المرفق مع خالص الشكر والتقدير sequence numbers.zip
jjafferr قام بنشر أبريل 8, 2015 قام بنشر أبريل 8, 2015 حياك الله أخي ابوزياد شو المطلوب ، شو اللي لازم انظر فيه ، وش المطلوب بعد الاطلاع؟ جعفر
ابو جودي قام بنشر أبريل 8, 2015 قام بنشر أبريل 8, 2015 السلام عليكم ورحمه الله انا بصدد عمل برنامج صرف للعملاء وهو كتالي: يتم تسجيل بيانات العميل في الـ Table : clintID ثم يتم ادخال طلباته من العمله في الـ Table: ClientExchange ارغب منكم مساعدتي في عمل عداد يومي (Clint Counter) بحيث: يتم ربط العدد بالتاريخ اليومي بحيث في كل يوم جديد وعند تسجيل طلبات اول عميل من العمله يتم اعطائه رقم 1 في الحقل (ٍSeqNumber) في الجدول (ClientExchange) والعميل الثاني يتم اعطائه رقم 2 وهكذا . مع خالص الشكر مرفق لكم قاعدة البيانات ممكن تضيف مرفق يحتوى على نماذج القاعده وجود النماذج حيسهل علينا مساعدة حضرتك
ابوزيــاد قام بنشر أبريل 8, 2015 الكاتب قام بنشر أبريل 8, 2015 جزاك الله خير المطلوب تعديل الكود المذكور في ردك رقم 2 بحيث يمكن اضافة رقم الشباك له الله يرفع قدرك
jjafferr قام بنشر أبريل 8, 2015 قام بنشر أبريل 8, 2015 السلام عليكم اخي ابوزياد انت طلبت التنسيق التالي: على هذا الاساس ، يكون الكود في برنامجك كالتالي: Else a = Nz(DMax("[SeqNumber]", "ClientExchange", "[DateExchange]=#" & Date & "#")) + 1 Me![SeqNumber] = Format(Me.WindowID, "00") & "-" & Format(a, "0000") ' Me![OUT-NUM] = Me![OUT-NUM] + 1 End If جعفر 39.Exchange.mdb.zip
ابوزيــاد قام بنشر أبريل 8, 2015 الكاتب قام بنشر أبريل 8, 2015 اشكرك اخي الكريم على مساعدتك ولكن لاحظت ان الرقم لم يتسلسل:
ابوزيــاد قام بنشر أبريل 8, 2015 الكاتب قام بنشر أبريل 8, 2015 ما رايك في الملف المرفق sequential_nbr3.zip
jjafferr قام بنشر أبريل 8, 2015 قام بنشر أبريل 8, 2015 عفوا على هذا الخطأ الحقل كان بصيغة رقم ، وجربت الكود عليه ، لكني غيرته الى نص ولم اجرب الكود جربه الان لوسمحت الكود اصبح: Else a = Nz(DMax("Val(Right([SeqNumber], 4))", "ClientExchange", "[DateExchange]=#" & Date & "#")) + 1 Me![SeqNumber] = Format(Me.WindowID, "00") & "-" & Format(a, "0000") ' Me![OUT-NUM] = Me![OUT-NUM] + 1 End If جعفر 39.Exchange.mdb.zip
ابوزيــاد قام بنشر أبريل 8, 2015 الكاتب قام بنشر أبريل 8, 2015 هذا التنسيق المطلوب: اشكرك على تعاونك جعله الله في ميزان حسناتك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.