lotusswan（原作）

      很早以前,就注意到一些手機短消息的發送軟件,當時覺得那是多么的神奇,可是從來沒有想過去開發一個自己的手機短消息軟件.臨近畢業,要做畢業論文,我選的畢業課題是機房安全系統的開發,主要是機房環境系數的監測以及報警功能的實現,其中就包括手機短消息報警和撥號報警.

       手機的短消息實現目前有三種方法:

        1.通過移動網關發送短消息,使用該方法不需要附加的硬件,但是需要到電信部門申請網關,比較適用于一些大型的網絡通訊公司開發,目前華為,中興等公司就做的這方面的工作,并且還有相應的開發包供開發人員使用.

        2.在電腦上通過GSM MODEM向手機發送中文短消息,這是目前比較適合于小項目開發的一種方法,所需硬件包括一款手機,提供GSM MODEM,以及相應的數據線或是紅外線適配器.該方法編碼簡單,只需對AT指令和串口編程比較熟悉就可以實現,而且對硬件需求不高,并能自動收發短消息.

        3.通過一些網站上提供的短信發送功能來實現,比如新浪網,網易都提供這方面的服務,這種方法是這三種方法中實現起來最簡單,所需資源最少的,但是對于網站的依賴性太強,對網絡的依賴同樣無法避免,不適用于項目開發.

         通過第二種方法收發短消息又分為三種模式：Block模式、Text模式和Pdu。使用Block機生產廠家提供驅動支持，現在還沒有發現哪個廠家公布支持這種短信發送模式，而Pdu模式開發起來比較復雜,并且需要編寫專門的函數來將文本轉換為Pdu格式,比較繁瑣.相對而言,應用Text模式開發及方便也簡單,是一種不錯的選擇,不過使用Text模式開發只能發送ASCII碼,對于中文的Unicode碼不能發送.
 
       使用Text模式發送短信其實很簡單,只要對于AT指令有基本的了解,就能編寫出短消息的發送程序,可是一直以來介紹該方法的文章卻少之又少,很多人認為使用該方法太簡單,不值一提.不過對于簡單的應用來說,該方法也不失于一種不錯的選擇.
 
       先在項目中添加Mscomm控件,一般的部件欄中可能沒有列出Mscomm控件,可以過右擊部件欄,選擇”部件”,或是通過在菜單中的”工程”選擇”部件”,然后選中Microsoft Comm Control 6.0即可.添加了Mscomm控件后,可以設置一些基本的參數.如果你使用Nokia的手機,你還必須安裝data suite(可以到Nokia的開發論壇上去下載一個),然后Mscomm的commport選擇3;如果你使用其他手機,采用紅外線接口,你必須安裝紅外線驅動程序.選擇相應的端口.下面的代碼是一些基本參數的設置:
       Mscomm1.Settings=”9600,N,8,1”  ‘9600波特,無奇偶校驗,8位數據,一個停止位
       Mscomm1.InputLen=0 ‘讀入整個緩沖區
       Mscomm1.Portopen=True ‘打開端口
發送短消息的代碼如下:
        MSComm1.Output = "AT+CMGF=1" + vbCr  ‘設置發送的模式,注意:一定要加上    vbCr
        MSComm1.Output = "AT+CSCA=" & Chr$(34) & "8613010341500" & Chr$(34) & ",129" + vbCr ‘8613010341500是短消息中心,各地的號碼不一樣,必須設置當地的短消息號碼
        MSComm1.Output = "AT+CMGS=" & Chr$(34) & "13057575064" & Chr$(34) & ",129" + vbCr    ‘13057575064是對方手機號
        MSComm1.Output = "test" & Chr$(26)  ‘chr$(26)是Ctr+ Z
        以上是簡單實現短消息,你可以根據AT指令集結合VB的串口控件開發出更加完善的程序和功能豐富的應用程序,如接收短消息,撥號等等.