(12-12-20, 01:02 AM)عبد العزيز البسكري كتب : [ -> ]إضافة لما قدّمه أستاذنا الكريم
سعود .. الخير و الخيرات
بارك الله فيه و له و جزاه خير الجزاء
و من باب زيادة الخير .. خيرين
كود أستعمله دوما عند الحاجة .. و يشتغل تمام التمام
كود :
Function Retrieve_Numorotation_Speciale() As String
Try
Cnn.Open()
Cmd = New SqlCommand("SELECT * From TBL_INVOICE Where INVOICE_Code Like '" & Date & "%' Order By INVOICE_Id", Cnn)
Dr = Cmd.ExecuteReader
Dr.Read()
Retrieve_Numorotation_Speciale = CLng(Dr.Item("INVOICE_Code").ToString)
Else
Retrieve_Numorotation_Speciale = "0001"
End If
Dr.Close()
Cnn.Close()
Return GetTransNo
Catch ex As Exception
Cnn.Close()
MsgBox(ex.Message, vbCritical)
End Try
Return Nothing
End Function
تحياتي
في حالة اريد ترقيم فقط لا اريد ان اعرض التاريخ متلا 0001, 0002 و في اليوم التالي يبدا من
0001
توجد else و endif اين if
إقتباس :في حالة اريد ترقيم فقط لا اريد ان اعرض التاريخ متلا 0001, 0002 و في اليوم التالي يبدا من 0001
احتاج احد يذكرني بكيفية معرفة بدء يوم جديد ولا اذكر اني تعاملت مع هذه الفكرة لعدم احتياجي لها من قبل.
الان طرات في بالي فكرة
نضيف عمود يحمل اسم اليوم و ....ساتحقق ان شاء الله من الفكرة وارد.
حسب فكرتك ليس ترقيم بالمعنى لان الترقيم لا يتكرر وانما يحفظ على انه نص.
ارجو ايضاح الهدف من الفكرة لعل توجد حلول انسب.
(14-12-20, 01:00 AM)سعود كتب : [ -> ]إقتباس :في حالة اريد ترقيم فقط لا اريد ان اعرض التاريخ متلا 0001, 0002 و في اليوم التالي يبدا من 0001
احتاج احد يذكرني بكيفية معرفة بدء يوم جديد ولا اذكر اني تعاملت مع هذه الفكرة لعدم احتياجي لها من قبل.
الان طرات في بالي فكرة
نضيف عمود يحمل اسم اليوم و ....ساتحقق ان شاء الله من الفكرة وارد.
حسب فكرتك ليس ترقيم بالمعنى لان الترقيم لا يتكرر وانما يحفظ على انه نص.
ارجو ايضاح الهدف من الفكرة لعل توجد حلول انسب.
مثلا منظومة مقهى اريد ان يكون الترقيم على عدد الزبائين و يبدا من 00001 في اليوم التالي