用CMSWinsockControl的对象，连接的时候总是弹出“Unsupported variant types”报错对话框,该如何解决

用CMSWinsockControl的对象，连接的时候总是弹出“Unsupported variant types”报错对话框
我做一个网络传输数据的服务器程序，使用的是微软自带的控件CMSWinsockControl类，可是在启动服务器的时候，总是报错，弹出“Unsupported variant types”报错对话框。实在不知道该怎么解决这个问题，百度一下，也有人出现过这样的问题，但是没有说如何解决，望有经验的人热心结解决

在.h文件中
CMSWinsockControl m_MSWsListen;
VARIANT m_vtLocalPort;
VARIANT m_vtLocalIP;

在.cpp文件中
构造函数
m_vtLocalPort.vt = VT_BSTR;
m_vtLocalIP.vt = VT_BSTR;

在启动按钮的事件函数中
m_vtLocalPort.bstrVal = m_strServerPortNo.AllocSysString();   //端口，我测试过，m_strServerPortNo为7001
m_vtLocalIP.bstrVal = m_strIPAddress.AllocSysString();        //IP地址，测试过，为192.168.8.136
m_MSWsListen.Bind(m_vtLocalPort, m_vtLocalIP);                //执行这步的时候弹出的报错对话框！！
m_MSWsListen.Listen();

关于网络，肯定没有问题，我使用网络调试助手没有问题！
------解决方案--------------------
我觉得现在用C++开发不行，还是用JAVA吧，话说****现在貌似不行了