imprimir al puerto de pc en red

[roortiz]

Si, eso acabo de probarlo, pero en realidad la cuestion es que no encuentra la ruta de la impresora, tengo el siguiente codigo que no logro hacer funcionar:


Private Sub Command1_Click()
Dim Linea As Integer
Dim Port As String

Linea = FreeFile

Port = "\\dep2\lpt1" & ":"
Open Port For Output As #Linea
Print #Linea, "Esta es mi primera linea"
Close #Linea
End Sub
cuando cambio
Port = "\\dep2\lpt1" & ":"
por
Port = "lpt1" & ":"

imprime bien en la impresora que corresponde, pero el programa debe permitir tambien poder imprimir desde otras pc en la pc que tiene la impresora, y la unica manera es poniendo la ruta de la impresora, pero no logro asertar con esto.... :C