Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim smtpmail As jmail.Message
smtpmail = New jmail.Message
smtpmail.From = "XXX@XXX.com.cn"你的发件地址
smtpmail.FromName = "XX"发件人
smtpmail.Body = "XXX"内容
smtpmail.AddRecipient("XXX@XXX.com.cn")目标地址
smtpmail.Subject = "eee"主题