Problemas con "Ñ"
Publicado por Reynaldo Herrera (34 intervenciones) el 02/07/2003 18:00:17
Tengo un problema al imprimir facturas en una impresora de matriz, el codigo que utilizo es el sig:
Open "LPT1:" For Output As #1
Print #1, ""
Print #1, ""
Print #1, Space(60) & Combo1.Text
Print #1, ""
Print #1, Space(25) & TxtRazon.Text
Print #1, Space(25) & Padr(adoClientesRS("Cli_Direccion")
Print #1, Space(25) & TxtCliente.Text
Print #1, ""
Print #1, ""
Close # 1
El problema es que no imprime las "Ñ" imprime caracteres raros
que me sugieren.
PD. la forma de impresion tiene que ser de esta forma ose abrir el puerto lpt como un archivo y escribir en el.
Gracias
Open "LPT1:" For Output As #1
Print #1, ""
Print #1, ""
Print #1, Space(60) & Combo1.Text
Print #1, ""
Print #1, Space(25) & TxtRazon.Text
Print #1, Space(25) & Padr(adoClientesRS("Cli_Direccion")
Print #1, Space(25) & TxtCliente.Text
Print #1, ""
Print #1, ""
Close # 1
El problema es que no imprime las "Ñ" imprime caracteres raros
que me sugieren.
PD. la forma de impresion tiene que ser de esta forma ose abrir el puerto lpt como un archivo y escribir en el.
Gracias
Valora esta pregunta


0