0

私の VB.Net アプリケーションでは、モデム (ドングル) とそれに接続された携帯電話を使用して SMS を送信しました。

AT コマンドを使用してこれを
行いました。SMS を送信した後、画面に確認/応答を表示する必要があります。
これどうやってするの ？

いくつかのコード スニペット: 

If IsOpen = True Then
        SMSPort.Write("AT" & vbCr)
        SMSPort.Write("AT+CSCS=""GSM""" & vbCr)
        SMSPort.Write("AT+CMGF=1" & vbCr)
        SMSPort.Write("AT+CMGS=""+91" & CellNumber & """" & vbCr)
        _ContSMS = False
        SMSPort.WriteLine(MyMessage & vbCrLf & Chr(26))
        _Continue = False
        RaiseEvent Sending(False)
    End If
4

1 に答える 1

0

-データ受信イベントを作成する必要があります。

Imports System
Imports System.IO.Ports

Class PortDataReceived
Public Shared Sub Main()
    Dim mySerialPort As New SerialPort("COM1")

    mySerialPort.BaudRate = 9600
    mySerialPort.Parity = Parity.None
    mySerialPort.StopBits = StopBits.One
    mySerialPort.DataBits = 8
    mySerialPort.Handshake = Handshake.None

    AddHandler mySerialPort.DataReceived, AddressOf DataReceivedHandler

    mySerialPort.Open()

    Console.WriteLine("Press any key to continue...")
    Console.WriteLine()
    Console.ReadKey()
    mySerialPort.Close()
End Sub 

Private Shared Sub DataReceivedHandler(
                    sender As Object,
                    e As SerialDataReceivedEventArgs)
    Dim sp As SerialPort = CType(sender, SerialPort)
    Dim indata As String = sp.ReadExisting()
    Console.WriteLine("Data Received:")
    Console.Write(indata)
End Sub 
End Class

次に、プロバイダーとハードウェアで確認を取得する方法を理解する必要があります。

于 2013-08-11T07:32:00.303 に答える