Question

我有以下代码来遍历我的数据表（dtItem）并将每一行插入数据库。但是，我只能插入数据表的最后一行。我如何插入所有行？这是我的代码。

Dim dtRow As DataRow

            For Each dtRow In dtItem.Rows

                dtRow.ToString.Split("|")

                Dim xBinCode As String = dtRow(0)
                Dim xLocationCode As String = dtRow(7)
                Dim xItemNo As String = dtRow(1)
                Dim xQuantity As String = dtRow(2)
                Dim xCountNo As String = dtRow(8)

                cmd.CommandText = "INSERT INTO tblItems (BinCode, LocationCode, ItemNo, Quantity, CountNo) values('" & xBinCode & "','" & xLocationCode & "','" & xItemNo & "','" & xQuantity & "','" & xCountNo & "')"

            Next

Answer 1

如果使用数据读取器，则需要打开连接并使用命令

cmd.ExecuteNonQuery

之后

cmd.CommandText = "INSERT INTO tblItems (BinCode, LocationCode, ItemNo, Quantity, CountNo) values('" & xBinCode & "','" & xLocationCode & "','" & xItemNo & "','" & xQuantity & "','" & xCountNo & "')"

语句

Answer 2

看起来你在这里遗漏了一些东西。

在发送到服务器之前，您可以对每行的SQL插入句子进行连接。

如果要一次发送一行，请在for循环中配置并执行命令。

您也可以使用DbDataAdapter。在以下页面中发布：

http://msdn.microsoft.com/es-es/library/at8a576f(v=vs.90).aspx

http://msdn.microsoft.com/es-es/library/system.data.sqlclient.sqldataadapter.insertcommand(v=vs.90).aspx

VB.NET将数据表行插入SQL数据库

2 个答案: