标准 MFC WinSock ActiveX 控件开发实例(II)高级篇

本文介绍了一个基于MFC的WinSock ActiveX控件开发实例,重点讲述了如何添加SendData()和GetData()接口用于数据收发,并展示了控件在VC和VB中的使用方法。

回顾:在上一篇文章《标准MFC WinSock ActiveX控件开发实例》中我们详细介绍了控件的开发过程,以及接口和事件的添加和响应方法。现在我们将继续上次没有写完的控件继续进行开发,并完善作为一个WinSock控件应该具备的功能。

二、按照前一篇文章提到的知识,现在我们来添加两个新的接口分别是SendData()和GetData(),它们看起来如下:

01.//网络数据发送,在指定的超时时间内进行发送然后返回,成功返回实际发送字节数,否则返回负数
02.long CMFCWinSockCtrl::SendData(const VARIANT FAR& Data,
03.const VARIANT FAR& DataType,
04.const VARIANT FAR& DataLength,
05.const VARIANT FAR& TimeOut)
06.{
07.// TODO: Add your dispatch handler code here
08. 
09.return 0;
10.}
11. 
12.//获取数据,并指定获取数据的超时时间,返回实际获取到的数据长度,否则返回负数
13.long CMFCWinSockCtrl::GetData(VARIANT FAR* Data,
14.const VARIANT FAR& DataType,
15.const VARIANT FAR& DataMaxLength,
16.const VARIANT FAR& TimeOut)
17.{
18.// TODO: Add your dispatch handler code here
19. 
20.return 0;
21.}

两个接口的参数除了第一个参数外,其它都类似。SendData()是发送数据,不要求将数据带回,因此直接用 VARIANT,而GetData()则要求将数据带回来给调用者,因此定义为 VARIANT *类型,第二个参数DataType故名思义是定义所传送或接收数据的类型,第三个参数是传送或接收数据的长度,这里的长度以char作为一个长度,假如传入的类型是int类型,则长度为4,如果定义的是字符串,一个中文字符占用2个长度。最后一个参数,是网络发送或读取时的超时时间。

三、为Connect()接口添加源代码,看起来如下:

01.//网络数据发送,在指定的超时时间内进行发送然后返回,成功返回实际发送字节数,否则返回负数
02.long CMFCWinSockCtrl::SendData(const VARIANT FAR& Data,
03.const VARIANT FAR& DataType,
04.const VARIANT FAR& DataLength,
05.const VARIANT FAR& TimeOut)
06.{
07.// TODO: Add your dispatch handler code here
08.if(!OnlySock)
09.return -1;//网络尚未开始建立连接
10. 
11.int gDataType = VariantToLong(DataType);
12.long gDataLength = VariantToLong(DataLength);
13.int gTimeOut = VariantToLong(TimeOut);
14.if(gDataType < 0)
15.return -2;
16.if(gDataLength >24)&0xff;
17.buffer[m++] = (gData.lVal>>16)&0xff;
18.buffer[m++] = (gData.lVal>>8)&0xff;
19.buffer[m++] = gData.lVal&0xff;
20.}  
21.}
22.else//long = char*1 //数据可能溢出
23.{
24.buffer = new char[gDataLength];
25.for(m=0,n=0; n< gDataLength; n++)
26. 
27.{
28.SafeArrayGetElement(Data.parray,&n,&gData.lVal);
29.buffer[n] = (char)gData.lVal;
30.}
31.}
32.break;
33.case VT_ARRAY|VT_INT://以整型数组发送 
34.gData.vt = VT_INT;
35.if(gDataType != 0)
36.{
37.//一个int等于四个char
38.buffer = new char[gDataLength];
39.for(m=0,n=0; n< gDataLength/4; n++)
40.{
41.SafeArrayGetElement(Data.parray,&n,&gData.intVal);
42.buffer[m++] = (gData.intVal>>24)&0xff;
43.buffer[m++] = (gData.intVal>>16)&0xff;
44.buffer[m++] = (gData.intVal>>8)&0xff;
45.buffer[m++] = gData.intVal&0xff;
46.}
47.}
48.else
49.{
50.buffer = new char[gDataLength];
51.for(n=0; n< gDataLength; n++)
52.{
53.SafeArrayGetElement(Data.parray,&n,&gData.intVal);
54.buffer[n] = (char)gData.intVal;
55.}
56.}
57.break;
58.case VT_ARRAY|VT_UI1://以BYTE数组发送   
59.gData.vt = VT_UI1;//一个char等于一个BYTE不必进行转换
60.buffer = new char[gDataLength];
61.for(n=0; n< gDataLength; n++)
62.{
63.SafeArrayGetElement(Data.parray,&n,&gData.bVal);
64.buffer[n] = gData.bVal;
65.}
66.break;
67.default://在这里没有一一列出其它类型,剩下的就由阁下进行数据转换处理了,我就偷懒了^_^
68.return -3;//传入的数据类型不被支持
69.}
70. 
71.len = send(OnlySock, buffer, gDataLength, 0);//发送数据
72.delete[] buffer;
73.buffer = NULL;
74. 
75.if (len>24)&0xff;
76.buffer[1] = (lData>>16)&0xff;
77.buffer[2] = (lData>>8)&0xff;
78.buffer[3] = lData&0xff;
79. 
80.//4个char组成一个long
81.lData_2 = ( (buffer[0] &0xff ) < < 24) +
82.(( buffer[1] &0xff ) < < 16) +
83.(( buffer[2] &0xff ) < < 8) +
84.( buffer[3] &0xff );

