Especially for Jasper XAFAX

Hi Jasper

Just came across this component and thought you would be intrested. Go to Project -> References and select -

"Microsoft CDO for NTS 1.2 Library", and try the following code -

Code:

---

Dim Cdontobj As New CDONTS.NewMail
Dim aFile As String
aFile = "c:\jack.txt"
With Cdontobj
  .From = "[email protected]"
  .To = "<any_valid_emailid>"
  .Subject = "poem"
  .Body = "jack and jill went up the hill"
  If Dir(aFile) <> "" Then .AttachFile (aFile)
  .Send
End With
Set Cdontobj = Nothing

---

Let me know if this was of any help to you.

And for others, any suggestions guys ???

Suhaib

[Cimperiali: Edited for coloring and indenting purpouse]

Hi Suhaib,

I found this Post today. It maybe a bit late but thank you for your efforts.

Best regards,

Jasper