短信通过GSM移动

时间:2010-08-18 09:03:35

标签: vb.net

任何机构都能给我代码如何通过与手机连接的GSM手机发送短信吗? 谢谢 Furqan

1 个答案:

答案 0 :(得分:1)

大约一年前,我为此目的使用了mCore库。 它使用起来非常简单(如果我的VB.NET是正确的):

Private objSMS As New mCore.SMS()

' Set up connection and check '
' if connection is open '
Private Sub SendSms()
    If Not objSMS.IsConnected Then
        objSMS.Port = "COM4"
        objSMS.BaudRate = mCore.BaudRate.BaudRate_19200
        objSMS.DataBits = mCore.DataBits.Eight
        objSMS.Parity = mCore.Parity.None
        objSMS.StopBits = mCore.StopBits.One
        objSMS.FlowControl = mCore.FlowControl.None
        objSMS.DisableCheckPIN = False
        objSMS.Encoding = mCore.Encoding.Unicode_16Bit
    End If
    Dim strSendResult As String = objSMS.SendSMS("+7921XXXXXXX", "Server CORP_DB2 is down!", False)
End Sub

这个库支持很多手机,并且有很多有用的功能:发送USSD请求,接收短信等等。

mCore是共享软件,但它有试用版。试用版将为mCore发送的所有SMS添加文本。