0

我有一个产品的 CSV 文件，我正在解析以创建一个 SQL 文件并最终在数据库上运行以添加产品。

我正在创建这样的查询：

 Dim sql As String = "INSERT INTO ""APP"".""PRODUCTS"" (ID,REFERENCE,CODE,CODETYPE,NAME,PRICEBUY,PRICESELL,CATEGORY,TAXCAT,ATTRIBUTESET_ID,STOCKCOST,STOCKVOLUME,IMAGE,ISCOM,ISSCALE,ISKITCHEN,ATTRIBUTES) VALUES (@ID,@REFERENCE,@CODE,@CODETYPE,@NAME,@PRICEBUY,@PRICESELL,@CATEGORY,@TAXCAT,@ATTRIBUTESET_ID,@STOCKCOST,@STOCKVOLUME,@IMAGE,@ISCOM,@ISSCALE,@ISKITCHEN,@ATTRIBUTES)"
        Dim cmd As New SqlCommand(sql)
        cmd.Parameters.AddWithValue("@ID", ID)
        cmd.Parameters.AddWithValue("@REFERENCE", REFERENCE)
        cmd.Parameters.AddWithValue("@CODE", CODE)
        cmd.Parameters.AddWithValue("@CODETYPE", CODETYPE)
        cmd.Parameters.AddWithValue("@NAME", NAME)
        cmd.Parameters.AddWithValue("@PRICEBUY", PRICEBUY)
        cmd.Parameters.AddWithValue("@PRICESELL", PRICESELL)
        cmd.Parameters.AddWithValue("@CATEGORY", CATEGORY)
        cmd.Parameters.AddWithValue("@TAXCAT", TAXCAT)
        cmd.Parameters.AddWithValue("@ATTRIBUTESET_ID", ATTRIBUTESET_ID)
        cmd.Parameters.AddWithValue("@STOCKCOST", STOCKCOST)
        cmd.Parameters.AddWithValue("@STOCKVOLUME", STOCKVOLUME)
        cmd.Parameters.AddWithValue("@IMAGE", IMAGE)
        cmd.Parameters.AddWithValue("@ISCOM", ISCOM)
        cmd.Parameters.AddWithValue("@ISSCALE", ISSCALE)
        cmd.Parameters.AddWithValue("@ISKITCHEN", ISKITCHEN_NEW)
        cmd.Parameters.AddWithValue("@ATTRIBUTES", ATTRIBUTES)

但是我不希望通过 .NET 执行它们，我怎样才能简单地将查询（替换参数）导出到文本框，每个查询一行。（此代码在循环中运行，这是针对该循环中的一个产品）

我尝试了 cmd.CommandText 但它只是列出了带有@ID 的 SQL 查询，而不是 ID 变量的实际值。

多谢你们

4

1 回答 1

0

我假设这是一项临时工作，因为您本质上想要创建一个 INSERT 语句的文本文件。在这种情况下，您甚至不想处理 SQL 对象。我什至不会打扰 VB.NET，只需使用 VB 脚本。或者您可以只使用 Excel 格式化您的 INSERT 命令并将其复制并粘贴到文本文件中。

于 2012-10-20T17:18:02.300 回答