Ayuda con sp_OACreate

Rigo,

Lo primero que debes hacer es INSTANCIAR a tu componente(dll), luego
invocar el metodo o funcion de la clase necesaria.

Ejemplo.

DECLARE @retVal INT
DECLARE @comHandle INT
DECLARE @errorSource VARCHAR(8000)
DECLARE @errorDescripcion VARCHAR(8000)
DECLARE @retString VARCHAR(100)

Declare @objDll

Set @objDll = CreateObject("Proyecto.Clase")

Select @retVal = @objDll.Consultar_Valor()

/* Comentamos estos
EXEC @retVal = sp_OACreate 'prueba.ClasPrueba', @comHandle OUT
*/

IF (@retVal <> 0)
BEGIN
EXEC sp_OAGetErrorInfo @comHandle, @errorSource OUTPUT,
@errorDescripcion OUTPUT
SELECT [Error Source] = @errorSource, [Descripcion] = @errorDescripcion
RETURN
END


Saludos
Hero

"rigoberto" escribió en el mensaje
news:
mi problema es el siguiente: Necesito ejecutar una funcion que se
encuentra en una DLL desde SQL SERVER 2000. Encontre que podia invocar
directamente la dll (a travez de procedimientos almacenados extendido o
algo asi) para prueba cree una dll simple desde visual Basic con
dos funciones (ejemplo tomado desde internet) y al probarla desde el
analizador de consultas o a travez de un procedimiento almacenado de
SQL Server me genera el error de "Acceso denegado". La ejecuto con un
usuario con permisos de administrador(Rol SysAdmin)... pero nada.. Este
es el pedazo de codigo donde la llamo:

DECLARE @retVal INT
DECLARE @comHandle INT
DECLARE @errorSource VARCHAR(8000)
DECLARE @errorDescripcion VARCHAR(8000)
DECLARE @retString VARCHAR(100)

EXEC @retVal = sp_OACreate 'prueba.ClasPrueba', @comHandle OUT

IF (@retVal <> 0)
BEGIN
EXEC sp_OAGetErrorInfo @comHandle, @errorSource OUTPUT,
@errorDescripcion OUTPUT
SELECT [Error Source] = @errorSource, [Descripcion] = @errorDescripcion
RETURN
END

Al principio me generaba error por que no tenia señalado en las
propiedades de SQL el item:"Utilizar intraprocesos de windows NT".

Cualquier ayuda gracias.

Pdta: Si alguien tiene el codigo fuente de cualquier dll que funcione
desde SQL Server me seria de gran ayuda.