Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: E N T E R en Febrero 02, 2012, 02:53:37 pm
-
Tengo una impresora Tiketeadora Epson TMU-220. Con lo cual imprimo de esta forma.
Open "LPT1:" For Output As #1
Print #1, "HOLA MUNDO"
Close #1
Lo que quiero es enviar de otra PC la impresion:
Open "\\PC01\EPSON" For Output As #1
Print #1, "HOLA MUNDO"
Close #1
PC01 Es el nombre del equipo que tiene conectada la impresora.
EPSON Es el nombre de la impresora compartida.
-
proba esto para saber bien como se llama la impresora:
Private Sub Form_Load()
Dim p As Printer
For Each p In Printers
Debug.Print p.Port, p.DeviceName
Next
End Sub
y creo que la debes setear como predeterminada antes de imprimir:
For Each p In Printers
If p.DeviceName = "TuImpresora" Then
Set Printer = p
DoEvents
Exit For
End If
Next
saludos.
-
Solucionado.
Lo que hice mande a comprar al cliente un router. por que tenia la pc solo de punto a punto.
y Asi imprime de lujo
Open "\\PC01\EPSON" For Output As #1
Print #1, "HOLA MUNDO"
Close #1
Gracias Seba por responder.
Saludos !!!