Hi
I use the sample code (listed below) to receive a SMS, but no data is displayed. What are missing?
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
I use the sample code (listed below) to receive a SMS, but no data is displayed. What are missing?
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