四、现在来看看GetData()的处理,具体实现,请看如下代码:

01.// TODO: Add your dispatch handler code here
02.if(!OnlySock)
03.return -1;//网络尚未开始建立连接
04. 
05.int gDataType = VariantToLong(DataType);
06.long gDataMaxLength = VariantToLong(DataMaxLength);
07.int gTimeOut = VariantToLong(TimeOut);
08.if(gDataType < 0)
09.return -2;
10.if(gDataMaxLength bstrVal = _com_util::ConvertStringToBSTR(buffer);
11.break;
12.case VT_BYREF|VT_UI1:   //按BYTE*形式接收
13.memcpy(Data->pbVal,buffer,gDataMaxLength);
14.break;
15.case VT_BYREF|VT_I1://按 char * 形式接收
16.memcpy(Data->pcVal,buffer,gDataMaxLength);
17.break;
18.case VT_BYREF|VT_I4://以长整型指针接收
19.buffer[gDataMaxLength]='\0';
20.for(n=0; n< gDataMaxLength; n++)
21.{
22.Data->plVal[n] = buffer[n];
23.}
24.break;
25.case VT_ARRAY|VT_I4://以长整型数组接收 
26.gData.vt = VT_I4;
27.if(gDataType != 0)
28.{
29.for(m=0,n=0; n < gDataMaxLength;n++)
30.{
31.gData.lVal = ( ( buffer[m]&0xff ) < < 24) +
32.( ( buffer[m+1]&0xff ) < < 16) +
33.( ( buffer[m+2]&0xff ) < < 8) +
34.( buffer[m+3]&0xff );
35. 
36.SafeArrayPutElement( Data->parray,&n,&gData.lVal );
37.m = m+4;
38.}
39.}
40.else
41.{
42.for(n = 0; n< gDataMaxLength; n++)
43.{
44.gData.lVal = (long)buffer[n];
45.SafeArrayPutElement( Data->parray,&n,&gData.lVal );
46.}
47.}
48.break;
49.case VT_ARRAY|VT_INT://以整型数组接收 
50.gData.vt = VT_INT;
51.if(gDataType != 0)
52.{
53.for(m=0,n=0; n< gDataMaxLength;n++)
54.{
55.gData.intVal = ( ( buffer[m]&0xff)parray);
56.delete data;
57. 
58.}
59. 
60.void CTestMFCWinSockDlg::OnCloseWinsockMfcwinsockctrl1()
61.{
62.// TODO: Add your control notification handler code here
63.m_sock.DisConnect();//调用断开连接接口
64.AfxMessageBox("服务器断开了该次连接,请检查!");
65.}
66. 
67.void CTestMFCWinSockDlg::OnConnect()
68.{
69.// TODO: Add your control notification handler code here
70.UpdateData(TRUE);
71.if(!m_sock.Connect(COleVariant(m_ip),COleVariant(m_port)))
72.AfxMessageBox("与服务器建立连接失败,请确认服务器是否存在!");
73.}

VB调用控件方式:

VB时面调用要方便很多,这得益于VB的很多自动化功能,请看下图:

图三 VB调用控件方法

同样,双击我们的控件,然后添加控件事件,如下图:

图四 VB响应控件事件

然后,添加相关代码如下:

01.Private Sub Command1_Click()
02.MFCWinSock1.Connect CStr(ip), CLng(port)
03.End Sub
04. 
05.Private Sub Command2_Click()
06.MFCWinSock1.SendData "SendData: 欢迎使用!", 0, 50, 3
07.End Sub
08. 
09.Private Sub MFCWinSock1_CloseWinsock()
10.MFCWinSock1.DisConnect
11.MsgBox "服务器断开了连接,请检查!"
12. 
13.End Sub
14. 
15.Private Sub MFCWinSock1_RecvSockEvent()
16.Dim data As Variant
17.Dim data2(100) As Long
18.Dim data3 As String
19.Dim l As Long
20.data = data2 '在VB里当把一个Variant变量data等于另一个确定变量data2时,data将被初始化为与data2相同的类型变量
21.'data = data3 '如果让data等于data3,那么data将变成字符串型的变量参数
22.l = MFCWinSock1.GetData(data, 0, 100, 3) '这时data里面已存放了接收到的数据
23.data3 = data(0) '这里只显示接收到的首字符编码
24.MsgBox data3
25.End Sub

大家可以看到,对于SAFEARRAY类型的数据进行相关处理也并不可怕,由于在源码里给出了具体代码和详细注解,在这里我就不再赘述了,

至于BSTR和char *类型的数据,相信不用我多说,大家也已经知道如何使用了。

结束语:

全文至此暂告一段落,本文向大家展示了MFC ActiveX控件的魅力,以及所用的VARIANT类型参数,还详细给出了WinSock的开发代码,以用在VC,VB的调用方法,由于这段时间忙于一些新项目的开发,因此没办法花太多时间进行详细解释,所以很多地方都直接给出源代码再加上注解,而没有进行通俗的讲解,还请各位读者仔细查看源代码。

本控件目前只能作为客户端,阁下还可以继续进行完善,比如进行端口的监听,实现服务器的相关处理等等,但这已经不是本文的目的,授人以鱼,不如授人如渔,剩下的功能,就由各位读者去实现了,也欢迎与我进行交流,谢谢!

另外:本文的示例,需要一个服务器程序,大家可以在网上随便下载一下进行测试,我就不提供了。

主要介绍如何开发一个ActiveX控件,提供接口,与相应事件挂钩。文中涉及到VARIANT,SAFEARRAY,BSTR的详细使用方法。 另外还提供了WinSock的详细开发步骤,以及如何响应网络超时,网络断开的事件方法以及在VC,VB调用该控件的方法。 一、MFC ActiveX控件开发步骤(VC 6.0): New->Projects->MFC ActiveX ControlWizard,然后输入MFCWinSock工程名。如下图: 图一 创建工程 一路狂按Next,直至Finsh出现,再按下OK,如下图:     图二 创建完成 二、架设Socket环境: 首先在StdAfx.h文件中加入下面这句代码: #include <afxsock.h> // MFC socket extensions 打开MFCWinSock.cpp文件,添加代码,看起来如下: //////////////////////////////////////////////////////////////////////////// // CMFCWinSockApp::InitInstance - DLL initialization BOOL CMFCWinSockApp::InitInstance() { BOOL bInit = COleControlModule::InitInstance(); if (bInit) { // TODO: Add your own module initialization code here. if (!AfxSocketInit()) { AfxMessageBox("无法初始化Socket,请检查!"); return FALSE; } WSADATA wsaData; WORD wVersion = MAKEWORD(1, 1);//设定为Winsock 1.1版 int errCode; errCode = WSAStartup(wVersion, &wsaData);//启动Socket服务 if (errCode) { AfxMessageBox("无法找到可以使用的 WSOCK32.DLL"); return FALSE; } } return bInit; } //////////////////////////////////////////////////////////////////////////// // CMFCWinSockApp::ExitInstance - DLL termination int CMFCWinSockApp::ExitInstance() { // TODO: Add your own module termination code here. WSACleanup();//结束网络服务 return COleControlModule::ExitInstance(); } 三,提供控件接口和事件MFCWinSockCtl.cpp加入如下代码: #ifndef WM_MYWINSOCK #define WM_MYWINSOCK WM_USER+1888 #endif View->ClassWizard->Automation->Add Method…如下图: 图三 创建接口 这个时候,我们为这个控件添加了一个Connect()的接口,出于通用性,安全性和扩展性的考虑,我们采用了VARIANT类型的参数, 很多人可能都不太了解该类型,又或者有接触过,但被吓怕了,那么我们来看清它的本来面目: struct tagVARIANT { union { struct __tagVARIANT { VARTYPE vt; WORD wReserved1; WORD wReserved2; WORD wReserved3; union { LONG lVal; BYTE bVal; SHORT iVal; FLOAT fltVal; DOUBLE dblVal; VARIANT_BOOL boolVal; _VARIANT_BOOL bool; SCODE scode; CY cyVal; DATE date; BSTR bstrVal; IUnknown __RPC_FAR *punkVal; IDispatch __RPC_FAR *pdispVal; SAFEARRAY __RPC_FAR *parray; BYTE __RPC_FAR *pbVal; SHORT __RPC_FAR *piVal; LONG __RPC_FAR *plVal; FLOAT __RPC_FAR *pfltVal; DOUBLE __RPC_FAR *pdblVal; VARIANT_BOOL __RPC_FAR *pboolVal; _VARIANT_BOOL __RPC_FAR *pbool; SCODE __RPC_FAR *pscode; CY __RPC_FAR *pcyVal; DATE __RPC_FAR *pdate; BSTR __RPC_FAR *pbstrVal; IUnknown __RPC_FAR *__RPC_FAR *ppunkVal; IDispatch __RPC_FAR *__RPC_FAR *ppdispVal; SAFEARRAY __RPC_FAR *__RPC_FAR *pparray; VARIANT __RPC_FAR *pvarVal; PVOID byref; CHAR cVal; USHORT uiVal; ULONG ulVal; INT intVal; UINT uintVal; DECIMAL __RPC_FAR *pdecVal; CHAR __RPC_FAR *pcVal; USHORT __RPC_FAR *puiVal; ULONG __RPC_FAR *pulVal; INT __RPC_FAR *pintVal; UINT __RPC_FAR *puintVal; struct __tagBRECORD { PVOID pvRecord; IRecordInfo __RPC_FAR *pRecInfo; } __VARIANT_NAME_4; } __VARIANT_NAME_3; } __VARIANT_NAME_2; DECIMAL decVal; } __VARIANT_NAME_1; }; 它先是一个结构体,里面有一个重要成员VARTYPE vt;vt即是指明当前的数据类型,比如整型或者字符型,当指明vt后, 后面看到各种变量类型包括在一个联合体当中,也就是说指明vt后,你只能使用对应的其中之一变量类型。看着这众多的各种不同 类型变量集中在一起,确实让人吓了一跳,但细细看来,大多数变量跟我们平时的用法相似。值得一提的是SAFEARRAY __RPC_FAR *parray; 也许有很多人还没有接触过SAFEARRAY类型的变量,SAFEARRAY实际上也是一个结构,大家可以参考MSDN,我也将在后面介绍它的具体使用方法。 用同样的方法创建DisConnect()接口 创建两个事件,FireCloseWinsock()响应网络断开事件,FireRecvSockEvent()响应网络有数据到达的事件。创建方法如下图: 图四 创建事件 重载控件消息处理函数WindowProc(),在View->ClassWizard中打开类向导,在消息映射中找到WindowProc,如下图: 图五 重载WindowProc() 四、编写代码 编写VariantToLong()转换函数,该函数代码如下: //类型转换,将VARIANT类型转换成Long类型 long CMFCWinSockCtrl::VariantToLong(const VARIANT &var) { long r; switch(var.vt) { case VT_UI2://USHORT r = var.uiVal; break; case VT_UI4://ULONG r = var.ulVal; break; case VT_INT://INT r = var.intVal; break; case VT_UINT://UINT r = var.uintVal; break; case VT_I4://LONG r = var.lVal; break; case VT_UI1://BYTE r = var.bVal; break; case VT_I2://SHORT r = var.iVal; break; case VT_R4://FLOAT r = (long)var.fltVal; break; case VT_R8://DOUBLE r = (long)var.dblVal; break; default: r = -1;//无法转换该值 break; } return r; } 大家可以看到,该函数将最基本的若干中数据类型转换成了long类型,但VARIANT决不是个简单的谱,我将在后面继续揭开它的神秘面纱. 编写我们刚才的接口Connect(),代码代码如下: 在MFCWinSockCtrl.h中加入 SOCKET OnlySock;//建立的唯一Socket,不允许重复建立多个 bool isOnlyConnect;//是否建立了连接 然后再编写Connect(),看起来如下: BOOL CMFCWinSockCtrl::Connect(const VARIANT FAR& RemoteHost, const VARIANT FAR& RemotePort) { // TODO: Add your dispatch handler code here if(isOnlyConnect)//该连接已建立,还没有断开 return FALSE; CString IPAddress; int Port;//转换成整型的端口 switch(RemoteHost.vt) { case VT_BSTR://字符串型 IPAddress = CString(RemoteHost.bstrVal); break; case VT_BYREF|VT_I1://CHAR * IPAddress.Format("%s",RemoteHost.pcVal);//RemoteHost.pbstrVal); break; default: IPAddress = ""; return FALSE; } Port = VariantToLong(RemotePort);//我们编写的一个VARIANT转换成long类型的函数 if(Port<=0) return FALSE; _TCHAR *ip = 0; struct hostent *host = 0; struct sockaddr_in addr; ULONG dotIP = inet_addr(IPAddress); OnlySock = socket(AF_INET, SOCK_STREAM, 0); // 判断是否为点IP地址格式 if (OnlySock == INVALID_SOCKET) { shutdown(OnlySock, 0x02); closesocket(OnlySock);//释放占有的SOCK资源 return FALSE; } memset(&addr, 0, sizeof(struct sockaddr_in)); // 设定 SOCKADDR_IN 结构的内容 // 如果通讯协议是选择IP Protocol,那此值固定为AF_INET // AF_INET 与 PF_INET 这两个常量值相同 addr.sin_family = AF_INET; addr.sin_port = htons(Port); addr.sin_addr.S_un.S_addr = dotIP; if (dotIP == INADDR_NONE) { host = gethostbyname(IPAddress); if (!host) { shutdown(OnlySock, 0x02); closesocket(OnlySock);//释放占有的SOCK资源 return FALSE; }; ip = inet_ntoa(*(struct in_addr*)(*host->h_addr_list)); addr.sin_addr.S_un.S_addr = inet_addr(ip); } //开始连线 if (connect(OnlySock, (LPSOCKADDR)&addr, sizeof(SOCKADDR))) { shutdown(OnlySock, 0x02); closesocket(OnlySock);//释放占有的SOCK资源 return FALSE; } int iError = WSAAsyncSelect(OnlySock, m_hWnd,WM_MYWINSOCK, FD_READ|FD_CLOSE); //只对网络断开和数据到达通知感兴趣 if(iError == SOCKET_ERROR)//无法绑定Winsock事件通知 { shutdown(OnlySock, 0x02); closesocket(OnlySock);//释放占有的SOCK资源 return FALSE; } isOnlyConnect = true; return TRUE; } 有必要提一下WSAAsyncSelect(),这里接收网络数据到达和断开的两个消息,我们收到WM_MYWINSOCK消息时将处理该消息并作为事件传送给调用者. 第二个参数,窗口句柄,我们传送了m_hWnd,这是因为MFC ActiveX也属于一个窗口,并且是可见的,因此可以成功。 编写WindowProc(),代码看起来如下: LRESULT CMFCWinSockCtrl::WindowProc(UINT message, WPARAM wParam, LPARAM lParam) { // TODO: Add your specialized code here and/or call the base class switch(message) { case WM_MYWINSOCK://响应自定义的消息 switch(WSAGETSELECTEVENT(lParam)) { case FD_READ://有新数据到达 FireRecvSockEvent(); break; case FD_CLOSE://对方已断掉当前连接 FireCloseWinsock(); break; } break; default: break; } return COleControl::WindowProc(message, wParam, lParam); } 本部分结束语: 好了,现在一个可以运行的控件已经完成,里面提供有Connect()和DisConnect()接口,和RecvSockEvent()及CloseWinsock()事件。以及WinSock的使用方法。 在下一部分(高级)将讲解两个重要接口SendData()和GetData(),下期内容如下: long SendData(const VARIANT FAR& Data, const VARIANT FAR& DataType,const VARIANT FAR& DataLength, const VARIANT FAR& TimeOut) long GetData(VARIANT FAR* Data, const VARIANT FAR& DataType, const VARIANT FAR& DataMaxLength, const VARIANT FAR& TimeOut) VARIANT和SAFEARRAY的复杂用法。 控件开发出来后在VC和VB环境下的使用方法。 声明: 部分资料来源于网络,本文所用的所有源代码仅供非商业用途,并请保留原版权,否则后果自负! 欢迎大家拍砖,或指正不足的地方,一起探导更好的方法。 欢迎访问www.59186618.com,感谢您的支持!
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值