Directo a Zebra S4M por USB

[[cHackAll]]

Si usas "net use" significa que es una impresora en red? talvez si nos muestras como usas ese "archivo de texto".

Saludos

[manueljgc]

Es una impresora local Zebra S4M conectada al puerto USB.
El archivo de texto contiene secuencia de caracteres para generar
las etiquetas. Ejemplo: ^BN^0013

La cuestión es enviar el archivo directamente al puerto USB002.

Saludos, muchas gracias.

[[cHackAll]]

Código Delphi [-]
//...
 hDevice := CreateFile('\\.\USB002',GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0);  
 WriteFile(hFile, Buffer, Count, Dummy);

[manueljgc]

Empezado por cHackAll

Código Delphi [-]
//...
 hDevice := CreateFile('\\.\USB002',GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0);  
 WriteFile(hFile, Buffer, Count, Dummy);

Gracias. Pero podría explicar, por favor.

Podría explicar la declaración de variables y que hace el código.

Creo que a WriteFile le falta un parámetro.

Hice la prueba pero no me funciona. Ajuste el código según
mi criterio.

Puede ser un poco más claro por favor.

Muchas gracias y disculpe.

Saludos.

[[cHackAll]]

Si bueno disculpa manueljgc, efectivamente le falta un parametro a la segunda API...

Lo que te insinué con dicho codigo es que abras el dispositivo como tal (un dispositivo), usando CreateFile deberias lograrlo, y solo te puse esas dos lineas para saber si es el camino correcto.

PD; el ultimo parametro de WriteFile debiese ser "nil", aunque basta si hDevice (Cardinal) es distinto a INVALID_HANDLE_VALUE

Saludos

[[seoane]]

Una pregunta chackall ¿se puede abrir el puerto usb de esa manera?. Ahora mismo no puedo comprobarlo, pero creo recordar que en su momento probé a hacerlo de esa manera y no funciono. Al final tuve que hacerlo usando las funciones de la API para manejar las impresoras.

[juanelo]

Estoy seguro que esto te puede ayudar, tenia el mismo problema y ya quedo solucionado.
Saludos