存储过程是返回值如何是空

存储过程是返回值怎么是空？
<!--#include   file= "conn_andy_test.asp "   -->
<%
Set   cmdTemp=Sever.CreateObject( "ADODB.Command ")    
'建立命令对象
Set   cmdTemp.ActiveConnection   =   Conn
cmdTemp.CommandType=adCMdStoredProc    
'指定要执行的是一个存储过程
cmdTemp.CommandText= "Pro_QbType "    
'存储过程名称
Set   tmpFirstParam=cmdTemp.CreateParameter( "SftId ",adVarChar,adParamIntput,10)  
'创建输入参数对象  
cmdTemp.Parameters.Append.tmpFirstParam    
'把参数加到参数集合
Set   tmpSecondParam_s=cmdTemp.CreateParameter( "QBValues ",adVarChar,adParamInput,4)
cmdTemp.ParaMeters.Append   tmpSecondParam_s
Set   tmpThirdParam_o=cmdTemp.CreateParameter( "QBcode ",adChar,adParamOutput,20)  
cmdTemp.ParaMeters.Append   tmpSecondParam_o      
'创建返回参数对象
cmdTemp.Parameters.Append   tmpThirdParamcmdTemp( "StfId ")=Request.FORM( "StfId ")  
'取得输入参数  
cmdTemp( "QBValues ")=Request.FORM( "QBValues ")
cmdTemp.Execute    
'执行存储过程
%>
<%   Response.Write( "| ")%>  
<%   Response.Write(QBcode)%>
<%   Response.Write( "| ")%>  
<%
DataConn.Close    
'关闭数据库连接
%>


[解决办法]
third才是output的参数，而不是second
[解决办法]
adodb.vbs包进来没有？
没包进来的话像adParamIntput之类的常数是不认的。