Question

我目前正在尝试在经典ASP中启动存储过程，但是遇到了错误800a0bb9。

<%
Dim Command1__ChRef
Command1__ChRef = ""
if(Request("ChRef")  <> "") then Command1__ChRef = Request("ChRef") 

Dim Command1__ChLabelCheck
Command1__ChLabelCheck = ""
if(Request("ChLabelCheck")  <> "") then Command1__ChLabelCheck = Request("ChLabelCheck") 

Dim Command1__ChVehicleCheck
Command1__ChVehicleCheck = ""
if(Request("ChVehicleCheck")  <> "") then Command1__ChVehicleCheck = Request("ChVehicleCheck") 

Dim Command1__ChPaperworkCheck
Command1__ChPaperworkCheck = ""
if(Request("ChPaperworkCheck")  <> "") then Command1__ChPaperworkCheck = Request("ChPaperworkCheck") 

Dim Command1__ChLoadAccepted
Command1__ChLoadAccepted = ""
if(Request("ChLoadAccepted")  <> "") then Command1__ChLoadAccepted = Request("ChLoadAccepted") 

%>
<%
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_WebSalesSQL_STRING
Command1.CommandText = "dbo.ErgUpdateTechnicalReceiptChecks"
Command1.Parameters.Append Command1.CreateParameter("@RETURN_VALUE", 3, 4)
Command1.Parameters.Append Command1.CreateParameter("@ChRef", 3, 1,10,Command1__ChRef)
Command1.Parameters.Append Command1.CreateParameter("@ChLabelCheck", 901, 1,10,Command1__ChLabelCheck)
Command1.Parameters.Append Command1.CreateParameter("@ChVehicleCheck", 901, 1,10,Command1__ChVehicleCheck)
Command1.Parameters.Append Command1.CreateParameter("@ChPaperworkCheck", 901, 1,10,Command1__ChPaperworkCheck)
Command1.Parameters.Append Command1.CreateParameter("@ChLoadAccepted", 901, 1,10,Command1__ChLoadAccepted)
Command1.CommandType = 4
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()
%>

存储过程需要一点。我已将其设置为一点，但错误指出类型不匹配？我应该将其作为整数（“ 1”）传递吗？我觉得这很简单。

任何帮助将不胜感激。预先感谢。

Answer 1

解决方案是将位设置为整数，其余部分由SQL数据库完成。

ADODB错误800a0bb9;位还是整数？

1 个答案: