[eng.khalidvb]

السلام عليكم ورحمة الله وبركاته

اخواني اعضاء منتدى فيجوال بيسك ارجوا ان تساعدوني في حل هذه المشكله اترككم مع الصوره :

[ATTACH=CONFIG]3877[/ATTACH]

او من هذا الرابط اذا لم تكن الصورة واضحه

http://im41.gulfup.com/qqQJD.png


هذه هو كود الحفظ ارجوا التعديل عليه :

PHP كود :

Private Sub btn_save_Click(sender As Object, e As EventArgs) Handles btn_save.Click
        Try
            saveinto.Connection = con
            saveinto.CommandType = CommandType.Text
            saveinto.CommandText = " insert into table1(name,units)" & "values ('" & txtname.Text & _
                "', '" & lst_add.Sorted & "')"
            con.Open()
            saveinto.ExecuteNonQuery()
            con.Close()
            MsgBox("تمت عملية الحفظ بنجاح", MsgBoxStyle.Information, "Save Operation")
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "خطاء في عملية الحفظ")

        End Try

        updatedataset()


    End Sub 


هذا الكود في حدث اللود فورم ارجوا التعديل عليه لعرض عناصر اللست بوكس

PHP كود :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        con.Open()
        adpter.Fill(ds, "table1")
        con.Close()

        txtshowname.DataBindings.Add("text", ds, "table1.name")
        lst_show.DataBindings.Add("text", ds, "table1.units")

        DataGridView1.DataSource = ds
        DataGridView1.DataMember = "table1"
        DataGridView1.AllowUserToAddRows = False



    End Sub