如何使用AT命令发送长消息,vb.Net

时间:2019-11-26 06:11:46

标签: vb.net sms at-command

        strMessage = SplitSMS(_dtMessageQueue.Rows(0)("Response"), 155)

        For i As Integer = 0 To strMessage.GetUpperBound(0)
            Try
                With SerialPort1
                    .Write("AT" & vbCrLf)
                    Threading.Thread.Sleep(2000)
                    .Write("AT+CMGF=1" & vbCrLf)
                    Threading.Thread.Sleep(2000)
                    .Write("AT+CMGS=" & Chr(34) & _dtMessageQueue.Rows(0)("MobileNo") & Chr(34) & vbCrLf)
                    .Write(strMessage(i) & Chr(26) & vbCrLf)
                    Threading.Thread.Sleep(3000)
                End With
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        Next

我已经编写了上面的代码,以便将短信从我的vb.net应用程序发送到手机。

是否可以在不拆分邮件的情况下发送邮件

我想将邮件作为一个邮件发送。

1 个答案:

答案 0 :(得分:0)

SMS长度限制为160个7位字符。随后,它被编码为发送SMS的SMPP信令协议,并被精确地限制为140字节(或1120位)。

尝试阅读this