Hola:
Quiero emitir un listado sabiendo el puerto a imprimir y buscando la impresora que está en ese puerto.
Se como averiguar y setear esa impresora como predeterminada.
El problema que tengo es que tengo instalado el Symantec Fax que está en ese puerto como una impresora (¿?).
Entonces en vez de darme mi impresora me da el Fax.
Cómo puedo descartar (obviamente que no sea preguntando ese nombre porque pueden ser otros) ?
ahi va la rutina que hago
private Sub modificopuerto(puerto As Byte)
anterior = Printer.DeviceName
If puerto = 0 Then Exit Sub
Dim laimpre As Printer
For Each laimpre In Printers
If laimpre.Port = "LPT" & puerto & ":" Then
CUALi = laimpre.DeviceName
Set Printer = laimpre
Exit For
End If
Next laimpre
End Sub
Gracias, cualquier ayuda es bienvenida.
Néstor G
