Ver Mensaje Individual
  #5 (permalink)  
Antiguo 28/10/2009, 14:30
tnegocio
 
Fecha de Ingreso: octubre-2009
Mensajes: 9
Antigüedad: 8 años, 6 meses
Puntos: 0
Respuesta: Necesito Imprimir en Impresora de Ticket

Kseso:

Ya logre la Impresion utilizando el siguiente metodo: Esto es en ASP


'-------------------------------------------------------'
'Declaro Variables que voy a Imprimir
Dim Titulo
Titulo = "cualquier Cosa"

Dim Fecha
Fecha = Date()

'Asi preparo cada una de las variables

' IMPRIME
'
Dim impresora
impresora = "\\PC-Name\Printer-Name"
' el nombre de la impresora es el recurso compartido si es que esta en una red

Set oFile = CreateObject("Scripting.FileSystemObject")
Set oPrinter = oFile.CreateTextFile(impresora)

oPrinter.write(Titulo)
oPrinter.write(Fechac)
oPrinter.write(Horas)
oPrinter.write(Factura)
oPrinter.write(LinVacia)
oPrinter.write(Subtitulo)
oPrinter.write(LinAdulto)
oPrinter.write(LinNinos)
oPrinter.write(Lin3Edad)
oPrinter.write(LinDisc)
oPrinter.write(ImporteT)
oPrinter.write(LinVacia)
oPrinter.write(Saludo)

********
Esto me imprime a la Perfeccion, sin tener que solicitar confirmacion al usuario, y sin hacer llamado a otra pagina, lo que ahora tengo una nueva duda quizas puedas ayudarme.

Como Imprimo en una impresora de ticket, ella misma es capaz de cortar el papel, donde termine, solo hay que darle la instruccion, la cual no conosco.

En Visual Basic 6
He probado ejemplos como este

For Each Impresora In Printers
If Impresora.DeviceName = "EPSON TM-U220 Receipt" Then
Set Printer = Impresora
End If
Next

Printer.Orientation = 1
Printer.FontName = "ARIAL"
Printer.FontSize = 16
Printer.Print " Titulo"
Printer.PaintPicture Foto, 0, 500, 1800, 1800
Printer.Print ""
Printer.Print ""
Printer.FontSize = 10
Printer.Print " " & Format(Now, "dd mmmm yyyy")
Printer.Print " " & Format(Now, "HH:MM")
Printer.Print " " & Numero
Printer.FontSize = 16
Printer.Print ""
Printer.Print ""
Printer.EndDoc

Este ejemplo si corta el papel al final de la impresion, pero en asp, no tengo la menor idea de como hacer algo parecido. Quizas sea el comando "EndDoc"

Si alguien pudiera decirme como hacerlo Agredeceria muchisimo.
Saludos y Gracias