回顾:在上一篇文章《标准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 here08. 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 here19. 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 here08.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等于四个char38.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.else49.{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组成一个long81.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 here02.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.else41.{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 here63.m_sock.DisConnect();//调用断开连接接口64.AfxMessageBox("服务器断开了该次连接,请检查!");65.}66. 67.void CTestMFCWinSockDlg::OnConnect()68.{69.//
TODO: Add your control notification handler code here70.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
Sub04. 05.Private
Sub Command2_Click()06.MFCWinSock1.SendData "SendData:
欢迎使用!",
0, 50, 307.End
Sub08. 09.Private
Sub MFCWinSock1_CloseWinsock()10.MFCWinSock1.DisConnect11.MsgBox "服务器断开了连接,请检查!"12. 13.End
Sub14. 15.Private
Sub MFCWinSock1_RecvSockEvent()16.Dim
data As Variant17.Dim
data2(100) As Long18.Dim
data3 As String19.Dim
l As Long20.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
data325.End
Sub大家可以看到,对于SAFEARRAY类型的数据进行相关处理也并不可怕,由于在源码里给出了具体代码和详细注解,在这里我就不再赘述了,
至于BSTR和char *类型的数据,相信不用我多说,大家也已经知道如何使用了。
结束语:
全文至此暂告一段落,本文向大家展示了MFC ActiveX控件的魅力,以及所用的VARIANT类型参数,还详细给出了WinSock的开发代码,以用在VC,VB的调用方法,由于这段时间忙于一些新项目的开发,因此没办法花太多时间进行详细解释,所以很多地方都直接给出源代码再加上注解,而没有进行通俗的讲解,还请各位读者仔细查看源代码。
本控件目前只能作为客户端,阁下还可以继续进行完善,比如进行端口的监听,实现服务器的相关处理等等,但这已经不是本文的目的,授人以鱼,不如授人如渔,剩下的功能,就由各位读者去实现了,也欢迎与我进行交流,谢谢!
另外:本文的示例,需要一个服务器程序,大家可以在网上随便下载一下进行测试,我就不提供了。
本文介绍了一个基于MFC的WinSock ActiveX控件开发实例,重点讲述了如何添加SendData()和GetData()接口用于数据收发,并展示了控件在VC和VB中的使用方法。
1192

被折叠的 条评论
为什么被折叠?



