asp中调用sql server的存储过程

[leafzhou]

set conn=server.CreateObject("adodb.connection")
conn.Open Application("CnnFed2000_ConnectionString")
set cmd=server.CreateObject("adodb.command")
cmd.ActiveConnection=conn
cmd.CommandType=4
cmd.CommandText="product_look"
cmd.Parameters.Append cmd.CreateParameter("product_no",adVarChar,adParamIntput,30) ---------这行提示有错
应用程序使用的参数或者类型不正确，或者不在可以接受的范围之内，要不就是与其他数据冲突。

cmd.Parameters.Append cmd.CreateParameter("begin_time",addatetime,adParamIntput,8)

cmd.Parameters.Append cmd.CreateParameter("end_time",addatetime,adParamIntput,8)

cmd.Parameters.Append cmd.CreateParameter("product_count",adint,adParamOutput,4)

cmd("product_no")=rs.Fields("max_productno")
cmd("begin_time")=begin_time
cmd("end_time")=end_time
cmd.Execute
cmd("product_count")

请问是何原因，谢谢!

[BrentIvan]

Asp不认识adParamIntput， 你可以把Adovbs.inc包进来，或者把它换成对应的数值

[leafzhou]

多谢，那能找到对应的数值呢？

[shengjian_abc]

1,应该现行定义常量
2，你的参数的顺序要跟存储过程中的参数顺序一样
3，变量的定义类型要跟存储过程中的类型一样

[BrentIvan]

你可以查MSDN中ADODB.Command的帮助，或者在硬盘上搜索adovbs.inc

'---- DataTypeEnum Values ----
Const adEmpty = 0
Const adTinyInt = 16
Const adSmallInt = 2
Const adInteger = 3
Const adBigInt = 20
Const adUnsignedTinyInt = 17
Const adUnsignedSmallInt = 18
Const adUnsignedInt = 19
Const adUnsignedBigInt = 21
Const adSingle = 4
Const adDouble = 5
Const adCurrency = 6
Const adDecimal = 14
Const adNumeric = 131
Const adBoolean = 11
Const adError = 10
Const adUserDefined = 132
Const adVariant = 12
Const adIDispatch = 9
Const adIUnknown = 13
Const adGUID = 72
Const adDate = 7
Const adDBDate = 133
Const adDBTime = 134
Const adDBTimeStamp = 135
Const adBSTR = 8
Const adChar = 129
Const adVarChar = 200
Const adLongVarChar = 201
Const adWChar = 130
Const adVarWChar = 202
Const adLongVarWChar = 203
Const adBinary = 128
Const adVarBinary = 204
Const adLongVarBinary = 205
Const adChapter = 136
Const adFileTime = 64
Const adPropVariant = 138
Const adVarNumeric = 139
Const adArray = &H2000


'---- ParameterDirectionEnum Values ----
Const adParamUnknown = &H0000
Const adParamInput = &H0001
Const adParamOutput = &H0002
Const adParamInputOutput = &H0003
Const adParamReturnValue = &H0004

[leafzhou]

谢谢各位，问题已经解决了。