sending email from VB application

I need to send email from my VB application. How do I do it? My application runs in DOS prompt and accepts command line arguments. Should I use MAPI or Winsock object?

sramaswaAsked:
Who is Participating?
 
Éric MoreauSenior .Net ConsultantCommented:
You better use this free tool: http://www.freevbcode.com/ShowCode.Asp?ID=109
0
 
iboutchkineCommented:
MAPI e-mail
'make sure that on the default e-mail use of MAPI server is allowed

Option Explicit
'2 controls Microsoft MAPI Control 6.0 -> MAPISession and MAPIMessages

Private Sub Command1_Click()
  Dim msg As String
 
  Screen.MousePointer = vbHourglass
 
  msg = "This is a test email"
 
  With Me

    .MAPILogOn.SignOn ' use current user
 
    Do While .MAPILogOn.SessionID = 0
      DoEvents ' need to wait until the new session is created
    Loop
   
   Call SendToEmail("iboutchkine@hotmail.com", msg)
   
    .MAPILogOn.SignOff
  End With
 
  Screen.MousePointer = vbNormal
 
End Sub

Private Sub SendToEmail(ByVal Email As String, ByVal msg As String)
  With MAPIMessages1
    'create a new message and address it
    .SessionID = MAPILogOn.SessionID
    .Compose
    .RecipDisplayName = Email
    .AddressResolveUI = True
    .RecipAddress = "smtp:" & Email
   
    .MsgSubject = "VB GENERATED E-MAIL"
'attachment
'    .AttachmentPathName = "c:\a\a.htm"
    .MsgNoteText = msg
    .Send False
  End With
End Sub

0
 
Dave_GreeneCommented:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Const SW_NORMAL = 1

sURL = "mailto:ChuckyCheese@PP.com"

ShellExecute hwnd, "open", sURL, vbNullString, vbNullString, SW_NORMAL
0
 
Ryan ChongCommented:
0
 
kahleanCommented:
http://www.siteexperts.com/tips/backend/ts12/page1.asp

If you have win2000 running, you can use this sample code as well. THis will uses cdonts to send email. The concept behid this is by creating a vb script file which contains the the database connectivity, the email content as well. T oinvoke this vbs file just at your dos prompt and type cscript email.vbs

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.