سؤال فى الترقيم التلقائي

[naguib_3778]

أنا عامل ترقيم تلقاتي للجدول - ونمطة عشوائي

المشكلة أنة أحياء يعطي بيانات بالسالب - ودة مش معقول بسبب أن الرقم ده هيكون كود عملية

برجاء حل هذه المشكلة

شكراً

[ابوخليل]

الحل الامثل

استخدام الدالة Abs لارجاع القيمة المطلقة

 

او :

اكتب شرط بعد سطر النتيجة

اذا كان اصغر من صفر يضربه بسالب واحد

[naguib_3778]

شكراً على الرد

ولكن برجاء التوضيح أكثر

[ابوخليل]

بالنسبة للشق الاول ستكتب الكود هكذا :

a=Abs(b-c)

سيرجع القيمة موجبة حتى لوكانت النتيجة سالبة

[naguib_3778]

انا كل الى عملتة بس هو عبارة عن جدول به ترقيم تلقائي

أكتب ده كلة فين

برجاء التوضيح

[ابوخليل]

أنا عامل ترقيم تلقاتي للجدول - ونمطة عشوائي

 

 

ظننت العشوائية من خلال كود مصنوع

الآن اتضح السؤال 

المعذرة اخوي احمد لانتظارك وتأخيرك  

حقيقة لا اعرف الحل

[naguib_3778]

هو مفيش مشكلة لو حد عندة طريقة أخري ممكن أنفذها

المطلوب هو اعطاء كود لكل موطف - بشرط عدم التكرار - ويكون مكون مثلاً من عدد ارقام كبير - مثلاً أكثر من 5 أرقام مثلاً

[أبوبسمله]

بعد إذن أخى أبو خليل 

كيف عملت حقل ترقيم تلقائى وتقول انه عشوائى ؟

الترقيم التلقائى فى الاكسيسي يبدأ من 1 إلى ماشاء الله 

ثانيا 

 

هو مفيش مشكلة لو حد عندة طريقة أخري ممكن أنفذها

المطلوب هو اعطاء كود لكل موطف - بشرط عدم التكرار - ويكون مكون مثلاً من عدد ارقام كبير - مثلاً أكثر من 5 أرقام مثلاً

 

مما يتكون كود الموظف التابع لك كم رقم ؟

هل هذا الكود مرتبط برقم ملف فى العمل ام ستتركه كما قلت يتم تنفيذه عشوائى 

وضح لنا حتى يتيسر لى و للأخوه مساعدتك إن شاء الله 

[ابوخليل]

هو مفيش مشكلة لو حد عندة طريقة أخري ممكن أنفذها

المطلوب هو اعطاء كود لكل موطف - بشرط عدم التكرار - ويكون مكون مثلاً من عدد ارقام كبير - مثلاً أكثر من 5 أرقام مثلاً

 

انظر هذا الكود يتم من خلاله الترقيم بالزيادة مع تحديد رقم البداية

وقد تم ضبط الحقل كمفتاح لا يقبل التكرار

ويمكنك وضع اي رقم تريد ان يكون هو البداية

Private Sub zer1_Click()
On Error Resume Next
Dim i As Integer
i = DMax("[id]", "tbl1")
If i < 12345 Then
id = 12345
Else
id = i + 1
End If
End Sub

وهذا تطبيق

Test1.rar

[رمهان]

اخ احمد

في مشاركتك الاولى فهما صحيحا للترقيم التلقائي حيث ذكرت انه تكويد لعملية ولكنك في المشاركة رقم 7 ذكرت انه ترقيم لموظف وهذا ما جعل لدي لبس في فهمك لما هو الترقيم التلقائي حيث هو باختصار تكويد للسجل ومعرف بدون اي معنى لهذه الارقام فقط معرفه للسجل كامل.

وكاجابه لما يدور في ذهنك : ضعه مفتاح اساسي ثم تاكد ان الخاصية الزياده هي زيادة وليس عشوائي ثم خاصية التنسيق الى 00000 .

هذا ما اسعفني به وقتي اﻵن ممتمنيا للجميع التوفيق والسداد