ASP - Extraer el valor de un parametro de salida (Output

Hola a todos,
Tengo el siguiente problema, en un procedimiento almacenado quiero recuperar el valor de los parametros de salida, si lo ejecuto por el query analizer me resulta todo bien, me muestra los resultados pero al intentar hacerlo por asp me muestra las variable vacias y nose pq. porfa alguien q me ayude. muestro masmenos como actualmente esta el codigo.

Set rs = Server.CreateObject("Adodb.Recordset")
Set cmd = Server.CreateObject("Adodb.Command")

Const adCmdStoredProc = 4
Const adParamInput = 1
Const adParamOutput = 2
Const adInteger = 3
Const adVarchar = 200

cmd.ActiveConnection = base
cmd.CommandText = "sp_inf_pos_habilidad"
cmd.CommandType = adCmdStoredProc
cmd.CommandTimeout = 30
cmd.Parameters.Append cmd.CreateParameter("@Opcion", adInteger,adParamInput,, 1)
cmd.Parameters.Append cmd.CreateParameter("@Llamado",adInteger,adParamInput,,Llamado)
cmd.Parameters.Append cmd.CreateParameter("@Pgm_Cod",adInteger,adParamInput,,Titulo)
cmd.Parameters.Append cmd.CreateParameter("@Err_Cod",adInteger,adParamOutput)
cmd.Parameters.Append cmd.CreateParameter("@Mensaje",adVarchar,adParamOutput,50)
set rs = cmd.execute

Response.Write(titulo & "-" & llamado & "-" & cmd.Parameters("@Mensaje").Value)
Response.End()