Question

我正在尝试使用ADODB运行参数化SQL查询，但我收到错误消息“必须声明标量变量@Id”。

我是VBA的一个完整的菜鸟，我已经尝试过阅读它是如何完成的以及一个例子，但无济于事。

有没有人知道我的代码可能出现什么问题？

post.setComments(new ArrayList<>());

Answer 1

不要使用参数，将值构建到字符串中

 Public Function IndataTest()


 Dim conn As ADODB.Connection
 Dim ConnString As String
 ConnString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Data Source=DB;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=B5037093;Use Encryption for Data=False;Tag with column collation when possible=False;Initial Catalog=DB"
  Dim sqlstr As String 
  Dim rs As new adodb.recordset
  Set conn = New ADODB.Connection 
  conn.Open ConnString

  sqlstr = "use DB " 
  sqlstr = sqlstr & "Select * " & vbCrLf 
  sqlstr = sqlstr & "From tblA" & vbCrLf 
  sqlstr = sqlstr & "where fldA = "  & 1084924
  set rs = conn.execute(sqlstr)

等

VBA：使用ADODB参数

1 个答案: