I\'ve a scenario in which user can make a selection from a grid (having uploaded files on local folder) and when user press \"send\", application should open Outlook \"New m
If you want specifically want an outlook message and you want more options on what to send (body text, attachments, BCC, etc.):
Dim Outl As Object
Outl = CreateObject("Outlook.Application")
If Outl IsNot Nothing Then
Dim omsg As Object
omsg = Outl.CreateItem(0) '=Outlook.OlItemType.olMailItem'
'set message properties here...'
omsg.Display(True) 'will display message to user
End If
Dim Outl As Object
Outl = CreateObject("Outlook.Application")
If Outl IsNot Nothing Then
Dim omsg As Object
omsg = Outl.CreateItem(0)
omsg.To = "yusuf@hotmail.com"
omsg.bcc = "yusuf@gmail.com"
omsg.subject = "Hello"
omsg.body = "godmorning"
omsg.Attachments.Add("c:\HP\opcserver.txt")
'set message properties here...'
omsg.Display(True) 'will display message to user
Imports System.Diagnostics
Process.Start(String.Format("mailto:{0}", address))
' set all possible parameters: '
Process.Start(String.Format("mailto:{0}?subject={1}&cc={2}&bcc={3}&body={4}", address, subject, cc, bcc, body))
' also escape spaces: '
Process.Start(String.Format("mailto:{0}?subject=\"{1}\"&cc={2}&bcc={3}&body=\"{4}\"", address, subject, cc, bcc, body))
Use next to include new line breaks:
body = body.Replace(Environment.NewLine ,"%0A")
will open default email client with new message composition dialog.
If Outlook is set as default client, it will be opened.
Anyway, never open explicitly non-default client (email, browser, etc) - that breaks clients' will and makes them hate you.