urgente!!! asp procedimientos almacenados

[mveraa]

encontre este codigo que no me marca error no se como recorrerlo


<%
Command1__Tipo = "d"

Command1__Bodega =1

Command1__Producto = "997bandeja"






Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "Provider=SQLOLEDB.1;Password=softland;Persist Security Info=False;User ID=softland;Initial Catalog=imahe;Data Source=FEMANTECH1"

Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection = cn
cmd.CommandText = "softland.miguel"
cmd.CommandType = 4

// Cmd.Parameters.Append(Cmd.CreateParameter("@RETURN _VALUE", 3, 4))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Tipo", 200, 1,10,Command1__Tipo))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Bodega ", 200, 1,10,Command1__Bodega))
// Cmd.Parameters.Append(Cmd.CreateParameter("@Produc to", 200, 1,10,Command1__Producto))




// cmd.Parameters.Append cmd.CreateParameter("RetVal", adInteger,adParamReturnValue)
// cmd.Parameters.Append cmd.CreateParameter("Param1", adInteger,adParamInput)
' Set value of Param1 of the default collection to 22
cmd("@tipo") = 1
cmd("@bodega") = 1
cmd("@Producto")="997bandeja"
cmd.Execute()

%>
<% Response.Write cmd(0) %> //supuestamente aqui deberia devolver algo pero me devuelve lo que estoy ingresando , y no lo que quiero ver que es resultado