解释短信发送和接收原理

短消息业务(SMS-Short Message Service）的实现原理很简单。
手机的信号频率很高，一般在900Mhz左右，靠电离层反射传播，打电话的手机信号传到最近的基站，也就是移动或者连通的信号塔，再由基站把高频信号频率降低，由基站和基站之间通信，这个信号是直线传播，遇到高的建筑物会被挡住，所以那些塔都竖的很高，传到接电话的手机附近的基站，再转成高频信号发给手机。

短信’的英文是SMS

　　手机短信的发送

　　手机短信的发送主要借助于VB的Mscomm控件实现，关于Mscomm控件，前面的技术介绍部分有详细介绍。短信的发送是由AT+CMGS指令完成的，采用PDU模式发送，函数代码如下：
　　Const prex = "0891"
　　Const midx = "11000D91"
　　Const sufx = "000800"
　　Public Function Sendsms(csca As String, num As String, msg As String) As _Boolean Dim pdu, psmsc, pnum, pmsg As String
　　Dim leng As String
　　Dim length As Integer
　　length = Len(msg)
　　length = 2 * length
　　leng = Hex(length)
　　If length < 16 Then leng = "0" & leng
　　psmsc = Trim(telc(csca))
　　pnum = Trim(telc(num))
　　pmsg = Trim(ascg(msg))
　　pdu = prex & psmsc & midx & pnum & sufx & leng & pmsg
　　sleep(1)
　　mobcomm.Output = "AT+CMGF=0" + vbCr
　　mobco