SMS Auto Reply Help

M

mre58

Member
Licensed User
Longtime User
I am working on a program that will auto reply to text messages with an automated message. The program is working as far as displaying a message with the incoming number of each incoming text message. I tried the following code, but it doesn't send an auto reply back when a text message comes in to my phone. In the MessageReceived procedure I added the code below. The From variable of MessageReceived does contain the incoming phone number for the incoming text message.

Dim smstxt as PhoneSms
smstxt.Send(From,"Test Autoreply")

Thank you
 
Sort by date Sort by votes
M

mre58

Member
Licensed User
Longtime User
Hi Erel,

Great to me you. Below is my MessageReceived function. It does display a popup message on my phone with the phone number of the person that sent the text whenever one comes in, but no autoreply is ever sent back to the person. There are no error messages.

Sub SI_MessageReceived (From As String, Body As String) As Boolean
Log("Message From: " & From)
ToastMessageShow(From, True)
Log("Message Was Shown")
Dim smstxt As PhoneSms
smstxt.Send(From,"Test Autoreply")
End Sub
 
Upvote 0
M

mre58

Member
Licensed User
Longtime User
It does seem to work. When I used compile and run it wasn't working. I tried compile and run(background) and I am getting the autoreplies.

Thank you
 
Upvote 0
You must log in or register to reply here.
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…