如何將列表框的全部內容發送到SQL數據庫？

-2

對於列表框加載txt文件，現在我想把內容發送到sql數據庫，其中有兩個表m.in用戶，通信 http://obrazki.elektroda.pl/8069892000_1409841532.png 如何添加所有項目同時記錄在表中用id用戶？ ex。 http://obrazki.elektroda.pl/5048367700_1409841766.png 如何將列表框的全部內容發送到SQL數據庫？

以下方法僅在選擇一個項目時起作用。

Dim con As New MySqlConnection 
     Dim cmd As New MySqlCommand 
     Try 
      con.ConnectionString = "Server = x; User ID = x; Password = x; Database = x;" 
      con.Open() 
      cmd.Connection = con 
      cmd.CommandText = "insert into ycomm (user, comm) values ('" & ListView2.Items (0) .SubItems (0) .Text & "', '" & ListBox1.SelectedItem & "')" 
      cmd.ExecuteNonQuery() 

     Catch ex As Exception 

     Finally 
      con.Close() 
     End Try 
     Call showData()

來源

2014-09-04 Martin Garsson

當你選擇的項目，因爲你指定'ListBox1.SelectedItem'，毫不奇怪它僅適用。 – Plutonix 2014-09-04 15:01:45

我知道，但如何插入所有項目？ – 2014-09-04 15:28:46

是一個詭計問題嗎？通過所有的ListBox1.Items並插入它們 - 你回答了你自己的問題 – Plutonix 2014-09-04 15:31:17

我發現這個，但是現在dees工作，哪裏有問題？

替換：

cmd.CommandText = "insert into ycomm (user, comm) values ('" _ 
& ListView2.Items(0).SubItems(0).Text & "', '" & ListBox1.SelectedItem & "')"

隨着

cmd.CommandText = "INSERT INTO ycomm (user, comm) VALUES(@user, @comm)" 

    cmd.Parameters.AddWithValue("@user", ListView2.Items(0).SubItems(0).Text) 
    cmd.Parameters.Add("@comm", SqlDbType.VarChar) 

    For i As Integer = 0 To lst.Items.Count 
     cmd.Parameters("@comm").Value = lst.Items(i).Text 
     cmd.ExecuteNonQuery() 
    Next

來源

2014-09-04 16:45:20

如何將列表框的全部內容發送到SQL數據庫？

回答

相關問題