cmd.Execute() 报错行只有这么一段代码，如何调试错误在哪

geniuswjt 2011-02-21 10:17:43

[code=JScrip] if request.form("oper") = "channelUpdate" then
set cmd.ActiveConnection=cn

cmd.CommandText="{call proc_channelUpdate_for_admin(?,?,?,?,?,?,?,?,?,?,?)}"

cmd.Parameters.Append cmd.CreateParameter("@c_id",adInteger,adParamInput)
cmd("@c_id")=request.Form("c_id")
cmd.Parameters.Append cmd.CreateParameter("@c_name",adVarChar,adParamInput,40 )
cmd("@c_name")=request.form("c_name")
cmd.Parameters.Append cmd.CreateParameter("@u_loginname",adVarChar,adParamInput,20 )
cmd("@u_loginname")=request.form("u_loginname")
cmd.Parameters.Append cmd.CreateParameter("@u_pass",adVarChar,adParamInput,32 )
cmd("@u_pass")=request.form("u_pass")
cmd.Parameters.Append cmd.CreateParameter("@p_startnum",adInteger,adParamInput)
cmd("@p_startnum")=request.form("p_startnum")
cmd.Parameters.Append cmd.CreateParameter("@p_endnum",adInteger,adParamInput)
cmd("@p_endnum")=request.form("p_endnum")
cmd.Parameters.Append cmd.CreateParameter("@p_mobileservice",adVarChar,adParamInput,60)
cmd("@p_mobileservice")=request.form("p_mobileservice")
cmd.Parameters.Append cmd.CreateParameter("@p_unicomservice",adVarChar,adParamInput,60)
cmd("@p_unicomservice")=request.form("p_unicomservice")
cmd.Parameters.Append cmd.CreateParameter("@p_telecomservice",adVarChar,adParamInput,60 )
cmd("@p_telecomservice")=request.form("p_telecomservice")
cmd.Parameters.Append cmd.CreateParameter("@p_mobilefeevalue",adInteger,adParamInput)
cmd("@p_mobilefeevalue")=request.form("p_mobilefeevalue")
cmd.Parameters.Append cmd.CreateParameter("@p_unicomfeevalue",adInteger,adParamInput)
cmd("@p_unicomfeevalue")=request.form("p_unicomfeevalue")
cmd.Parameters.Append cmd.CreateParameter("@p_telecomfeevalue",adInteger,adParamInput)
cmd("@p_telecomfeevalue")=request.form("p_telecomfeevalue")
cmd.Parameters.Append cmd.CreateParameter("@result",adVarChar,adParamOutput,50)

cmd.Execute()

result=cmd("@result")

'response.Write(result)
response.Redirect("submit_confirm.asp?operResult="&result)
end if[/code]

...全文