MSComm 控件的 Modem 通讯

MSComm 控件通过串行端口(serial port)传送和接收数据,为应用程序提供了串行通讯功能。而且在可视化编程盛行的今天，可以很方便的在Visual Basic(VB)、Visual C++(VC)、Delphi等语言及开发平台中应用。
　　MSComm 是 Microsoft 公司为简化Windows下串行端口编程而提供的ActiveX控件， 它提供了一系列标准通讯命令的使用接口，为应用程序提供了通过串行口收发数据的简洁方法。处理数据的方式有事件驱动（Event-driver）、查询法(Inquire)两种。

1．事件驱动法

　　在使用事件驱动法设计程序时，每当有新字符到达、端口状态变化或发生错误时，MSComm控件将解发OnComm事件，而应用程序在捕获该事件后，通过检查MSComm控件的CommEvent属性可以获知所发生的事件或错误，从而采取相应的操作。这种方法的优点是程序响应及时，可靠性高。

2．查询法

　　这种方法适合于较小的应用程序。在这种情况下，每当应用程序执行完某一串行口操作后，将不断检查MSComm控件的CommEvent属性以检查执行结果或者检查某一事件是否发生。例如，当程序向串行设备发送了某个命令后，可能只是在等待收到一个特定的响应字符串，而不是对收到的每一个字符都立刻响应并处理。
　　在VC中添加?MSComm控件非常简单。在打开的工程中，选择菜单Project->Add To Project->Component and Controls，在弹出的对话框“Component and Controls Gallery”中选中“Microsoft Communication Controls Version 6.0”?，单击“Insert”按钮即可完成添加MSComm控件操作。
本工程应用采用事件驱动法，具体实现如下：

一．串口信息配置
　　按上述方法完成在基于对话框的应用程序中添加MSComm控件操作并增加相应成员变量m_comm。在对话框模板上右键单击MSComm控件，选择Property菜单项，即可设置MSComm控件各项属性。在此调制解调器通讯的程序中，设置“Control”属性页中Handshaking项为“2-comRTS”，否则国内部分厂家modem不能正常通讯。其它接受缺省设置。
　　另外亦可通过修改对话框类的OnInitDialog()函数来设置控件的属性。具体参考MSDN中的关于Comm Control的详细说明。

  if(m_comm.GetPortOpen()) 
  { 
     m_comm.SetPortOpen(FALSE); //设置串口配置信息前先要关闭串口 
  }                   
  
  m_comm.SetCommPort(1);  //Com1串行口       
  m_comm.SetSettings("9600,n,8,1");//设置波特率为9600bps，无奇偶校验位，数据位8位，停止位1位 
  m_comm.SetInputMode(1);  //设置数据通讯格式为二进制数组格式 
  m_comm.SetRThreshold(1);  //设置为每次接到一个字节数据就触发OnComm事件 
  if(!m_comm.GetPortOpen())  
  { 
     m_comm.SetPortOpen(TRUE); 
  }  
  m_comm.GetInput();  //清除串口输入缓冲区中残留数据 
  m_SendData="ATZ\r\n";  //调制解调器初始化 
  m_comm.SetOutput(COleVariant(m_SendData)); 

二．接收数据
　　添加接收数据函数，在对话框中双击Comm Control，接受默认函数，则对话框类的成员函数为OnCommMscomm(),添加代码如下：

Sleep(500);   //视各厂家modem而定。不加则数据接受不全 
VARIANT m_input; 
char *str,*str1; 
int k,nEvent,i,len,m; 
CString str2; 
m_ReceiveData=""; 
nEvent=m_comm.GetCommEvent(); 
switch(nEvent) 
{ 
case 2:                               //收到大于RTHresshold个字符 
 k=m_comm.GetInBufferCount();      //接收缓冲区的字符数目 
 if(k>0) 
 { 
        m_input=m_comm.GetInput(); 
        str=(char*)(unsigned char*)m_input.parray->pvData; 
 } 
 ?i=0; 
 str1=str; 
 while(i　　以上是在做工程之余写下的一点东西。VC我是初学者，有错误的地方，还请各位批评指正。例子在VC 6.0＋Win2000下调试通过。Win98下测试数据接收不全。还望高手指点一二。
 

附： 
　　单片机或PC机对MODEM的控制是通过设置MODEM的Ｓ寄存器和发送标准ＡＴ命令来实现的。命令行由AT或at开始，不能是At或aT。它的一般格式为“AT+指令+回车”常用的ＡＴ命令简介如下，详细的ＡＴ命令见本说明书附录。 
&F 恢复出厂设置 
DT××× 音频拨号, ×××表示电话号码 
+++ 切换到在线命令状态 
Sn=X 写S寄存器 
Hn 摘机/挂机控制 
n=0 挂机 
n=1 摘机 
S0=X X=0,不自动应答 
X=1～２５５，振铃指定次数后自动应答 
\N0 异步方式设定为0 
\q0 XON\XOFF流控方式