Abrir archivo con libreria hecha en VB

[Juan-jo]

Que tal buen dia. Expongo mi caso, espero que me entiendan y alguien pueda darle luz a este problemilla

Resulta que necesito abrir un archivo de texto que contiene codigo ZPL (ese que se usa para enviar a imprimir etiquetas en impresoras Zebra) y despues enviar a imprimir.

El asunto es que, hice el codigo en Visual Basic 6, tambien hice la Dll. La DLL funciona perfectamente, esto porque la probe en mismo VB. Ahora, quiero llamar la DLL desde ASP.

Ahora, la DLL recibe como parametro el nombre del archivo. En el caso de VB esta como 'Sub printIt (nombreArchivo as String)' y desde visual basic solo le paso el nombre: 'printIt "Formato.zpl"

No he logrado pasar el parametro, el nombre del archivo a traves de ASP... pudiera alguien esclarecer este asunto?

Les agradezco mucho su valiosa ayuda.
:D

[Juan-jo]

El error que me devuelve el ASP...
Tipo de error:
ImprimirEtiqueta (0x800A0035)
No se ha encontrado el archivo
/labelSite/imprimir2.asp, línea 33

[mc_quake]

Iniciado por Juan-jo

El error que me devuelve el ASP...
Tipo de error:
ImprimirEtiqueta (0x800A0035)
No se ha encontrado el archivo
/labelSite/imprimir2.asp, línea 33

dice que el archivo imprimir2.asp no existe en la ruta

lo otro si usas dll debes registrarla en el server:
http://www.hormiga.org/dll/registrar_archivos_dll.html

[Juan-jo]

Iniciado por mc_quake

dice que el archivo imprimir2.asp no existe en la ruta

lo otro si usas dll debes registrarla en el server:
[url]http://www.hormiga.org/dll/registrar_archivos_dll.html[/url]

Gracias por responder...
De hecho marca el error cuando hago la llamada a la DLL
La DLL si la registre, de hecho, volvi a hacerlo para comprobar y aun asi no jala.

Al parecer me dice que el archivo que no encuentra es el archivo 'Formato1.zpl'

He aqui el codigo
________
Set ObjPrint = Server.CreateObject("ImprimirEtiqueta.sendToPrint" )
Set ObjFile = Server.CreateObject("Scripting.FileSystemObject")

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists(Server.MapPath("Formato1.zpl")) Then
Response.Write("OK to Access")'OK to access the file.
Set objFile = objFSO.OpenTextFile(Server.MapPath("Formato1.zpl") ,1)
Else
Response.Write("File Not Found")'File not found.
End If



ObjPrint.printIt Server.MapPath("Formato1.zpl")
______________________

La funcion printIt recibe como parametro la ruta del archivo...
En el if de FILEEXISTS, devuelve que si existe...

[Juan-jo]

Depurando, depurando... detecte cual debe ser el problema....

En la DLL mando a imprimir, pero mando imprimir al puerto... esto es
>>Open "LPT1" For Output As 3

Y ahi es donde me marca el error... trata de abrir realmente como si fuera un archivo...
Bien, ahora investigare acerca de como usar el puerto en ASP
Cualquier ayuda es bienvenida. Gracias por leer