STINGxXx قام بنشر أبريل 25, 2009 قام بنشر أبريل 25, 2009 السلام عليكم ورحمة الله وبركاته اخواني محتاج فزعتكم أحتاج الى تغير صيغة الترقيم التلقائي ليصبح X/YYYY حيث أن X يكون Auto Number و YYYY هو السنة الميلادية الحالية اتمنى من الي عنده خلفيه عن الموضوع ما يبخل عليا تحياتي للجميع
Bluemind قام بنشر أبريل 26, 2009 قام بنشر أبريل 26, 2009 اخوي اضف الكود التالي في حدث عند الحالي او on current If Me.NewRecord Then Dim strWhere As String Dim varResult As Variant strWhere = "ID_Number Like """ & Format(Date, "yyyy") & "*""" varResult = DMax("ID_Number", "Table1", strWhere) If IsNull(varResult) Then Me.ID_Number = "01/" & Format(Date, "yyyy") Else Me.ID_Number = Right(varResult, 3) & _ Format(Val(Left(varResult, 4)) + 1, "00") End If End If مع تعديل الحقل المراد تخصيصه الى حقل من نوع نص وكذللك لا تنسى تغيير اسم الجدول و اسم الحقل الذي في الجدول في هذا السطر الى اسم الجدول والحقل لديك strWhere = "ID_Number Like """ & Format(Date, "yyyy") & "*""" varResult = DMax("ID_Number", "Table1", strWhere)
STINGxXx قام بنشر أبريل 26, 2009 الكاتب قام بنشر أبريل 26, 2009 Thanks for good behavior. I did not replay faster because I am facing some problem in my PC windows language and my laptop under service up to now. Regarding the auto number the database is on attachment. The auto number on Manpower_Request table is the what I need to change to : X/YYYY Manpower_Follow_up_system1.4.zip
ن-1 قام بنشر أبريل 26, 2009 قام بنشر أبريل 26, 2009 الاخ Bluemind ممكن توضيح بمثال لاني حاولت اعملها معرفتش فين امر on current وشكرا
Bluemind قام بنشر أبريل 27, 2009 قام بنشر أبريل 27, 2009 (معدل) اخوي شوف المرفق بما انك لم تحدد اي حقل فقد تم تطبيق الكود على الحقل ID_Number شوف النموذج المسمى Manpower Request الاخ ن-1 هذا ليس امر ولكن هو حدث من خصائص النموذج روح على تاب Event ورايح تحصله اول واحد Manpower_Follow_up_system1.4.zip تم تعديل أبريل 27, 2009 بواسطه Bluemind
ن-1 قام بنشر أبريل 27, 2009 قام بنشر أبريل 27, 2009 ما هي دي المشكلة انا مش لاقي انا عارف انه حدث بس برضه مش لاقيه ولا فوق ولا تحت لو سمحت ابعت لي صورة بمكانه
STINGxXx قام بنشر أبريل 27, 2009 الكاتب قام بنشر أبريل 27, 2009 شكرا Bluemind على المساعدة قمت بتجربت قاعدة البيانات و ادخلت سجلين ولكن لم اجد له قيمة في الحقل الجديد ID_Number . وهل عند كل بداية سنه راح يبدء الترقيم التلقائي من واحد مع تغير السنه. طلب ثاني ممكن توضح لى فائدة الكود الذي قمت بأضافته و لو كان في مرجع كتاب او غيره اقدر استخدمه لتطوير قدراتي في الاكواد المستخدمه في اكسس .. تحياتي Manpower_Follow_up_system1.4.rar
ن-1 قام بنشر أبريل 30, 2009 قام بنشر أبريل 30, 2009 اسف اخي انا افتركت في الحقل نفسه ومكنتش عارف انها في الفورم شكرا على تعبك معايا
ن-1 قام بنشر أبريل 30, 2009 قام بنشر أبريل 30, 2009 طب انا ليا سؤال هو يعتبر في الموضوع نفسه بس مع تغيير بسيط لو انا عاوز الترقيم يكون زي ترقيم الايصالات بالمنظر ده 0001 و 0002 و هكذا بحيث مثلا يكون في رقم 100 يكون بالشكل ده 0100 اعمل ايه؟ اتمنى اكون مش ضيف تقيل عليك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.