|
[VB.NET] | |
Sub SetBody
(NotificationID As String, Text As String)
|
|
NotificationID |
Notification ID |
Text |
|
VB.NET
Example |
Switch to language:
[C#] |
|
| 'Create personalizer object and Session object |
| Dim pers As New PersonalizerRef.Personalizer()
|
| Dim sess As New SessionRef.Session()
|
| Dim SessionID As
String = "" |
| Try |
| SessionID = pers.CreateSession("LogonName", "Password") |
| 'Create Mail notification proxy object |
| Dim objMail As New MailRef.Mail()
|
| 'Create server notification object |
| Dim MailNotifID As
String = sess.CreateMailNotification(SessionID) |
| 'set required parameters |
| objMail.SetFrom(MailNotifID, "infomail@somebody.com")'set "from" address |
| objMail.SetTo(MailNotifID, "abonent@somebody.com") 'set destination address |
| objMail.SetSubject(MailNotifID, "Notification Mail.")'set subject |
| objMail.SetFormat( MailNotifID, "text")'set format of message body |
| objMail.SetBody(MailNotifID, "You have made an appointment on 1:30pm.") |
| 'invoke method |
| objMail.Send(MailNotifID) |
| objMail.Release(MailNotifID) |
| sess.Release(SessionID) |
| Catch e As Exception |
| 'Print exception message e.Message |
| sess.Release(SessionID) |
| End Try |