الاخوة الاعزاء
اسوي برنامج ضخم للشركة التي اعمل بها وفي كل فورم ارغب في عمل سيريال يتغير كلما ضغط زر اضافة تعلمت طريقة من احد البرامج الموجودة بالمنتدي ولكن لم تفلح فالكود الذي عملته كالتالي :
if not t.eof then
t.movelast
text1.text = t!srl +1
else
text1.text =1
end if
وفي الحقيقة هذا الطريقة تتم بنجاح حتي رقم معين وليكن 19 وبعدها كلما اضغط زر اضافة بدل ما يظهر رقم 20 يظهر رقم 19 مرة اخري وهكذا .....
ارجو من الاخوة ادراج مثال فيه السيريال حيث ان احد الاعضاء ذكر لي كود لم افهم منه اي شيئ وهو كالتالي:
لعمل serial
select max(fieldname) as dd from tabelname
وعند الاضافة
recordset!fieldname=dd!recordset
وبعد اضافة هذا الكود يظهر الجزء الاول بالكود باللون الاحمر
عموما ارجو المساعدة في عمل سيريال
وشكرا