您应该返回输出参数的值:
checkAccess = cmd.Parameters("@IsAllowed").Value另外,ADO中的输出参数不需要初始值,而adBoolean参数不需要大小,因此您可以将最后一个参数更改为:
cmd.Parameters.Append(cmd.CreateParameter("@IsAllowed", adBoolean, adParamOutput))您也可以摆脱isAllowed变量,因为它不再需要。

您应该返回输出参数的值:
checkAccess = cmd.Parameters("@IsAllowed").Value另外,ADO中的输出参数不需要初始值,而adBoolean参数不需要大小,因此您可以将最后一个参数更改为:
cmd.Parameters.Append(cmd.CreateParameter("@IsAllowed", adBoolean, adParamOutput))您也可以摆脱isAllowed变量,因为它不再需要。