我有一个我正在解析的产品的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而不是ID变量的实际值列出了SQL查询。
谢谢你们
答案 0 :(得分:0)
我假设这是一项特殊的工作,因为你本质上想要创建一个INSERT语句的文本文件。在这种情况下,您甚至不想处理SQL对象。我甚至不打扰VB.NET,只使用VB脚本。或者您可以使用Excel格式化INSERT命令并将其复制并粘贴到文本文件中。