Impresion en RED

[E N T E R]

Tengo una impresora Tiketeadora Epson TMU-220. Con lo cual imprimo de esta forma.

Código: (VB) [Seleccionar]

Open "LPT1:" For Output As #1
Print #1, "HOLA MUNDO"
Close #1
Lo que quiero es enviar de otra PC la impresion:

Código: (VB) [Seleccionar]

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.

[seba123neo]

proba esto para saber bien como se llama la impresora:

Código: (vb) [Seleccionar]

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:

Código: (vb) [Seleccionar]

    For Each p In Printers
       If p.DeviceName = "TuImpresora" Then
          Set Printer = p
          DoEvents
          Exit For
       End If
    Next
saludos.

[E N T E R]

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

Código: (VB) [Seleccionar]

Open "\\PC01\EPSON" For Output As #1
Print #1, "HOLA MUNDO"
Close #1
Gracias Seba por responder.

Saludos !!!