pb 中应用MSWinsock解决办法

pb 中应用MSWinsock
oleobject lo
int li_r
long ll_c
lo = create oleobject
li_r = lo.connecttonewobject('MSWinsock.Winsock.1')
if li_r <> 0 then 

  //无法连接ole 有些可以，但是大部分都不可以，不知道是少了什么wswinsck.ocx也注册过了
  return 9
end if

------解决方案--------------------
建议直接使用OCX控件，更加直观，通过OLE控件增加