الرئيسية | مركز الدعم | نبذة عنا | اتصل بنا | تابعنا على فيسبوك | English
YAZSYS.COM, Pos, Pop, Point Of Sale
منذ عام 2012 - 2019 عدد العملاء حتى الأن: 2768
تحميل نظام المبيعات  
 
كود حفظ سجل في قاعدة بيانات اكسس Access
 
   Try
 
 
            Dim con As OleDbConnection
            Dim com As OleDbCommand
            con = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Application.StartupPath & "\db1.mdb;user id=admin;jet oledb:database password=")
            com = New OleDbCommand("UPDATE Table1 SET Field1 = '" & (TextBox1.Text) & "' , Field2 = '" & (TextBox2.Text) & "' , Field3 = '" & (TextBox3.Text) & "' where ID =@ID", con)
            con.Open()
            com.Parameters.AddWithValue("@ID", TextBoxID.Text)
            com.ExecuteNonQuery()
 
            con.Close()
 
            MsgBox("تم حفظ التعديلات", MsgBoxStyle.OkCancel, "")
 
            ListExport.lo()
            Me.Dispose()
 
        Catch ex As Exception
            MsgBox("خطاً" + ex.ToString)
            Exit Sub
        End Try
 
 

 
تحميل نظام المبيعات  
 
الصفحة الرئيسية
اتصل بنا
نبذة عن هذا الموقع
خارطة الموقع
مشاريع برمجة متنوعة مفتوحة المصدر
مواضيع ودروس تعليمية
 
 
نظام YAZ الجيل الثالث
مركز الدعم
تابعنا على فيسبوك
برنامج مبيعات ونقاط البيع وجرد المستودعات ومحاسبة خارطة الموقع
 
 
 
تحميل نظام المبيعات