Llamando Dll, pasando valor desde ASP

[skatomundo]

Hola Comuneros espero encuentre una alternativa.

Estoy haciendo una DLL en donde estoy utilizando "ShellExecute" con la finalidad de que abra un docuemento cualquiera en su respectivo software o por defecto definido.

Desde ASP llamo la dll pasando el valor del archivo que necesito abrir, pero en me genera un error de la clase (Cadena clase no valida) no encuentro donde ta error.

Les envió los datos para que vean:

Datos que contiene la DLL:

Proyecto nombre: apr.vbp
Clase nombre: apropen.cls
Funcion definida: aprabre()

este es el code de VB:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long


Public Function aprabre(ByVal doc As String) As Variant
ShellExecute 0, "open", doc, vbNullString, vbNullString, 2
End Function

datos "doc" deberia ser el valor pasado desde ASP.

En la pagina ASP esta esto:

Set oClass = Server.CreateObject("apr.apropen")
Vrecord = oClass.aprabre("ArcView", "C:\1.apr")

esos son los datos..pero no pasa nada...

cualquier ayudita agradecido...

salu2