Tengo aplicación para enviar SMS cada vez que alguien le registra en el sistema. este es mi código:
Dim lockObject as New Object()
SyncLock lockObject
TextBoxMODEM.Clear()
SerialPort1.Write("AT" & vbCrLf)
Threading.Thread.Sleep(100)
SerialPort1.Write("AT+CMGF=1" & vbCrLf)
Threading.Thread.Sleep(100)
SerialPort1.Write("AT+CMGS=" & Chr(34) & TelefonoTextBox.Text & Chr(34) & vbCrLf)
Threading.Thread.Sleep(100)
SerialPort1.Write(Mensaje.ToString & Chr(26))
End SyncLock
Mi problema es que, cuando 2 usuarios se registran de manera simultanea, a veces el sistema no envia el SMS correspondiente. Por ejemplo, de 120 usuarios que se registraron, solo 110 recibieron el sms de confirmación.
Los sms los envió desde esta aplicación, mediante un modem Huawei e3131 el cual tengo por usb y lo configure como modem.
La pregunta es: ¿como hago para evitar que ningún mensaje se quede en cola?
De antemano agradezco su ayuda.