[shado1796]

Easy 4ever كتب :تقصد ان تطلع المشكلة في الإضافة على قاعدة البيانات لو هذا قصدك فأنا فهمت خطأ

ياليت توضح لنا المشكله أكثر
كيف تفتح شخص من مضافين Listview
الكود السابق كود للإضافه أو التعديل على قاعدة البيانات باستخدام البارومترات

ياليت تحط لنا كود فتح شخص من المضافين في Listviwe لان المشكلة تكمن فيه

[COLOR="#FF0000"]
لا اخي ليس عند الاضافة الحمد لله حليناها ،، بل عند الفتح ،، وهذا كود مشروعي كامل للفتح
[COLOR="#696969"]

كود :

Private Sub ListView1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.DoubleClick
        Me.NewAdd()
                'MsgBox(Me.ListView2.SelectedItems(0).Text)
        Dim cm As New SqlDataAdapter("select * from Table1 where ID=" & Val(ListView1.SelectedItems(0).Text) & "", Conn)
        Dim ds As New DataSet
        ds.Clear()

        PictureBox2.DataBindings.Clear()
        PictureBox3.DataBindings.Clear()
        PictureBox4.DataBindings.Clear()
        PictureBox5.DataBindings.Clear()
        PictureBox6.DataBindings.Clear()
        PictureBox7.DataBindings.Clear()
        PictureBox8.DataBindings.Clear()
        PictureBox9.DataBindings.Clear()
        PictureBox10.DataBindings.Clear()
        PictureBox11.DataBindings.Clear()
        PictureBox12.DataBindings.Clear()
        PictureBox13.DataBindings.Clear()

        cm.Fill(ds, "Table1")



        TextBox1.DataBindings.Add("text", ds, "Table1.UserName")
        TextBox2.DataBindings.Add("text", ds, "Table1.MobileNumber")
        TextBox7.DataBindings.Add("text", ds, "Table1.Date")
        TextBox45.DataBindings.Add("text", ds, "Table1.Price")
        TextBox46.DataBindings.Add("text", ds, "Table1.Rest")
        TextBox47.DataBindings.Add("text", ds, "Table1.Recipient")
        TextBox4.DataBindings.Add("text", ds, "Table1.NameShop")
        TextBox5.DataBindings.Add("text", ds, "Table1.PlaceShop")
        TextBox6.DataBindings.Add("text", ds, "Table1.UserShop")
        TextBox3.DataBindings.Add("text", ds, "Table1.Email")
        TextBox71.DataBindings.Add("text", ds, "Table1.NumberDresses")
        TextBox8.DataBindings.Add("text", ds, "Table1.ColorDress1")
        TextBox9.DataBindings.Add("text", ds, "Table1.TypeCloth1")
        TextBox10.DataBindings.Add("text", ds, "Table1.TypeDesign1")
        TextBox11.DataBindings.Add("text", ds, "Table1.TypePocket1")
        TextBox20.DataBindings.Add("text", ds, "Table1.IDCloth1")
        TextBox21.DataBindings.Add("text", ds, "Table1.LengthM1")
        TextBox87.DataBindings.Add("text", ds, "Table1.LengthY1")
        TextBox15.DataBindings.Add("text", ds, "Table1.ColorDress2")
        TextBox14.DataBindings.Add("text", ds, "Table1.TypeCloth2")
        TextBox13.DataBindings.Add("text", ds, "Table1.TypeDesign2")
        TextBox12.DataBindings.Add("text", ds, "Table1.TypePocket2")
        TextBox22.DataBindings.Add("text", ds, "Table1.IDCloth2")
        TextBox23.DataBindings.Add("text", ds, "Table1.LengthM2")
        TextBox88.DataBindings.Add("text", ds, "Table1.LengthY2")
        TextBox19.DataBindings.Add("text", ds, "Table1.ColorDress3")
        TextBox18.DataBindings.Add("text", ds, "Table1.TypeCloth3")
        TextBox17.DataBindings.Add("text", ds, "Table1.TypeDesign3")
        TextBox16.DataBindings.Add("text", ds, "Table1.TypePocket3")
        TextBox24.DataBindings.Add("text", ds, "Table1.IDCloth3")
        TextBox25.DataBindings.Add("text", ds, "Table1.LengthM3")
        TextBox89.DataBindings.Add("text", ds, "Table1.LengthY3")
        TextBox26.DataBindings.Add("text", ds, "Table1.LengthDress")
        TextBox27.DataBindings.Add("text", ds, "Table1.DisplayKtf")
        TextBox28.DataBindings.Add("text", ds, "Table1.DisplayDress")
        TextBox29.DataBindings.Add("text", ds, "Table1.LengthKmSadh")
        TextBox30.DataBindings.Add("text", ds, "Table1.LengthKmKbk")
        TextBox31.DataBindings.Add("text", ds, "Table1.DisplayKmSadh1")
        TextBox32.DataBindings.Add("text", ds, "Table1.DisplayKmSadh2")
        TextBox33.DataBindings.Add("text", ds, "Table1.DisplayKmSadh3")
        TextBox34.DataBindings.Add("text", ds, "Table1.DisplayKmKbk1")
        TextBox35.DataBindings.Add("text", ds, "Table1.DisplayKmKbk2")
        TextBox36.DataBindings.Add("text", ds, "Table1.DisplayKmKbk3")
        TextBox37.DataBindings.Add("text", ds, "Table1.RakbhKllab1")
        TextBox39.DataBindings.Add("text", ds, "Table1.RakbhKllab2")
        TextBox40.DataBindings.Add("text", ds, "Table1.RakbhSadh1")
        TextBox41.DataBindings.Add("text", ds, "Table1.RakbhSadh2")
        TextBox42.DataBindings.Add("text", ds, "Table1.DownDress1")
        TextBox43.DataBindings.Add("text", ds, "Table1.DownDress2")
        TextBox44.DataBindings.Add("text", ds, "Table1.LengthKbzor")
        TextBox38.DataBindings.Add("text", ds, "Table1.Other")
  
        PictureBox2.DataBindings.Add("image", ds, "Table1.Img1U1", True)
        PictureBox3.DataBindings.Add("image", ds, "Table1.Img2U1", True)
        PictureBox4.DataBindings.Add("image", ds, "Table1.Img3U1", True)
        PictureBox5.DataBindings.Add("image", ds, "Table1.Img4U1", True)
        '
        PictureBox6.DataBindings.Add("image", ds, "Table1.Img1U2", True)
        PictureBox7.DataBindings.Add("image", ds, "Table1.Img2U2", True)
        PictureBox8.DataBindings.Add("image", ds, "Table1.Img3U2", True)
        PictureBox9.DataBindings.Add("image", ds, "Table1.Img4U2", True)
        '
        PictureBox10.DataBindings.Add("image", ds, "Table1.Img1U3", True)
        PictureBox11.DataBindings.Add("image", ds, "Table1.Img2U3", True)
        PictureBox12.DataBindings.Add("image", ds, "Table1.Img3U3", True)
        PictureBox13.DataBindings.Add("image", ds, "Table1.Img4U3", True)

    End Sub

[/COLOR]


عند الفتح للمره الاولى ،، يعمل ،، لكن اذا جئت واردت فتح اي عميل اخر لا يفتح ويظهر هذه الرسالة
http://im32.gulfup.com/hFYw7.png

[/COLOR]