asp操作有返回值的存储过程

'asp操作有返回值的存储过程Set Cmd_Rs = Server.CreateObject("Adodb.Command")Set Cmd_Rs.ActiveConnection = ConnCmd_Rs.CommandText = "pr_UpDateChatRoom" '存储过程名称Cmd_Rs.Parameters.Append Cmd_Rs.CreateParameter("RETURN_VALUE",2,4) '返回值Cmd_Rs.Parameters.Append Cmd_Rs.CreateParameter("@a",20,1,8,a)   'bigint 长度8Cmd_Rs.Parameters.Append Cmd_Rs.CreateParameter("@b",200,1,-1,b)  'varchar(max)Cmd_Rs.Parameters.Append Cmd_Rs.CreateParameter("@c",200,1,-1,c)  'varchar(max)Cmd_Rs.Parameters.Append Cmd_Rs.CreateParameter("@d",3,1,4,d)   'int 长度4Cmd_Rs.Execute()Cmd_Status = Cmd_Rs.Parameters("RETURN_VALUE") '返回值Set Cmd_Rs.ActiveConnection = nothingSet Cmd_Rs = nothing