Question

我希望使用代码锁定我的SIM卡，点击按钮后我重新启动调制解调器并且没有发生。我希望sim锁定状态所需的引脚使用它。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    SerialPort1.PortName = "COM8"
    SerialPort1.BaudRate = 9600
    SerialPort1.Parity = Parity.None
    SerialPort1.StopBits = StopBits.One
    SerialPort1.DataBits = 8
    SerialPort1.Handshake = Handshake.RequestToSend
    SerialPort1.DtrEnable = True
    SerialPort1.RtsEnable = True
    SerialPort1.NewLine = vbCrLf
End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    SerialPort1.Open()
    If SerialPort1.IsOpen() Then
        SerialPort1.Write("AT" & vbCrLf)

        SerialPort1.Write("AT+CPIN=1234" & vbCrLf)
        SerialPort1.Write("AT+CLCK='SC',1,'1234'" & vbCrLf)
        MsgBox("LOcked")
    Else
        MsgBox("Port not available")
    End If
End Sub




No error Return, SIM CArd Still Unlocked.

Thanks

Answer 1

以下几项做错了，你必须做出重大改变才能开始期待工作。

最严重的是完全没有解析从调制解调器发回的响应代码。 在你修复之前，什么都行不通。 this answer中的所有内容都适用。请阅读V.250中第5章的所有内容。

此外（但在实现读取和解析来自调制解调器的响应之前，请不要解决以下问题），命令行应该由单个\r运行终止返回字符，而不是vbCrLf。字符串参数应使用"双引号进行封装（例如AT+CPIN="1234"和AT+CLCK="SC",1,"1234"）。

使用AT Command VB.net启用SIM锁定

1 个答案: