VC6.0中Mscomm控件收发数据

雪梨梨梨 2017-08-28 05:21:40
Mscomm控件中我需要先发送AT指令，等到返回ok即接收到OK，再发AT指令，直至完成sim900的初始化，这应该怎么实现呢？
...全文
202 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
雪梨梨梨 2017-08-31
  • 打赏
  • 举报
 回复
引用 6 楼 schlafenhamster 的回复:

BOOL CHMI_manApp::SendCommand2Modem(char *command,char *ecko)
{
	return FALSE;
//
// ready to ask
	if(!m_pPpiManager) return FALSE; 
//
	ULONG ulBytesRead;
	ULONG ulBytesWritten;
	OVERLAPPED oReadOverlapped,oWriteOverlapped;
	DWORD dwWaitReadResult,dwWaitWriteResult;
//
	memset(&oReadOverlapped,0,sizeof(OVERLAPPED));
	oReadOverlapped.hEvent=m_PPIhReadEvent;
//
	memset(&oWriteOverlapped,0,sizeof(OVERLAPPED));
	oWriteOverlapped.hEvent=m_PPIhWriteEvent;

// reset Events
	ResetEvent(m_PPIhReadEvent);
	ResetEvent(m_PPIhWriteEvent);
	BOOL  bResult=0;
//	
	PurgeComm (m_PPIhComPort,PURGE_TXABORT|PURGE_RXABORT|PURGE_TXCLEAR|PURGE_RXCLEAR);
// write "+++" make modem state changed from data mode to command mode 
	bResult=WriteFile(m_PPIhComPort,// handle to file
					  command,      // 
					  strlen(command),// number of bytes to write
					  &ulBytesWritten,   // number of bytes written
					  &oWriteOverlapped);// overlapped buffer
	if (!bResult)
	{// io_pending
		if (GetLastError()!=ERROR_IO_PENDING)
		{
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		}
	}	
//write command
	dwWaitWriteResult=WaitForSingleObject(m_PPIhWriteEvent,100);
	switch (dwWaitWriteResult)
	{
		case WAIT_FAILED://-1
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		break;
		case WAIT_TIMEOUT://0x0102
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		break;
	}
//get ulBytesWritten 
//	bResult=GetOverlappedResult(m_PPIhComPort,&oWriteOverlapped,&ulBytesWritten,FALSE); 
	Sleep(100);// wait answer chars
//read answer
	char  StateOK[MAX_PATH]={0};
	int jj;
	for (jj=0;jj<sizeof(StateOK);jj++)
	{// we don't know how many chars will be received !
		bResult=ReadFile(m_PPIhComPort,&StateOK[jj],1,&ulBytesRead,&oReadOverlapped);
		if (!bResult)
		{// io_pending
			if (GetLastError()!=ERROR_IO_PENDING)
			{
				AfxMessageBox(IDS_COMTR_IO_ERR);
				return FALSE;
			}
		}	
	//
		dwWaitReadResult=WaitForSingleObject(m_PPIhReadEvent,10);
		switch (dwWaitReadResult)
		{
			case WAIT_FAILED://-1
				AfxMessageBox(IDS_COMTR_IO_ERR);
				return FALSE;
			break;
			case WAIT_OBJECT_0:
				bResult=GetOverlappedResult(m_PPIhComPort,&oReadOverlapped,&ulBytesRead,FALSE); 
				if (bResult==0) return FALSE;
				if(ulBytesRead !=0 )
				{//"ATZ 0x0d 0x0d 0x0a OK 0x0d 0x0a" len=10
					oReadOverlapped.Offset+=ulBytesRead;
				 // for next
				}
				else
				{
					AfxMessageBox(IDS_COMTR_IO_ERR);
					return FALSE;
				}
			break;
			case WAIT_TIMEOUT://0x0102
				if(oReadOverlapped.Offset!=0)
				{
					if(ecko) strcpy(ecko,StateOK);
					return TRUE;
				}
				else
				{
					//AfxMessageBox("Time out");
					return FALSE;
				}
			break;
		}//end switch (dwWaitReadResult)
	}// end for 
	if(jj==sizeof(StateOK)) return FALSE;// string too long
//
	return TRUE;
}
SendCommand2Modem(char *command,char *ecko)
谢谢你。
schlafenhamster 2017-08-30
  • 打赏
  • 举报
 回复 

