Programmatically sending faxes

Hi. I developed a VB 2005 WinForm application which faxes JPGs and PDFs to a bank by using an EMail-To-Fax system (I simply send an e-mail with the JPG/PDF attached to the bank's 0113458236@vax.co.za and on their side they receive it as a fax). The problem is that we have to fax an average of 20 pages at a time, and these should arrive as one long fax - not as 20 seperate faxes. The solution would be to attach all 20 JPG/PDF files to a single e-mail, but the problem is that each JPG/PDF is on average about half a megabyte, and I can't send out a 10 MB e-mail!!! (It times out, but even if it didnt, the banks e-mail account has a limit of 2MB)

We have four HP LaserJet 3055 Printer/Scanner/Fax combo machines here which are on the network (they connect directly to the network switch and have their own IP address). We use them to fax from Microsoft Word/Excel (or any other application) by simply printing to the HP Fax Printer. Would it be possible for me to fax the JPG/PDF files using this HP Fax Printer in my VB app? It would have to be totally silent though (no fax wizard popping up).

Thanks
SETPAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
MattiConnect With a Mentor Commented:
Hi!

How about loading the pictures in a Webbrowser control and then printing it.
Like this but do add them in loop to string "s" so you get many pictures.

Matti
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim s As String, PicturePath As String
        PicturePath = "file:///" + My.Application.Info.DirectoryPath + "\Pic.jpg"
        PicturePath = Replace(PicturePath, "\", "/")
 
        WebBrowser1.Navigate("about:blank")
        System.Windows.Forms.Application.DoEvents()
        WebBrowser1.Refresh()
        s = "<html>"
        s = s + "<body>"
        s = s + "<p><img border=" + """0""" + " src=""" + PicturePath + """ ></p>"
        s = s + "<html/>"
        s = s + "<body/>"
 
        WebBrowser1.Document.Write(s)
        WebBrowser1.Refresh()
    End Sub

Open in new window

0
 
Computer101Commented:
Forced accept.

Computer101
EE Admin
0
All Courses

From novice to tech pro — start learning today.