27/11/2003, 15:11
|
| | | Fecha de Ingreso: noviembre-2003 Ubicación: México, D.F.
Mensajes: 76
Antigüedad: 21 años, 5 meses Puntos: 0 | |
| Hola:
A ver, trata con esto:
Set objFS = server.CreateObject("Scripting.FileSystemObject")
Set objPrinter = objFS.CreateTextFile("LPT1:", True)
objPrinter.writeline(" <font size=1>DIRECCION ESTATAL DEL REGISTRO CIVIL </font>")
objPrinter.writeline(char(15)&"Impresion de prueba "&chr(18))
objPrinter.writeline("----------------------------------------")
objPrinter.writeline chr(30) |