تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كود كتابة آخر رقم بTextbox ؟
#1
السلام عليكم

لدي برنامج أسجل فيه معلومات و من ضمن أعمدة قاعدة البيانات هناك عمود يسجل فيه ترقيم متسلسل مثلا 1.2.3.4.5.6........ يعني الرقم التسلسلي للسجلات.

لدي Textbox . أريد عند تسجل سجل جديد يظهر فيه آخر رقم تم تدوينه + 1

للزيادة في الشرح أعطي رقما:

آخر رقم سجلته كان 100 أريد أن يظهر في TEXTBOX عند تسجيل سجل جديد يكون مكتوب في هذا textbox الرقم 101 أوطوماتكيا.


أرجو الرد على سؤالي و شكرا لكم جميعا.
الرد }}}
تم الشكر بواسطة:
#2
.....

لا أنصحك بالطريقة التي ذكرتها

كل الشركات لا تكتب لك رقم المعاملة إلا بعد التأكد من تسجيلها باستخدام استعلام ثاني "SELECT @@IDENTITY" بعد الإضافة مباشرة وقبل غلق الإتصال بقاعدة البيانات

وهذه الطريقة مفيده خصوصاً إذا تم تطوير البرنامج للعمل على شبكة

.....
الرد }}}
تم الشكر بواسطة: abdouhai
#3
السلام عليكم

شكرا لك أخي على الرد .

بالنسبة لي لا أعمل بهذا البرنامج على الشبكة. و لكن هو برنامج خاص بي أسجل به المعلومات فقط

و أريد الرقم التسلسلي فقط لتنظيم المعلومات عند البحث بهذا الرقم التسلسلي أذهب مباشرة للشئ المطلوب.

والقصد من هذا السؤال هو أن يظهر لي الرقم أوطوماتكيا دون الدخول إلى قاعدة البيانات و معرفة الرقم الأخير ربما يمر وقت دون اسجل شئ و لا

أتذكر آخر رقم سجلته.

لهذا اطلب مساعدتك لإيجاد حل لسؤالي مشكورا.

و رمضان كريم عليك و على المسلمين اجمعين....آمين
الرد }}}
تم الشكر بواسطة:
#4
هذه اول مشاركة لى فى هذا الموقع وأرجوا ان يتم الإستفاده من هذا الكود الخاص بالترقيم والذى تعبت كثيرا فى البحث عنه على النت ولم أجده سوى بتوفيق من الله
بعد اضافة تعديلات عليه ويتم كتابته فى  حدث فورو لوود   

Dim x As Integer
("x = ("0000
Do Until da.EOF
x = x + 1
("Text5.Text = Format(x, "0000
da.MoveNext
Loop
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor
#5
اعمل ذلك مع قواعد بيانات access

حيث اذا كان الرقم 1000 ضعه في الحقل الي اسمه num
mun.ado =y
x=1
x=x+y
text1.text=x
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كتابة الكسر فى صورة بسط ومقام اسلام الكبابى 0 1,005 13-03-21, 07:55 AM
آخر رد: اسلام الكبابى
Question [vb6.0] كيف امنع المستخدم من كتابة الاحرف والرموز في Combo ؟ Microformt 2 1,683 28-06-19, 03:26 AM
آخر رد: Microformt
  طريقة كتابة المسار داخل قيمة في الريجيستري الرجل الرمادي 3 2,118 10-02-19, 08:05 PM
آخر رد: Amir_Alzubidy
  [vb6.0] خاصية تعتمد علي Artificial intelligence عند كتابة في قاعدة بيانات اكسيس من خلال VB6 mohamed arafa 5 2,361 13-09-18, 03:47 AM
آخر رد: mohamed arafa
  اريد كتابة هذا الكود الى لغة الفيجول 6 bidaya 3 1,990 30-09-17, 08:27 PM
آخر رد: bidaya
  كيف كتابة نص عامودي في الاكتف ريبورت scsi7000 1 1,433 27-07-17, 11:15 AM
آخر رد: Ahmed_Mansoor
  لو سمحتوا انا اريد عند كتابة تاريخ الميلادي يظهر لى فى تكس تاريخ المعاش على سن 60 رجل الكهرباء 3 2,195 17-12-16, 08:54 PM
آخر رد: رجل الكهرباء
  [سؤال] كتابة اكواد رياضية asto 1 1,717 17-06-16, 03:43 PM
آخر رد: KamelArab
  كتابة حقل انجليزي alfakeeh 6 3,165 25-02-16, 05:21 AM
آخر رد: Ahmed_Mansoor
  [سؤال] هل استطيع كتابة اوامر فيجوال بيسك 2008 هنا في هذا القسم احمداحمداحمد6 2 1,812 19-10-15, 08:59 PM
آخر رد: احمداحمداحمد6

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم