Mensaje enviado por "Miguel" <miguel@catsa.com>

Pues precisamente con el ZetaFax. Prueba este codigo:

' El "LblDDE" es un Label, pero puede ser cualquier control que tenga las propiedades LinkTopic, etc...

            LblDDE.LinkTopic = "Zetafax|Addressing"
            LblDDE.LinkTimeout = -1
            LblDDE.LinkMode = vbLinkManual
            LblDDE.LinkExecute "[DDEControl]"

' Antes de llegar aqui tienes que haber cambiado la impresora a la del ZetaFax
' Aqui se lanza la impresion. Nosotros imprimimos con el Crystal Reports
            RptFax.Action = 1

            LblDDE.LinkItem = "To"
            LblDDE.Caption = NumeroFax ' El numero de fax al que lo mandas
            LblDDE.LinkPoke
            LblDDE.LinkExecute "[Send]" ' Esto es para que lo envie
            LblDDE.LinkExecute "[DDERelease]" ' Esto cierra la conexion DDE


Para que esto te funcione solo tienes que tener activado el cliente del ZetaFax

Adios,

Miguel