MessageReceived Event

Previous  Next

---

The MessageReceived event fires when a new SMS message arrives.

Example:

'Sms is a SMSMessage object and Intercept is a SMSInterceptor object.

Sub Globals

End Sub

Sub App_Start

      Form1.Show

      Sms.New2

      Intercept.New1

End Sub

Sub Intercept_MessageReceived

      Sms.Value = Intercept.ReceivedMessage

      textBox1.Text = sms.Body

      textBox2.Text = Time(sms.DateReceived)

      textBox3.Text = sms.From

End Sub