存储过程是返回值怎么是空?
<!--#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之类的常数是不认的。