BOOL CHMI_manApp::SendCommand2Modem(char *command,char *ecko)
{
	return FALSE;
//
// ready to ask
	if(!m_pPpiManager) return FALSE; 
//
	ULONG ulBytesRead;
	ULONG ulBytesWritten;
	OVERLAPPED oReadOverlapped,oWriteOverlapped;
	DWORD dwWaitReadResult,dwWaitWriteResult;
//
	memset(&oReadOverlapped,0,sizeof(OVERLAPPED));
	oReadOverlapped.hEvent=m_PPIhReadEvent;
//
	memset(&oWriteOverlapped,0,sizeof(OVERLAPPED));
	oWriteOverlapped.hEvent=m_PPIhWriteEvent;

// reset Events
	ResetEvent(m_PPIhReadEvent);
	ResetEvent(m_PPIhWriteEvent);
	BOOL  bResult=0;
//	
	PurgeComm (m_PPIhComPort,PURGE_TXABORT|PURGE_RXABORT|PURGE_TXCLEAR|PURGE_RXCLEAR);
// write "+++" make modem state changed from data mode to command mode 
	bResult=WriteFile(m_PPIhComPort,// handle to file
					  command,      // 
					  strlen(command),// number of bytes to write
					  &ulBytesWritten,   // number of bytes written
					  &oWriteOverlapped);// overlapped buffer
	if (!bResult)
	{// io_pending
		if (GetLastError()!=ERROR_IO_PENDING)
		{
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		}
	}	
//write command
	dwWaitWriteResult=WaitForSingleObject(m_PPIhWriteEvent,100);
	switch (dwWaitWriteResult)
	{
		case WAIT_FAILED://-1
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		break;
		case WAIT_TIMEOUT://0x0102
			AfxMessageBox(IDS_COMTR_IO_ERR);
			return FALSE;
		break;
	}
//get ulBytesWritten 
//	bResult=GetOverlappedResult(m_PPIhComPort,&oWriteOverlapped,&ulBytesWritten,FALSE); 
	Sleep(100);// wait answer chars
//read answer
	char  StateOK[MAX_PATH]={0};
	int jj;
	for (jj=0;jj<sizeof(StateOK);jj++)
	{// we don't know how many chars will be received !
		bResult=ReadFile(m_PPIhComPort,&StateOK[jj],1,&ulBytesRead,&oReadOverlapped);
		if (!bResult)
		{// io_pending
			if (GetLastError()!=ERROR_IO_PENDING)
			{
				AfxMessageBox(IDS_COMTR_IO_ERR);
				return FALSE;
			}
		}	
	//
		dwWaitReadResult=WaitForSingleObject(m_PPIhReadEvent,10);
		switch (dwWaitReadResult)
		{
			case WAIT_FAILED://-1
				AfxMessageBox(IDS_COMTR_IO_ERR);
				return FALSE;
			break;
			case WAIT_OBJECT_0:
				bResult=GetOverlappedResult(m_PPIhComPort,&oReadOverlapped,&ulBytesRead,FALSE); 
				if (bResult==0) return FALSE;
				if(ulBytesRead !=0 )
				{//"ATZ 0x0d 0x0d 0x0a OK 0x0d 0x0a" len=10
					oReadOverlapped.Offset+=ulBytesRead;
				 // for next
				}
				else
				{
					AfxMessageBox(IDS_COMTR_IO_ERR);
					return FALSE;
				}
			break;
			case WAIT_TIMEOUT://0x0102
				if(oReadOverlapped.Offset!=0)
				{
					if(ecko) strcpy(ecko,StateOK);
					return TRUE;
				}
				else
				{
					//AfxMessageBox("Time out");
					return FALSE;
				}
			break;
		}//end switch (dwWaitReadResult)
	}// end for 
	if(jj==sizeof(StateOK)) return FALSE;// string too long
//
	return TRUE;
}
SendCommand2Modem(char *command,char *ecko)
雪梨梨梨 2017-08-30
  • 打赏
  • 举报
 回复
引用 1 楼 zhao4zhong1 的回复:
百度搜相关关键字。
没有这种又收又发的形式
雪梨梨梨 2017-08-30
  • 打赏
  • 举报
 回复
引用 3 楼 schlafenhamster 的回复:
// if(!m_ModemAT.IsEmpty()) // {// execute AT command // m_ModemAT+="\r"; // char ecko[MAX_PATH]={0}; // if(pApp->SendCommand2Modem((LPTSTR)(LPCTSTR)m_ModemAT,ecko)) // { // AfxMessageBox(ecko); // m_ModemAT=""; // UpdateData(FALSE); // } // return; // } void CConfigModem::OnSetDefault() { // TODO: Add your control notification handler code here m_baud = 4; //115200 m_port = 1; //com2 m_databits = 1; //8 m_parity = 2; //Even m_stopbits = 0; //1 m_modemAnalog=0;// analog m_Modem_InitStr="AT&FE0X3\r"; m_Modem_ESC="+++"; m_ModemHangUp="ATH0\r"; m_ModemAT=""; m_ModemOKstring="OK"; m_ModemConnect="CONNECT"; m_ModemNoCarrier="NO CARRIER"; m_ModemDialNum="ATD339\r"; // UpdateData(FALSE); }
这个可以实现什么功能？我现在要做的是发 AT\r ATE1\r AT+CMGF=0\r AT+CNMI=2,1,0,0,1\r //新短信提示设置 AT+CMGD=1\r //删除1~10信息 AT+CMGD=2\r AT+CMGD=3\r AT+CMGD=4\r AT+CMGD=5\r AT+CMGD=6\r AT+CMGD=7\r AT+CMGD=8\r AT+CMGD=9\r AT+CMGD=10\r AT+CMMSINIT\r AT+CMMSCURL=\"mmsc.monternet.com\"\r AT+CMMSCID=1\r AT+CMMSPROTO=\"10.0.0.172\",80\r AT+CMMSENDCFG=6,3,0,0,2,4\r AT+SAPBR=3,1,\"Contype\",\"GPRS\"\r AT+SAPBR=3,1,\"APN\",\"CMWAP\"\r AT+SAPBR=1,1\r AT+SAPBR=2,1\r AT+CMMSEDIT=0\r 这些一条一条的发，收到OK才发下一条
schlafenhamster 2017-08-29
  • 打赏
  • 举报
 回复
