من مي خواستم آيتمهاي يك ليست باكس كه شامل نام و نام خانوادگي است كه يه صورت زير در ليست باكس قرار مي گيرد را با كد زير به بانك اطلاعاتي بفرستم ولي همش خطا مي گيرد.
دوستان اگر لطف كنند مشكل من را بگويند ممنون مي شوم.
نحوه قرار گيري در ليست باكس:علي-محمدي
كد من:
For i As Integer = 0 To Li1.Items.Count - 1
Dim Myarr As String() = Li1.Text.Split(New Char() {"-"c})
con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\jma.mdb")
Dim strSQL As String = _
"INSERT INTO tase2 (name,family)" & _
"VALUES (@name,@family)"
Dim cmd As New OleDbCommand(strSQL, con)
With cmd
.Parameters.Add(New OleDbParameter("@name", Myarr))
.Parameters.Add(New OleDbParameter("@family", Myarr))
End With
con.Open()
cmd.ExecuteNonQuery()
con.Close()
Next