SMS с помощью gsm модема VB.NET
Я пытаюсь написать программу отправки SMS с помощью SIMCOM 900A. С моим нижеприведенным кодом я сталкиваюсь с проблемами...
1.
отправка при получении последовательный порт получил-данные
> AT+CMGS="9674642260" TESTING SMS-1
Он отправляет текст сообщения, которому предшествуют все полученные данные serialport.
message sent : <pre>ATAT+CMGS="9674642260" TESTING SMS-1
2.
Но не отправляете СМС, когда получил данные
AT+CMGS="9674642260" TESTING SMS-1 >
если я снова нажму кнопку Отправить, то он успешно отправит sms, но снова со всем набором команд + текстом сообщения.
может ли кто-нибудь помочь мне, где изменить мой текущий код? Кроме того, мне нужно отправить сообщение на несколько номеров.
заранее спасибо.
Что я уже пробовал:
my send button code: <pre> If SerialPort1.IsOpen Then SerialPort1.Close() End If SerialPort1.Open() Try With SerialPort1 .Write("AT" & vbCrLf) Threading.Thread.Sleep(1000) ' .Write("AT+COPS?" & vbCrLf) ' Threading.Thread.Sleep(1000) .Write("AT+CMGF=1" & vbCrLf) Threading.Thread.Sleep(1000) .Write("AT+CMGS=" & Chr(34) & txtNumber.Text & Chr(34) & vbCrLf) .Write(txtMsg.Text & Chr(26)) Threading.Thread.Sleep(1000) '.Write("AT" & vbCrLf) End With rcvData.Text = recData.ToString SerialPort1.Close() Catch ex As Exception End Try