PDA

View Full Version : مبتدی: ایجاد ستون ردیف خودکار در DataGride



mt.ntabrizi
شنبه 02 بهمن 1395, 14:01 عصر
سلام

احتراما بنده دنبال ایجاد ردیف خودکار برای DatGride هستم که با اضافه شدن سطر و یا حذف سطرشماره ردیف هم آپدیت بشه


با سپاس

isaac23
شنبه 02 بهمن 1395, 16:06 عصر
سلام و خسته نباشید ......

برای اضافه کردن ردیف در رکورد جدید که فکر کنم مشکلی نداشه باشی ...
یا هم یه فیلد از نوع اتو نامبر داخل اکسس ایجاد کنی که فقط در صورت حذف نکردن رکورد جدید صحیح عمل میکنه .


Adodc1.Recordset.Fields("ID") = Adodc1.Recordset.RecordCount


آما برای حذف هم می تونی از این کد استفاده کنی هر چند استاندارد نیست ..... اما کارت رو راه میندازه .




Adodc1.Recordset.MoveFirst
For i = 1 To Adodc1.Recordset.RecordCount
Adodc1.Recordset.Fields("ID").Value = CStr(i)
If i <= Adodc1.Recordset.RecordCount Then
Adodc1.Recordset.MoveNext
End If
Adodc1.Recordset.Update
Next i