[Osama_NY]

كيف يمكنني اعداد ترقيم تلقائي و يتجدد في كل يوم مثلا يبدا من 1 الى الخ.....
و بعد 24 ساعه يبدا من الواحد من جديد

[Anas Mahmoud]

ترقيم تلقائي في قاعدة البيانات ؟

[Osama_NY]

(08-12-20, 02:26 AM)Anas Mahmoud كتب : ترقيم تلقائي في قاعدة البيانات ؟

رقم تسلسلي على فواتير مقهى مثلا يبدا من 0001 الى الخ و بعد 24 ساعة يبدا من الواحد من جديد مش متاكد بس ممكن في داتا جريد فيو بس لانه ليس لدي خبرة حقيقتا مارايك انت هل تكون في قاعدة البيانات او داتا قريد فيو الترقيم

[قناص المدينة]

اجعل من التاريخ هو شرط الترقيم

[Osama_NY]

(08-12-20, 10:56 AM)قناص المدينة كتب : اجعل من التاريخ هو شرط الترقيم

ماذا تقصد اخي

[Osama_NY]

(08-12-20, 02:26 AM)Anas Mahmoud كتب : ترقيم تلقائي في قاعدة البيانات ؟

يوجد كود اخر لتغير لون صف داتا غريد فيو هل تحتاجه لربما تستفيد منه

[قناص المدينة]

(08-12-20, 11:20 AM)Osama_NY كتب :

(08-12-20, 10:56 AM)قناص المدينة كتب : اجعل من التاريخ هو شرط الترقيم

ماذا تقصد اخي

SELECT MAX(ID_) FROM tab where tdate =DateTime.Today

[الحزين اليماني]

قناص المدينة انت مبدع بحق وفقك الله .

[الحزين اليماني]

هذا الكود كاملا اخي
Dim cs As New SqlConnection("Data Source=.\SQLEXPRESS; INITIAL CATALOG=AutoID; INTEGRATED SECURITY=true;")
Dim ds As New DataSet
Dim da As New SqlDataAdapter("SELECT TOP 1 ID FROM tblAutoID WHERE MyYear=" & DateTimePicker1.Value.Year & " ORDER BY ID DESC", cs)
da.Fill(ds, "tblAutoID")
Dim dv As New DataView(ds.Tables("tblAutoID"))
If Me.BindingContext(dv).Count > 0 Then
txtID.Text = CInt(Me.BindingContext(dv).Current("ID")) + 1
Else
txtID.Text = 1
End If