回顾:在上一篇文章《标准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的调用方法，由于这段时间忙于一些新项目的开发，因此没办法花太多时间进行详细解释，所以很多地方都直接给出源代码再加上注解，而没有进行通俗的讲解，还请各位读者仔细查看源代码。
本控件目前只能作为客户端，阁下还可以继续进行完善，比如进行端口的监听，实现服务器的相关处理等等，但这已经不是本文的目的，授人以鱼，不如授人如渔，剩下的功能，就由各位读者去实现了，也欢迎与我进行交流，谢谢！
另外：本文的示例，需要一个服务器程序，大家可以在网上随便下载一下进行测试，我就不提供了。