如何解决如何在Excel VBA中使用winsock控件
我试图在我的 Excel 中使用 winsock 控件(用 VB6 生成的 MSWINSCK.OCX)。以下是我所做的:
1、从网上下载MSWINSCK.ocx,复制到c:\windows\SysWOW64
2、以管理员身份运行regsvr32 C:\Windows\SysWOW64\MSWINSCK.OCX 成功
3、根据网上的建议导入以下注册表文件:
注册编辑 HKEY_CLASSES_ROOT\Licenses = 许可:复制密钥可能违反既定版权。
// Winsock Control 6.0 许可证密钥 HKEY_CLASSES_ROOT\Licenses\2c49f800-c2dd-11cf-9ad6-0080c7e7b78d = mlrljgrlhltlngjlthrligklpkrhllglqlrk
4、打开我的Excel可视化基本窗口
5、插入用户表单
6、从tools->reference,浏览上面的.ocx文件,选择Microsoft Winsock Control 6.0
7、在用户窗体上放一个命令按钮,双击添加如下代码:
Dim tcpclient As New Winsock
tcpclient.Connect "localhost",5100
到目前为止,一切似乎都很好。当我输入“tcpclient”时。系统甚至提示我 .Accept .Close .Connect .....
听起来不错。
然后我开始运行用户表单,然后单击命令按钮,然后收到错误: 运行时错误 -2147221164(80040154) 类未注册
你能帮我看看有什么问题吗?
我需要使用 winsock 控件,以便从我的 Excel 连接 TCP 服务器。
非常感谢!
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。