Si deseas que posterior a la venta te pregunte si deseas Imprimir el Ticket deberas de quitar los comentarios de las siguientes lineas
Esto es del Formato de Ticket
If MsgBox( “Desea imprimir el ticket”, vbQuestion + vbYesNo + vbDefaultButton2 ) = vbNo Then
Exit Sub
End If
Si deseas que te muestre un previo a tu venta (Ticket)
Deberas de colocar la siguiente sintaxis
MsgBox(cSalida)
Esta sintaxis debera de ser colocada antes de la impresion del formato, dejo el ejemplo de colocacion.
Else
MsgBox(cSalida)
Script.sendToPrinter Ambiente, (cSalida), prn.Pantalla
Grupo Help MBP
Nestor Guzman
Condicion para que pregunte si desea imprimir
Desplegar vista en cuadro Preliminar
