[AccessD] Faxing from Access 2002 using Windows XP Fax

If have initialized the WinFAX printer driver in the Printer and Faxes 
WinXP control panel applet.
You should be able to send a normal report print just as you would to 
any other printer
so you could skip the snp format . On first trying to print to this 
driver you fill in basic info
in Fax configuaration wizard like your phone number email for cover page 
etc. I haven't looked
at changing phone numbers from VBA code, not sure exactly how.

This driver converts various files to a Fax Tiff image format and has a 
cover page editor installed under
  Programs --> Accessories --> Communications --> Faxes
assume  you have a phone line connected to the machine
It will bring up a Fax connection form displaying the sending info and 
dialing retries
'see 
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fax/faxlegacyvb_9tb3.asp
' for added methods and properties like sender name phone blah blah.


Here is another  really basic method and doesn't track faxes or whether 
sent properly
that is why you buy 3'd party packages, lots of fiddley things to 
consider here.
You could write extra code to track faxes
It is not particulary fast.

' FaxServer method
'this Win 2000 legacy method should work on Win2000 and winXP
'It assumes you have initialized the WinFAX printer driver in
' the Printer and Faxes WinXP control panel applet. This driver converts 
various files
' to a Fax Tiff image format and has a cover page editor installed under
' Programs --> Accessories --> Communications --> Faxes
'and you have a phone line connected.
' It will bring up a Fax connection form displaying the sending info and 
dialing retries
'see 
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fax/faxlegacyvb_9tb3.asp
' for added methods and properties like sender name phone blah blah.
Sub testfax()

Dim strPDFFileName As String
Dim strPNumber As String
Dim lSaveAs As Long
Dim y As Long
lSaveAs = 999
strPNumber = "1-250-555-1212"
strPDFFileName = "C:\temp\UserGuide.pdf"
            Dim fs As Object
        Set fs = CreateObject("FaxServer.FaxServer")
            Dim Servername As String
            'this is your computer machine name
            Servername = "Martin"
            fs.Connect (Servername)
            fs.retries = 5  '# of retries + 1
            fs.retrydelay = 1 'in minutes
            Dim FD As Object
            Set FD = fs.createdocument(strPDFFileName)
            'strPDFFilename is the path and filename of the document
            FD.DisplayName = "CheckScale #" & lSaveAs
            'lSaveAs is just the document #
            FD.faxnumber = strPNumber
            'Faxnumber to dial, including code for outside line, et all...
            FD.FileName = strPDFFileName
            y = FD.send()
            fs.Disconnect
            Set FD = Nothing
            Set fs = Nothing
End Sub
In this process, the fax is sent from within the application. The 
printing application directly renders the image to be printed (faxed) and

no further conversion is required.

The fax printer driver saves the rendered image as a temporary TIFF file 
and sends it to the fax service for queuing and transmission.

The fax send wizard is displayed so the user can provide specific fax 
transmission data.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fax/faxabout_18s3.asp

 may be able to script something (using e.g. VBScript):


Fax Service Client API Visual Basic Reference
http://msdn.microsoft.com/library/en-us/fax/faxlegacyvb_4r6t.asp


I guess you will find some examples in this Google newsgroup search:
http://groups.google.com/groups?q=createobject+FaxServer.FaxServer


The fax service for WinXP introduces a new set of COM dual interfaces as 
well,
the Fax Service Extended COM application programming interface (API)


About the Fax Service Extended COM API
http://msdn.microsoft.com/library/en-us/fax/faxabout_699l.asp
and
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fax/faxabout_18s3.asp


Fax Service Extended COM Samples (Visual Basic)
http://msdn.microsoft.com/library/en-us/fax/faxabout_2ckz.asp


Barbara Ryan wrote:

>I am currently faxing a report snapshot file (.snp), using the Sendobject command in an Access 2002 application.  For this to happen, Microsoft Outlook is must be active (as well as ClickYes, third-party software that automatically responds to the security dialog box that pops up from Outlook).
>
>My client is now asking if Outlook is really necessary for this process (they do not want ANY mail client installed on this computer).  Also, they do not want to purchase any third party Fax software.
>
>Does anyone know of a way to fax a snapshot file from Access without using Outlook or any third party Fax software?
>
>Thanks,
>Barb Ryan
>
>  
>

-- 
Marty Connelly
Victoria, B.C.
Canada