基于MSComm控件的GSM模块程序

          最近要写一个关于GSM模块的发送短信的程序，在网上找了半天的代码和资料都不太懂。有些需要什么dll文件的呀，有些需要专门数据结构的呀。 其中众所周知MSComm控件是操作串口的很好工具。  经过不少挫折，最终还是自己写了个非常简单的程序，代码很简单，非常容易理解，只有300行左右哦。下面我就仔细讲解一下。 

     详细的工程可以在这里下载http://download.csdn.net/detail/jin123wang/3659302

第一：程序的界面

 第二：各个按钮对应的函数

   首先需要打开串口并初始化，对应的按钮时“打开串口”

/***************************************************/ /**********打开串口****************************/ void CGSMDlg::OnOpenCom() { UpdateData(TRUE);//刷新变量值 if(m_scomm.GetPortOpen()) m_scomm.SetPortOpen(FALSE);//关闭串口 m_scomm.SetCommPort(m_com);//选择端口 m_scomm.SetInputMode(1);//设置方式为二进制 m_scomm.SetInBufferSize(1024); m_scomm.SetOutBufferSize(1024); m_botelv+=",n,8,1"; m_scomm.SetSettings(m_botelv); m_scomm.SetPortOpen(TRUE);//打开串口 // m_scomm.SetRThreshold(1); m_scomm.SetSThreshold(1); m_scomm.SetInputLen(0); m_scomm.GetInput(); cmd="AT"; m_scomm.SetOutput(COleVariant(cmd+"\r")); Sleep(1000); write_port(); if(receivestr.Find("OK")>=0) MessageBox("OK"); else MessageBox("模块没有相应"); //设置短消息的格式是TEXT cmd="AT+CMGF=1"; m_scomm.SetOutput(COleVariant(cmd+"\r")); Sleep(1000); write_port();//读串口 }  其中有个函数是write_port()，就是从串口的接受缓冲区读取数据，为什么不用对应的事件响应函数呢？因为那样不能及时得到GSM返回的信息。其中sleep(1000)这个函数不能少，因为读取之前，GSM发送数据到串口需要一段时间。这个函数源代码是：

/**********读串口函数**************/ LONG len=0,k=0; BYTE rxdate[1024]; CString strtemp; BYTE bt; void CGSMDlg::write_port() { VARIANT variant_inp; COleSafeArray safe_np; receivestr=""; strtemp=""; for(int i=0;i<1024;i++) rxdate[i]=0; variant_inp=m_scomm.GetInput();//读取缓冲区 safe_np=variant_inp;//类型转换 len=safe_np.GetOneDimSize();//得到数据有效长度 for(k=0;k<len;k++) safe_np.GetElement(&k,rxdate+k);//转换啊成BYTE型数组 for(k=0;k<len;k++) { bt=*(char *)(rxdate+k); strtemp.Format("%c",bt); receivestr+=strtemp; } //把结果写入到相应的显示区域中 m_from_com.SetSel(-1,-1); m_from_com.ReplaceSel(receivestr); m_from_com.SetSel(-1,-1); m_from_com.ReplaceSel("\n"); } /*****************************************/

其次的功能有发送短信，对应的按钮时“发送”

/**************发送短信内容**************/ void CGSMDlg::Onsend() { UpdateData(TRUE);//更新变量 if(m_centerphone.GetLength()!=11||m_phone.GetLength()!=11) { MessageBox("号码应该是11位数"); return ; } CString temp; temp="+86"; cmd="AT+CSCA="; m_centerphone=temp+m_centerphone; m_phone=temp+m_phone; //修正电话号码 m_scomm.SetOutput(COleVariant(cmd+m_centerphone+"\r")); Sleep(1000); write_port(); //设置短信中心电话号码 m_sendM.GetWindowText(temp); cmd="AT+CMGS="; m_scomm.SetOutput(COleVariant(cmd+m_phone+"\r")); Sleep(1000); write_port(); if(receivestr.Find("<",0)>=0||receivestr.Find(">",0)>=0) MessageBox("发送成功"); else MessageBox("发送失败"); m_scomm.SetOutput(COleVariant(temp+"\x1A"));//发送短消息内容 Sleep(1000); write_port(); }
其次需要读短信，“读取”是指根据具体的索引位置进行读取指定的短信，“全部读取”是读取全部的消息

“读取”按钮的函数是

<span style="background-color: rgb(255, 255, 255);">/*******************读取短消息************************/ void CGSMDlg::OnRead() { UpdateData(TRUE); if(m_position==""||m_position=="0") { MessageBox("您要读取的短信位置为空或0，请重新输入"); return; } else { recv=""; cmd="AT+CMGR="; m_scomm.SetOutput(COleVariant(cmd+m_position+"\r"));//发送命令 write_port(); m_recvM.SetSel(-1,-1); m_recvM.ReplaceSel(receivestr); m_recvM.SetSel(-1,-1); m_recvM.ReplaceSel("\n"); } } /*****************************************************/</span>
“全部读取”按钮的函数是

/**************读取全部短信********************/ void CGSMDlg::OnReadAll() { cmd="AT+CMGL=ALL"; m_scomm.SetOutput(COleVariant(cmd+"\r")); Sleep(1000); write_port(); m_recvM.SetSel(-1,-1); m_recvM.ReplaceSel(receivestr); m_recvM.SetSel(-1,-1); m_recvM.ReplaceSel("\n"); } /*******************************/
“删除”消息的按钮函数是

/***********删除选定的消息*****************/ void CGSMDlg::OnDeleteMessage() { UpdateData(TRUE); cmd="AT+CMGD="; m_scomm.SetOutput(COleVariant(cmd+m_pos+"\r")); Sleep(1000); write_port(); } /*****************************************/<span style="color:#3366ff;"> </span>
最后“清空”按钮应该是很简单的，将对应的字符串设置为空就好了。整个程序应该还是比较简洁的，但缺点是通过TEXT格式发送发送的，而不是PDU,所以不能发送中文，但是大概的框架就是这样，不清楚的可以根据这个程序改进一下的。