// if(!m_ModemAT.IsEmpty()) // {// execute AT command // m_ModemAT+="\r"; // char ecko[MAX_PATH]={0}; // if(pApp->SendCommand2Modem((LPTSTR)(LPCTSTR)m_ModemAT,ecko)) // { // AfxMessageBox(ecko); // m_ModemAT=""; // UpdateData(FALSE); // } // return; // } void CConfigModem::OnSetDefault() { // TODO: Add your control notification handler code here m_baud = 4; //115200 m_port = 1; //com2 m_databits = 1; //8 m_parity = 2; //Even m_stopbits = 0; //1 m_modemAnalog=0;// analog m_Modem_InitStr="AT&FE0X3\r"; m_Modem_ESC="+++"; m_ModemHangUp="ATH0\r"; m_ModemAT=""; m_ModemOKstring="OK"; m_ModemConnect="CONNECT"; m_ModemNoCarrier="NO CARRIER"; m_ModemDialNum="ATD339\r"; // UpdateData(FALSE); }
女神打Boss 2017-08-29
  • 打赏
  • 举报
 回复
Mscomm控件有很多例子
赵4老师 2017-08-29
  • 打赏
  • 举报
 回复
百度搜相关关键字。
串口通信vc6.0
用MFC制作界面，利用MSComm控件串口通信实现收发数据，设置参数等功能
MSCOMM事件接受字符串和十六进制数据
自己写的一个OnCOmm事件，是基于vc6.0编程软件的基础上改进的。通过数据的不同组合方式，能同时接受十六进制数和普通默认字符。最后二个变量时已经提取出来的字符串，可以直接使用。适合新手看。
VC_MSComm源程序.zip
此工程是使用vc++ 6.0，开发的一个简单mfc的串口助手小工具，使用了mscomm控件，实现了串口的收发，对接收数据的保存，显示图片到窗口。
SPDA.rar_VC 串口调试
VC++6.0下编写的串口调试助手，串口收发用的是MicroSoft的MSCOMM控件，可用于MSCOMM控件的学习与使用！
（毕业设计）基于CC2420 的无线传感器网络系统设计（硬件+源代码+上位机+论文）-电路方案
基于CC2420 的无线传感器网络设计概述: 该设计通过采用 ATmega128L 单片机和无线收发模块CC2420 搭建了一个无线传感器网络系统。CC2420 是挪威Chipcon 公司推出的一款符合IEEE 802.15.4 标准的无线收发芯片，只需很少的外围元件就可以与单片机构成一个无线通信系统；根据无线传感器网络的体系结构和无线传感器节点的体系结构以及IEEE802.15.4/ZigBee 协议，本文设计了一个简单的星形无线传感器网络。 如截图: 无线传感器节点的体系结构框图: 软件总体设计: 系统软件设计主要是主节点和终端节点的程序设计。 主节点程序流程图: 终端节点程序流程图: 上位机网络管理软件设计: 无线传感网络的上位机网络管理软件是在VC6.0 开发环境下开发完成。界面编程利用MFC 向导生成。串口编程利用了微软Visual Basic中提供的一个串口控件——Microsoft Communication Control（简称MSComm）控件。后台数据库采用Microsoft 的Access 数据库。系统环境为Windows XP SP2 。 网络管理软件主界面: 附件内容截图: 整个无线传感器网络系统设计原理图和PCB、CC2420 模块原理图PDF档； 无线网络管理上位机程序； ATmega128L 单片机控制源码；
ATL

3,245

社区成员

48,539

社区内容

发帖
与我相关
我的任务
社区描述
ATL，Active Template Library活动(动态)模板库，是一种微软程序库，支持利用C++语言编写ASP代码以及其它ActiveX程序。
社区管理员
  • ATL/ActiveX/COM社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章