مشكلة في الترقيم التلقائي في Sql Server ؟

أخى العزيز

اقرأ هذا الموضوع فقد يكون فيه حل مشكلتك

/index.ph...mp;#entry727431

لحذف جميع السجلات يجب عمل truncate للجدول لكي يبدأ الترقيم التلقائي من جديد

أخى العزيز

اجعل هذا الحقل حقل رقمى عادى (بدون ترقيم تلقائى)

واكتب هذا الكود باعتبار أن أداة البيانات هى datPrimaryRS مثلآ

ففيه حل مشكلتك باذن الله

	Private Sub cmdDelete_Click()

	  IDREC = datPrimaryRS.Recordset.AbsolutePosition
With datPrimaryRS.Recordset
	  .Delete
	  .MoveNext
	  If .EOF Then .MoveLast
	  NTOTAL = .RecordCount
	  For I = IDREC To NTOTAL - 1
	  .Fields(0) = .AbsolutePosition
	  .MoveNext
	  Next I
	  .Fields(0) = .AbsolutePosition
	  If IDREC > NTOTAL Then .MoveLast: GoTo 100
	  .AbsolutePosition = IDREC
100 End With

Exit Sub

ارجو استخدام البحث قبل طرح السؤال

احدى نتائج البحث المشاركة

بارك الله فيكم أحبابي أجمعين ..

جاري تجربة الحـلول ..

موفقين اجمعين .......

توجد عدة طرق أخرى:

مشكلة في تعديل حقل الى Identity

من موضوع "اريد عمل Trigger يحل مشكلة ID بعد insert & delete"