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

回顾:在上一篇文章《标准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的调用方法，由于这段时间忙于一些新项目的开发，因此没办法花太多时间进行详细解释，所以很多地方都直接给出源代码再加上注解，而没有进行通俗的讲解，还请各位读者仔细查看源代码。

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

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