У меня есть приложение для отправки SMS каждый раз, когда кто-то регистрируется в системе. Моя проблема заключается в том, что когда 2 пользователя регистрируются одновременно, система не отправляет соответствующее SMS.
Например, из 120 зарегистрированных пользователей только 110 получили подтверждающее SMS.
SMS было отправлено из этого приложения с использованиемМодем HUAWEI E3131, который у меня есть через USB и я настроил его как модем.
Это код, который отправляет SMS, и я хочу отправить его в очередь.
Dim lockObject as New Object()
SyncLock lockObject
TextBoxMODEM.Clear() 'NUEVO MENSAJE
SerialPort1.Write("AT" & vbCrLf) 'COMPRUEBA LA CONEXION CON EL MODEM
Threading.Thread.Sleep(100)
SerialPort1.Write("AT+CMGF=1" & vbCrLf) 'INDICA QUE VA A ENVIAR SMS
Threading.Thread.Sleep(100)
SerialPort1.Write("AT+CMGS=" & Chr(34) & TelefonoTextBox.Text & Chr(34) & vbCrLf) 'ENVIARA EL MENSAJE SIN ALMACENAMIENTO
Threading.Thread.Sleep(100)
SerialPort1.Write(Mensaje.ToString & Chr(26)) ' ENVIA EL MENSAJE
End SyncLock
Пожалуйста, помогите мнес кодом, чтобы отправить его в очередь и выполнить с заданием.