|
| [VB.NET] | |
| Sub SetFormat
(NotificationID As String, Format As String)
|
|
| NotificationID |
| Notification ID |
| Format |
| Message body format - "text" or "html" |
| 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 |
