如何使用vb.net从您的手机发送短信到任意号码?我已经搜索了包括youtube在内的互联网,但似乎我找不到或无法弄清楚从哪里开始。在Windows中的“手机和调制解调器”中检测到我的CP cant事件...
答案 0 :(得分:0)
我有一个完美的方法,使用AT命令在Visual Basic中发送短信。
AT-commands:指示您可以通过它发送和接收SMS消息,通过手机拨打电话,这是发送消息的示例:
首先: 将此代码写在顶部:
Imports System.IO.Ports
Imports System.IO
其次:
将此代码写入表单的公共类:
Dim SerialPort As New System.IO.Ports.SerialPort()
Dim CR As String
第三
创建一个textBox(TextmsgTextBox)来写入文本消息,并使用TextBox2(MobileNumberTextBox)输入手机号码,并将Button(SendBUT)发送给发送消息。
并在按钮点击事件中编写此代码。
If SerialPort.IsOpen Then
SerialPort.Close()
End If
SerialPort.PortName = COM4
SerialPort.BaudRate = 9600
SerialPort.Parity = Parity.None
SerialPort.StopBits = StopBits.One
SerialPort.DataBits = 8
SerialPort.Handshake = Handshake.RequestToSend
SerialPort.DtrEnable = True
SerialPort.RtsEnable = True
SerialPort.NewLine = vbCrLf
Dim message As String
message = MsgRichTextBox.Text
SerialPort.Open()
If SerialPort.IsOpen() Then
SerialPort.Write("AT" & vbCrLf)
SerialPort.Write("AT+CMGF=1" & vbCrLf)
SerialPort.Write("AT+CMGS=" & Chr(34) & phoneNumBox.Text & Chr(34) & vbCrLf)
SerialPort.Write(message & Chr(26))
SentPicture.Visible = True
SentLabel.Visible = True
SentTimer.Start()
Else
MsgBox("Port not available")
End If
我希望我的答案对你有用。
答案 1 :(得分:0)
重要提示
端口值随时间变化,从计算机变为另一个。
我将向您展示如何通过图片了解设备的端口值。
1:从控制面板进入设备管理器。
2:右键单击设备,然后选择“属性”。
3:选择调制解调器点击,查找端口名称,并在您的应用程序中使用它。