Visual Basic - Desesperado...No puedo llamar Stored Procedure

Hola amigos del Foro llevo casi 1 dia batallando con un stored que no puedo mandar llamar, bueno aqui les pongo un poco de lo que hago...

sSql5 = "exec lineas_pagadas " & MI
LP = myConnection.Execute(sSql5)

donde mi stored es lineas_pagadas, MI un entero, LP lo declare como object para despues compararlo en un if asi ... if LP(O).Value = ......

Ahora aqui mando el stored

CREATE procedure lineas_pagadas
@folio int
as
SELECT COUNT(*) AS Expr1
FROM Contrato_Abonos
WHERE (FechaPago BETWEEN DATEADD(mm, DATEDIFF(mm, 0, GETDATE()), 0) AND DATEADD(ms, - 3, DATEADD(mm, DATEDIFF(m, 0, GETDATE()) + 1, 0))) AND
(FolioContrato IN
(SELECT contratos.foliocontrato
FROM contratos
WHERE contratos.foliomaster = @folio)
GO

A este stored se le envia el parametro MI , que seria el Folio, y lo que hace es sacar registros de 2 tablas en ciertas fechas.
Pero al correrlo en VB6 no hace nada, no marca errores porque es una dll que primero hago y luego compilo, entonces ni break points puedo, lo ke hago es poner msgbox, pero por ejemplo le pongo ke me imprima en un msgbox el valor de sSql5 y me lo pone bien :
exec lineas_pagadas 2, pero al pasar a la siguiente linea se corta.

Espero me puedan ayudar estoy un poco desesperado!
GRACIAS!!!