شروع Auto number از عدد خاص [بایگانی]

ho3ein282

جمعه 23 تیر 1391, 14:10 عصر

چطوری میتونیم مشخص کنیم که Auto number به جای اینکه از یک شروع بشه از عددی خاص مثلا 1000 شروع بشه
ممنون

mohammadriano

جمعه 23 تیر 1391, 15:23 عصر

چطوری میتونیم مشخص کنیم که Auto number به جای اینکه از یک شروع بشه از عددی خاص مثلا 1000 شروع بشه
ممنون
بهتره یک فیلد integer داخل Table بسازید بعد فیلد integer رو از داخل VB6 کنترل کنید

Dim i As Long
Dataname.Refresh
If Dataname.Recordset.BOF <> True Then
Dataname.Recordset.MoveLast
i = Dataname.Recordset.Fields("integer").Value
Dataname.Refresh
Dataname.Recordset.AddNew
Dataname.Recordset.Fields("integer").Value = i + 1
Else
Dataname.Recordset.AddNew
Dataname.Recordset.Fields("integer").Value = 1000 ' or ........("integer").Value = Text1.text
End If
Dataname.Refresh