تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في فاتورة مبيعات
#2
جرب هذا التعديل
PHP كود :
  Private Sub SaveBill()
 
      'لحفظ بيانات الفاتورة
       Dim CMD As New OleDb.OleDbCommand("Insert Into [bill]([billnu],[kind],[kind2],[date],[totalbill],[depet],[total]) values(@billnu,@kind,@kind2,@date,@totalbill,@depet,@total )", Con)
       CMD.Parameters.AddWithValue("@billnu", txtBillNumber.Text)
       CMD.Parameters.AddWithValue("@kind", ComboBox1.Text)
       CMD.Parameters.AddWithValue("@kind2", ComboBox2.Text)
       CMD.Parameters.AddWithValue("@date", DateTimePicker1.Value.Date)
       CMD.Parameters.AddWithValue("@totalbill", txttotalBill.Text)
       CMD.Parameters.AddWithValue("@depet", txtBlance.Text)
       CMD.Parameters.AddWithValue("@total", txtbilltotal.Text)

       Con.Open()
       If CMD.ExecuteNonQuery() > 0 Then
           MsgBox("تم حفظ بيانات الفاتورة بنجاح يمكنك الان بدء التسجيل للاصناف")
           butEnter.Enabled = True
           txtItem2.Focus()
           txtItem2.BackColor = Color.Yellow
       End If
       Con.Close() 

لن تظهر رسالة (تم حفظ بيانات الفاتورة) إلا إذا تم بالفعل حفظ الفاتورة
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: مساعدة في فاتورة مبيعات - بواسطة طالب برمجة - 09-12-17, 09:31 PM


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم