7,763
社区成员
发帖
与我相关
我的任务
分享动态生成MSWinsock.Winsock对象的程序如何在客户机上部署？
有一程序用如下代码动态生成MSWinsock.Winsock对象
Dim WithEvents WSock as Winsock
Private Sub Class_Initialize()
Set WSock=CreateObject("MSWinsock.Winsock")
End Sub
该程序在安装了VB6的机器上能正常运行。但在没装VB6的机器上安装VB打包程序后，程序仍无法运行。抱429错，ActiveX component can't create object.
请问，除了注册mswinsck.ocx以外，还需要注册那些OCX和DLL，程序才能动态创建WINSOCK对象。
Dim WithEvents WSock as Winsock
Private Sub Class_Initialize()
Set WSock=CreateObject("MSWinsock.Winsock")
End Sub
该程序在安装了VB6的机器上能正常运行。但在没装VB6的机器上安装VB打包程序后，程序仍无法运行。抱429错，ActiveX component can't create object.
请问，除了注册mswinsck.ocx以外，还需要注册那些OCX和DLL，程序才能动态创建WINSOCK对象。
...全文
请发表友善的回复…
发表回复
roberthanker 2002-05-21
- 打赏
- 举报
还是不行
roberthanker 2002-05-21
- 打赏
- 举报
试过installshield了。还是不行。
哪位老大有办法解决？
哪位老大有办法解决？
thinkeasy 2002-05-21
- 打赏
- 举报
你在程序中的部件中加入Microsoft WinSock Control,然后打包试一试
thinkeasy 2002-05-21
- 打赏
- 举报
你在程序中的部件中加入Microsoft WinSock Control,然后打包试一试
roberthanker 2002-05-21
- 打赏
- 举报
我知道可以用数组。
但数组远没有CLASS模块灵活，而且把处理界面的FORM代码搞得乱七八糟的，排错也很麻烦。光是记住是哪个INDEX就够受了！
但数组远没有CLASS模块灵活，而且把处理界面的FORM代码搞得乱七八糟的，排错也很麻烦。光是记住是哪个INDEX就够受了！
tony_jian 2002-05-21
- 打赏
- 举报
你可以用winsock控件数组,很方便.
caferd 2002-05-20
- 打赏
- 举报
用installshield打抱试试，没有注册码可以找我，QQ：22423096
你把winsock.dll，MSWINSCK.ocx打进去试试，我也没这麽试过，这是我的推断。
你也可以改用sock API进行设计，使用winsock.dll中的api函数，功能和sock控件差不多
你把winsock.dll，MSWINSCK.ocx打进去试试，我也没这麽试过，这是我的推断。
你也可以改用sock API进行设计，使用winsock.dll中的api函数，功能和sock控件差不多
