将参数传递给经典asp的存储过程

时间:2011-06-16 08:32:59

标签: sql stored-procedures vbscript asp-classic

之前我曾经问了一个类似的问题,虽然我试图修复我以前的代码但我现在最终得到一个错误“参数类型错误,超出可接受的范围,或者彼此冲突”。我想传递一个字符作为参数来查询数据库,然后使用记录集打印到网页。我的经典asp代码在

之下
Set objCon = CreateObject("ADODB.Connection")
Set objRS = CreateObject("ADODB.Recordset")
set objComm = CreateObject("ADODB.Command")

objCon.ConnectionString = "Provider=SQLOLEDB.1;Password=xxxx;Persist Security Info=True;User ID=xxxx;Initial Catalog=Movies;Data Source=xxxx-PC"
objCon.open objCon.ConnectionString

objComm.ActiveConnection = objCon.ConnectionString
objComm.CommandText = "Paging_Movies"
objComm.CommandType = adCmdStoredProc

Set objParameter = objComm.CreateParameter
objParameter.Name = "alphaChar"
objParameter.Type = adChar
objParameter.Direction = adParamInput
objParameter.Value = "a"

objComm.Parameters.Append objParameter

set objRs = objComm.Execute

我的存储过程也在下面 -

CREATE PROCEDURE Paging_Movies
@alphaChar char(1)
AS
if @alphaChar = '#'
    select * from Movies where movies like '[^a-z]%'
else
    select * from Movies where movies like @alphaChar + '%'

1 个答案:

答案 0 :(得分:0)

也许你要两次添加参数。尝试替换:

objComm.ActiveConnection = objCon.ConnectionString
objComm.CommandText = "Paging_Movies"
objComm.CommandType = adCmdStoredProc

Set objParameter = objComm.CreateParameter
objParameter.Name = "alphaChar"
objParameter.Type = adChar
objParameter.Direction = adParamInput
objParameter.Value = "a"

Set objParameter = objCommand.CreateParameter ("alphaChar", adChar, _
    adParamInput, "a")

objComm.Parameters.Append objParameter

只是:

objCommand.CreateParameter ("alphaChar", 129, 1, 1, "a")

当您的评论建议使用W3Schools CreateParameter page中的adChar(129)和adParamInput(1)的数值时进行编辑。