เรื่อง Listview กับ Mysql และ รูปภาพ โดย VB 2008 มีปัญหา ทั้งหมด 5 ข้อ รบกวนท่านผู้รู้มาตอบด้วยนะครับ

conn = New MySqlConnection("server=localhost; user id=root; password=root; database=rental;")
            conn.Open()
            sqlquery = "INSERT INTO customer(code , surname ,lastname ,gendle ,address ,occu ,tel ,email ,day_reg ,picture) VALUES ('" + Code_customer + "','" + Surname_Customer + "','" + Lastname_Customer + "','" + Gendle_Customer + "','" + Address_Customer + "','" + Occu_Customer + "','" + Tel_Customer + "','" + Email_Customer + "','" + Register_Customer + "','" + Picture_Customer + "');"
            mycommand.CommandText = sqlquery
            mycommand.Connection = conn
            mycommand.ExecuteNonQuery()
            MsgBox("success")
            mycommand.Dispose()
            status = 0
            Me.filllistview()
            conn.Close()

โดยที่ Me.fillistview() นี่หมายถึง พอ Insert ข้อมูลปุ๊บ ข้อมูลใหม่ ก็จะขึ้นใน Listview เลย (ผมไม่ใช้ Datagridview เพราะอาจารย์เขาไม่ให้ใช้ ครับ ซึ่งผมก็ไม่ทราบว่าทำไมไม่ให้ใช้ - -*)      

ซึ่ง Code ตอนนี้ก็ Insert ไ้ด้หมดแล้ว ครับ ยกเว้น Picture มันไม่เข้าโดยที่ ผมทำ Linklebel ไว้

 Private Sub LnkPic_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LnkPic.LinkClicked
        With OpenFileDialog1
            .Filter = "Image Files(*.gif;*.jpg)|*.gif;*.jpg"
            .FileName = ""

            If (.ShowDialog() = DialogResult.OK) Then
                PictureBox.Image = Image.FromFile(.FileName)
            End If

        End With
    End Sub

End Class

Private Sub ListViewEx1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListViewEx1.MouseClick
        txt_Code.Text = ListViewEx1.SelectedItems(0).SubItems(0).Text
        txt_Surname.Text = ListViewEx1.SelectedItems(0).SubItems(1).Text
        txt_Lastname.Text = ListViewEx1.SelectedItems(0).SubItems(2).Text
        Combo_Gen.Text = ListViewEx1.SelectedItems(0).SubItems(3).Text
        txt_Address.Text = ListViewEx1.SelectedItems(0).SubItems(4).Text
        txt_Occu.Text = ListViewEx1.SelectedItems(0).SubItems(5).Text
        txt_Tel.Text = ListViewEx1.SelectedItems(0).SubItems(6).Text
        txt_Email.Text = ListViewEx1.SelectedItems(0).SubItems(7).Text
       Dt_Register.Text = ListViewEx1.SelectedItems(0).SubItems(8).Text
        PictureBox.Text = ListViewEx1.SelectedItems(0).SubItems(9).Text
    End Sub