web*_*orm 2 vba stored-procedures ado return-value
我有一个更新表中值的 SQL Server 2008 存储过程。我想让存储过程返回一个整数值,指示更新成功(返回 0)或不成功(返回错误号)。通过 ADO 和 VBA 实现这一目标的最佳方法是什么?这是我的一些执行更新的简化形式的代码......我只是不确定如何取回存储过程的返回值
Public Function DoUpdate(employeeID as integer, firstName as string, lastname as string) as integer
  Dim cnn As ADODB.Connection
  Dim cmd As ADODB.Command
  Dim activeConnectionString As String
  activeConnectionString = GetActiveConnectionString()
  Set cnn = New ADODB.Connection
  cnn.ConnectionString = activeConnectionString
  cnn.CursorLocation = adUseClient
  cnn.Open
  Set cmd = New ADODB.Command
  cmd.ActiveConnection = cnn
  cmd.CommandType = adCmdStoredProc
  cmd.CommandText = "uspUpdateEmployeeName"
  cmd.NamedParameters = True
  cmd.Parameters("@EmployeeID").Value = employeeID 
  cmd.Parameters("@FirstName").Value = firstName
  cmd.Parameters("@LastName").Value = lastName
  cmd.Execute
  'Unsure of how to get back return value here
  'DoUpdate = returnValue
  Set cnn = Nothing
End Function
Run Code Online (Sandbox Code Playgroud)
    注意:return_value必须是第一个参数!
订单很重要。
"had too many arguments"当我return_value最后而不是第一个指定参数时,我收到错误消息,指出我的查询。
参数的顺序是我出错的原因。