在VBScript中调用Output参数的SQL存储过程

Question

我写了一个 VBScript function 来调用存储过程。 过去，我编写了很多调用带输入参数的存储过程的函数，但在本例中，我需要使用 Output 参数。

在另一个应用程序中，我使用实体框架调用完全相同的存储过程，因此存储过程没问题。

这是我的代码：

 Function checkAccess(userid,link) isAllowed = false set cmd = Server.CreateObject("ADODB.Command") cmd.CommandText = "Check_Permission" cmd.ActiveConnection = Conn cmd.NamedParameters = true cmd.CommandType = adCmdStoredProc cmd.Parameters.Append(cmd.CreateParameter("@Login", adVarChar, adParamInput, 50, userId)) cmd.Parameters.Append(cmd.CreateParameter("@LinkId", adInteger, adParamInput, 50, link)) cmd.Parameters.Append(cmd.CreateParameter("@IsAllowed", adBoolean, adParamOutput, 10, isAllowed)) checkAccess = isAllowed End Function

这个 function 总是返回 false。 我如何让它发挥作用？

Answer 1

您应该返回 output 参数的值：

checkAccess = cmd.Parameters("@IsAllowed").Value

此外，ADO 中的 output 参数不需要初始值，adBoolean 参数不需要大小，因此您可以将最后一个参数更改为：

cmd.Parameters.Append(cmd.CreateParameter("@IsAllowed", adBoolean, adParamOutput))

您也可以删除 isAllowed 变量，因为它不再是必需的。