插入命令 OLE 参数化

Question

解决方案的当前进展：

这是更新后的代码：

sql = "INSERT INTO Strings (String_Name, Long_Text, Short_Text, Alternate_Text, Multi_String_ID, Lang_ID) VALUES (?,?, ?,?,?,?)"

Dim command = New OleDbCommand(sql, pConn)

command.Parameters.AddWithValue("@webStringName", "String_Name")
command.Parameters.AddWithValue("@webLang_String", "Long_Text")
command.Parameters.AddWithValue("@ptsShortText", "Short_Text")
command.Parameters.AddWithValue("@webAltText", "Alternate_Text")
command.Parameters.AddWithValue("@webMultiStringID", "Multi_String_ID")

将上面的行更改为... command.Parameters.AddWithValue("@webMultiStringID", OleDbType.Integer).Value = webMultiStringID

command.Parameters.AddWithValue("@webLang_Code", "Lang_ID")

command.ExecuteNonQuery()

ORIG POST：

我正在尝试使用 OLE 适配器创建和 INSERT 语句。我让它在没有参数的情况下工作，但现在我尝试添加参数并且遇到语法问题。哈

这是到目前为止的代码...

command = New OleDbCommand(sql, pConn)

sql = "INSERT INTO Strings (String_Name, Long_Text, Short_Text) VALUES (?,?, """ & ptsShortText & """)"


command.Parameters.Add("@webStringName", OleDbType.VarChar, 250, "String_Name")
command.Parameters.Add("@webLang_String", OleDbType.VarChar, 250, "Long_Text")

command = New OleDbCommand(sql, pConn)
command.ExecuteNonQuery()

只是试图将前两个变量参数化。

任何建议将不胜感激。

编辑：修复SQL

Answer 1

你做错了什么。首先添加参数：

command.Parameters.Add("@webLang_String", OleDbType.VarChar, 250, "Long_Text")

然后然后用新命令替换该命令（不带参数）：

command = New OleDbCommand(sql, pConn)

因此，您删除了该行中的所有现有参数。这就是为什么它不起作用。

---

您必须按照正确的顺序进行操作：

sql = "INSERT INTO Strings (String_Name, Long_Text, Short_Text) " & _
      "VALUES (?,?, """ & ptsShortText & """)"

Dim command = New OleDbCommand(sql, pConn)  ' First create the command

' Then add the parameters to the command
command.Parameters.AddWithValue("@webStringName", "String_Name")
command.Parameters.AddWithValue("@webLang_String", "Long_Text")

' Then execute the command. (DON'T recreate it with New OleDbCommand here,
' that would throw away all you've done so far.)
command.ExecuteNonQuery()