Ver Mensaje Individual
  #5 (permalink)  
Antiguo 13/03/2006, 11:03
k3n
 
Fecha de Ingreso: marzo-2006
Mensajes: 56
Antigüedad: 19 años, 2 meses
Puntos: 0
Ya Me Dieron Una Rpta Y Ya Funciona

Holas de nuevo. Me dieron una rpta que hace funcionar la página, pero no entiendo muy bien porqué.

Todo empieza en la línea de conexión a la base de datos que no estaba mal, porque sí podía obtener datos de esta, sino que parece que el uso del "on error resume next" alteraba muchas cosas. Cuando le quitaron esta parte, aparecieron algunos errores sobre el uso de argumentos no válidos. En ese caso, se tuvieron que hacer los siguientes cambios.

ANTES:

set MostTodosExp = Server.CreateObject("ADODB.Command")
MostTodosExp.ActiveConnection = obj
MostTodosExp.CommandText = "KENNY.SPU_ULTIMUS_BUSCAEXP"
MostTodosExp.CommandType = adCmdStoredProc
set parametro1 = MostTodosExp.CreateParameter("tipbusq",adVariant,a dParamInput,,2)
MostTodosExp.Parameters.Append parametro1
set SalidaMostTodosExp = MostTodosExp.Execute

AHORA:

set MostTodosExp = Server.CreateObject("ADODB.Command")
MostTodosExp.ActiveConnection = obj
MostTodosExp.CommandText = "KENNY.SPU_ULTIMUS_BUSCAEXP"
MostTodosExp.CommandType = 2
set parametro1 = MostTodosExp.CreateParameter("tipbusq",12,1,,2)
MostTodosExp.Parameters.Append parametro1
set SalidaMostTodosExp = MostTodosExp.Execute

Me dicen que los adCmdStoredProc y etc, se utilizaban para Visual Basic, pero no para ASP. Como les dije, no entendí muy bien, pero me funciona sin problemas. Ah, también tuve que cambiar el:

SalidaMostTodosExp.Nothing

por

Set SalidaMostTodosExp = Nothing

La pregunta ha cambiado, entonces. ¿Porqué es que ahora debo usar esos números, y porqué es que me anduvo funcioando sin problemas anteriormente?
¿Porqué nadie más utiliza este tipo de código? Porque como dije, en muchos ejemplos no he visto nada igual.