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

Question

        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应用程序发送到手机。

是否可以发送消息而不拆分消息，>>

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

strMessage = SplitSMS（_dtMessageQueue.Rows（0）（“ Response”），155）对于i作为整数= 0至strMessage.GetUpperBound（0）尝试使用SerialPort1 .Write（...

Answer 1

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