Solved

Sending Emails from a Desktop VB application

Posted on 2001-06-08
12
156 Views
Last Modified: 2013-11-23
I have a small utility from which I want to send emails. Is there anyway to send emails from VB with WinNT and Win2000 without using any third party component. I also don't want to install IIS or SQL Server at the client machine. They have WinNT or Win2000 as O.S.
If this cannot be done, is there anyway to do that with a Free third party component?

Thanks,
Herzalah
0
Comment
Question by:Herzalah
12 Comments
 
LVL 43

Expert Comment

by:TimCottee
ID: 6167245
http://161.58.84.209/internet/sendmail/

Shows how to create a sendmail application from VB.
0
 
LVL 2

Expert Comment

by:kmv
ID: 6167246
1. You can use MAPI or CDO.
MAPI (Messaging Application Programming Interface) A messaging architecture and a client interface component.
As a messaging architecture, MAPI enables multiple applications to interact with multiple messaging systems across a variety of hardware platforms. See also MAPI subsystem, messaging system.

As a client interface component, MAPI is the complete set of functions and object-oriented interfaces that forms the foundation for the MAPI subsystem's client application and service provider interfaces. In comparison with Simple MAPI, Common Messaging Calls (CMC), and the CDO Library, MAPI provides the highest performance and greatest degree of control to messaging-based applications and service providers.
2. There are lot of freeware components for sending emails.
http://www.aspsmart.com/ -one of them.
I don't remember URL but you can find components JMail and ASPMail yourself.

Good luck!
0
 
LVL 9

Expert Comment

by:Valliappan AN
ID: 6167288
0
Three Reasons Why Backup is Strategic

Backup is strategic to your business because your data is strategic to your business. Without backup, your business will fail. This white paper explains why it is vital for you to design and immediately execute a backup strategy to protect 100 percent of your data.

 
LVL 1

Expert Comment

by:Ranger2081200
ID: 6167299
Here's some code I use to send email automaticlly with Outlook using MAPI.
I have a table in my database called EmailNotification that contains the names and addresses of recipients.
fields(0) is their name and
fields(1) is their address in the table.
Place a MAPISession control on the form and call it MAPISession1
Place a MAPIMessages control on the form and call it mail.

Private Sub send_mail()
Dim x as Integer

  dtaEmail.RecordSource = "select * from [EmailNotification]"
  dtaEmail.Refresh
  dtaEmail.Recordset.MoveLast
  dtaEmail.Recordset.MoveFirst

  strEmailMessage = "This is a test message"

  For X = 0 To dtaEmail.Recordset.RecordCount - 1
      strMailName = dtaEmail.Recordset.Fields(0)
      strEmailName = dtaEmail.Recordset.Fields(1)
      MAPISession1.LogonUI = False
      MAPISession1.UserName = "MICROSOFT OUTLOOK"
      MAPISession1.SignOn
      mail.SessionID = MAPISession1.SessionID
      mail.Compose
      mail.RecipDisplayName = strMailName
      mail.RecipAddress = strEmailName
      mail.ResolveName
      mail.MsgSubject = "Test message!"
      'Create the message
      mail.MsgNoteText = strEmailMessage
      mail.Send False
      MAPISession1.SignOff
      dtaEmail.Recordset.MoveNext
  next
end sub

Later...

0
 
LVL 70

Accepted Solution

by:
Éric Moreau earned 200 total points
ID: 6167340
0
 
LVL 5

Expert Comment

by:AndrewDev
ID: 6167753
0
 
LVL 5

Expert Comment

by:AndrewDev
ID: 6167755
Sorry emoreau
My first link duplicated yours :-)
0
 
LVL 14

Expert Comment

by:wsh2
ID: 6167828
<ping>
0
 
LVL 2

Expert Comment

by:tdubroff
ID: 6167840
Here it is short and sweet:

set mail     = Createobject("CDONTS.newmail")
mail.To      = "somebody@somewhere.com"
mail.From    = "somebody@somewhere.com"
mail.Subject = "Hey"
mail.Body    = "Don't you just love automation?!"
mail.Send
0
 

Expert Comment

by:Hormonal
ID: 6168149
You should definitely use the code from TimCotee's link.  Using MAPI or CDO is fine, provided the user has it installed on their machine, AND has it configured correctly.  If you use the code he links to, all they need is a TCP/IP stack, which AFAIK is pretty standard (grin.)

You can still run into logistical problems with this code, namely deciding what mail sever to connect to.  If this app is for use within one specific company, you can just use the company's internal e-mail server.  If this app is going to be used by people from multiple domains (DNS, not NT), you may run into problems with people from ABC corp not being able to send e-mail through XYZ corp's SMTP server.  This is relatively nice to try to keep spam down, but a PITA for you.  You're either going to have to find a "friendly" SMTP server, ask the user to input their SMTP server's address, or find some way to automagically figure out an SMTP server to use.
0
 

Expert Comment

by:Hormonal
ID: 6168153
You should definitely use the code from TimCotee's link.  Using MAPI or CDO is fine, provided the user has it installed on their machine, AND has it configured correctly.  If you use the code he links to, all they need is a TCP/IP stack, which AFAIK is pretty standard (grin.)

You can still run into logistical problems with this code, namely deciding what mail sever to connect to.  If this app is for use within one specific company, you can just use the company's internal e-mail server.  If this app is going to be used by people from multiple domains (DNS, not NT), you may run into problems with people from ABC corp not being able to send e-mail through XYZ corp's SMTP server.  This is relatively nice to try to keep spam down, but a PITA for you.  You're either going to have to find a "friendly" SMTP server, ask the user to input their SMTP server's address, or find some way to automagically figure out an SMTP server to use.
0
 

Author Comment

by:Herzalah
ID: 6172911
Thank you so much guys, I liked and appreciate all your help.
0

Featured Post

Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

777 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question