Pregunta: | 5926 - PROBLEMA IMPRIMIR DIRECTAMENTE A LPT! |
Autor: | Jordi Adell |
Hola! Quiero imprimir etiquetas desde VB 6.0, para ello no quiero usar el objeto PRINTER. Los datos que quiero imprimir los recupero de un recordset. Imprimo directamente a LPT1: con DIM Nombre AS String WITH datos.recordset Nom = "NOMBRE : " & .fields("Nombre").value OPEN "LPT1:" FOR OUTPUT AS #1 PRINT #1, Nom CLOSE #1 Este proceso me falla, al llegar a CLOSE #1, se "cuelga" el programa. He probado con: Nom = CStr("NOMBRE : " & .fields("Nombre").value) Nom = "NOMBRE : " + .fields("Nombre").value Y el resultado es igual, pero si asigno: Nom = .fields("Nombre").value funciona perfectamente. Alguien tiene idea de porqué. Gracias y un saludo a todos. |