Click here to Skip to main content
15,890,282 members
Home / Discussions / Visual Basic
   

Visual Basic

 
AnswerRe: VB.NET SMTP AGAINST PROXY SERVER Pin
Dave Kreskowiak2-May-08 4:39
mveDave Kreskowiak2-May-08 4:39 
QuestionHow many open connections Pin
maper11-May-08 8:43
maper11-May-08 8:43 
AnswerRe: How many open connections Pin
CodingYoshi1-May-08 13:38
CodingYoshi1-May-08 13:38 
GeneralRe: How many open connections Pin
Mycroft Holmes1-May-08 19:51
professionalMycroft Holmes1-May-08 19:51 
GeneralRe: How many open connections Pin
maper12-May-08 3:11
maper12-May-08 3:11 
GeneralRe: How many open connections Pin
Dave Kreskowiak2-May-08 4:36
mveDave Kreskowiak2-May-08 4:36 
QuestionVB.Net & Emails Pin
directred1-May-08 7:40
directred1-May-08 7:40 
AnswerRe: VB.Net & Emails Pin
Arjun Marwaha1-May-08 8:19
Arjun Marwaha1-May-08 8:19 
.NET does not have MAPI controls . I used MAPI controls from VB6

'add 2 controls
Microsoft MAPIMessages (call it MAPIMessages1)
Microsoft MAPISession (call it MAPILogOn)
(AxInterop.MSMAPI.dll, Interop.MSMAPI.dll)


Public Class Form1
Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim msg As String

msg = "This is a test email from Iouri."
With Me
.MAPILogOn.SignOn() ' use current user
Do While .MAPILogOn.SessionID = 0
System.Windows.Forms.Application.DoEvents() ' need to wait until the new session is created
Loop
Call SendToEmail("someone@somewhere.com", msg)
.MAPILogOn.SignOff()
End With
MsgBox("e-mail is sent")

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"
.MsgNoteText =msg
.Send(False)
End With
End Sub

End Class

Regards,
Dave

Dave Traister
Software Engineer
ComponentOne LLC
www.ComponentOne.com

QuestionVB.Net and Windows Server 2003 Pin
directred1-May-08 6:54
directred1-May-08 6:54 
Question[Message Deleted] Pin
Zaegra1-May-08 6:38
Zaegra1-May-08 6:38 
AnswerRe: XML: Store and read values Pin
leckey1-May-08 6:59
leckey1-May-08 6:59 
GeneralRe: XML: Store and read values Pin
Zaegra1-May-08 7:24
Zaegra1-May-08 7:24 
QuestionDifference between Format() and DateTime.Parse Pin
Nitin19811-May-08 3:04
Nitin19811-May-08 3:04 
AnswerRe: Difference between Format() and DateTime.Parse Pin
Christian Graus1-May-08 3:19
protectorChristian Graus1-May-08 3:19 
QuestionInteraction with hardware Pin
Jamal Abdul Nasir1-May-08 0:12
Jamal Abdul Nasir1-May-08 0:12 
AnswerRe: Interaction with hardware Pin
Chinners1-May-08 0:41
Chinners1-May-08 0:41 
AnswerRe: Interaction with hardware Pin
Christian Graus1-May-08 3:20
protectorChristian Graus1-May-08 3:20 
QuestionBeginner tutorials for my 10yo nephew Pin
fulcrum4230-Apr-08 20:54
fulcrum4230-Apr-08 20:54 
AnswerRe: Beginner tutorials for my 10yo nephew Pin
Zaegra30-Apr-08 22:49
Zaegra30-Apr-08 22:49 
AnswerRe: Beginner tutorials for my 10yo nephew Pin
Colin Angus Mackay1-May-08 0:18
Colin Angus Mackay1-May-08 0:18 
AnswerRe: Beginner tutorials for my 10yo nephew Pin
Thomas Stockwell1-May-08 1:39
professionalThomas Stockwell1-May-08 1:39 
AnswerTHANKS - Re: Beginner tutorials for my 10yo nephew Pin
fulcrum421-May-08 12:31
fulcrum421-May-08 12:31 
Questioncreating a help file for vb.net 2.0 windows application Pin
vijaylumar30-Apr-08 20:23
vijaylumar30-Apr-08 20:23 
AnswerRe: creating a help file for vb.net 2.0 windows application Pin
Christian Graus30-Apr-08 20:36
protectorChristian Graus30-Apr-08 20:36 
AnswerRe: creating a help file for vb.net 2.0 windows application Pin
Zaegra30-Apr-08 22:45
Zaegra30-Apr-08 22:45 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.