袁姗姗李易峰的恋情:形式参数 '@From_SiteQueryStr' 定义为 OUTPUT，但实际参数却未声明为 OUTPUT。

'Str_Money="20"

frominfo = Request.Cookies("yidefrom")
If not IsEmpty(frominfo) and not IsNull(frominfo) and frominfo <> "" Then
session("From_newID")=cstr(frominfo)
int_FromSiteID=Cint(frominfo)
str_Querystring=Request.Cookies("Querystr")
'if int_FromSiteID > 0 then
'Str_AgioDictID=6
'Str_Money="50"
'end if
else
int_FromSiteID=0
end if

set objCmd = server.CreateObject("Adodb.Command")
with objCmd
.ActiveConnection = conn
.CommandText = "usr_SaveUserRegData"
.CommandType = 4

set parms = .CreateParameter("@User_LoginID", 130, 1, 50, strUser_LoginID)
.Parameters.Append(parms)
set parms = .CreateParameter("@User_Password", 130, 1, 256, MD5(strUser_Password,32))
.Parameters.Append(parms)
set parms = .CreateParameter("@Commend", 130, 1, 100, strCommend)
.Parameters.Append(parms)
set parms = .CreateParameter("@From_SiteID", 3 , 1, 4, Int_FromSiteID)
.Parameters.Append(parms)
set parms = .CreateParameter("@From_SiteQueryStr",130 , 1,300, str_Querystring)
.Parameters.Append(parms)
set parms = .CreateParameter("@User_ID", 130 , 3, 100, null)
.Parameters.Append(parms)
set parms = .CreateParameter("@Return_Message",130,3,50,null)
.Parameters.Append(parms)
set parms = .CreateParameter("@Commend_istrue",3,3,4,null)
.Parameters.Append(parms)
.Execute
end with

if err.number <> 0 then
Response.Redirect "../error/error.asp?errorMsg="&err.Description
else

一段出错的代码如上，请帮忙解决下