Hola!

Registrándote como bakuno podrás publicar, compartir y comunicarte en privado con otros bakuos :D

Regístrame ya!

ayuda al imprimir con VB2008

KingBear

Bovino maduro
Desde
19 Ago 2007
Mensajes
262
Buenas amigos, Espero alguien me pueda ayudar, lo que pasa es que mando imprimir un ticket y, el problema es que me imprime una parte y al salirme de la ventana me imprime lo demás, aquí el código



[FONT=&quot]Dim SA As SECURITY_ATTRIBUTES [/FONT]
Dim outFile As FileStream
LPTPORT = "LPT1"
hPort = CreateFile(LPTPORT, GENERIC_WRITE, FILE_SHARE_WRITE, SA, OPEN_EXISTING, 0, 0)
hPortP = New IntPtr(hPort)

Dim Safe As New Microsoft.Win32.SafeHandles.SafeFileHandle(hPortP, True)
outFile = New System.IO.FileStream(Safe, IO.FileAccess.Write)

Dim fileWriter As New StreamWriter(outFile)
fileWriter.WriteLine(" " & " Nombre de Empresa")
fileWriter.WriteLine(" " & " Direccion, etc ")
[FONT=&quot]fileWriter.WriteLine(" " & " Fecha : " & Date.Today) [/FONT][FONT=&quot]
fileWriter.WriteLine(" " & "---------------------------------------")
fileWriter.WriteLine(" " & "Articulo " & " Precio " & " Cantidad " & " Total ")
fileWriter.WriteLine(" " & "---------------------------------------")

[/FONT][FONT=&quot]fileWriter.WriteLine(" " & "---------------------------------------")


' esto es lo que me imprime al salirme del form

[/FONT][FONT=&quot]fileWriter.WriteLine(" " & " Total$ " & var_Total) donde tienen el total
[/FONT][FONT=&quot]fileWriter.WriteLine(" " & "Gracias Por Su Compra")
[/FONT][FONT=&quot]fileWriter.Flush()[/FONT]



Saludos
 
Amigo prueba con el control PrintDocument es efectivo. Suerte
 
Esque como soy nuevo en la programación vb este código lo conseguí, antes de eso si investigue el printdocument pero no encontré mucho y los ejemplos que encontré no los entendí =S
 
OK ya pude solucionar el problema, por si a alguien le interesa mi error
fue no cerrar el filewriter.

al final le ponen
filewriter.close()
 
Volver
Arriba